From: John Benediktsson <mrjbq7@gmail.com>
Date: Mon, 22 Mar 2021 04:07:53 +0000 (-0700)
Subject: locals.rewrite: use [nsequence] instead of nsequence.
X-Git-Tag: 0.99~2395
X-Git-Url: https://gitweb.factorcode.org/gitweb.cgi?p=factor.git;a=commitdiff_plain;h=18b99cc9b77076e4727f94edf30290b95047e237

locals.rewrite: use [nsequence] instead of nsequence.
---

diff --git a/core/locals/rewrite/rewrite.factor b/core/locals/rewrite/rewrite.factor
index a783fa85eb..1d72c2aaf1 100644
--- a/core/locals/rewrite/rewrite.factor
+++ b/core/locals/rewrite/rewrite.factor
@@ -2,8 +2,8 @@
 ! See http://factorcode.org/license.txt for BSD license.
 USING: accessors arrays assocs classes classes.tuple combinators
 fry.private hashtables kernel locals.backend locals.errors
-locals.types macros.expander make math quotations sequences
-sequences.generalizations sets words ;
+locals.types macros.expander make math memoize.private
+quotations sequences sets words ;
 
 IN: locals.rewrite
 
@@ -52,7 +52,7 @@ GENERIC: rewrite-element ( obj -- )
     [ rewrite-element ] each ;
 
 : rewrite-sequence ( seq -- )
-    [ rewrite-elements ] [ length ] [ 0 head ] tri '[ _ _ nsequence ] % ;
+    [ rewrite-elements ] [ length ] [ 0 head ] tri [nsequence] % ;
 
 M: sequence rewrite-element
     dup rewrite-literal? [ rewrite-sequence ] [ , ] if ;