]> gitweb.factorcode.org Git - factor.git/commitdiff
make: switch to with-variable instead of with-scope.
authorJohn Benediktsson <mrjbq7@gmail.com>
Sat, 21 Jul 2012 17:44:54 +0000 (10:44 -0700)
committerJohn Benediktsson <mrjbq7@gmail.com>
Sat, 21 Jul 2012 17:44:54 +0000 (10:44 -0700)
core/make/make.factor

index 6796730e6d9b89ec707f8382b4cd32e571d8b7e3..7636ac010926542e4818fff0315ed60ba7b6e445 100644 (file)
@@ -9,19 +9,15 @@ SYMBOL: building
 
 : make-sequence ( quot exemplar -- seq )
     [
-        [
-            32 swap new-resizable [
-                building set call
-            ] keep
-        ] keep like
-    ] with-scope ; inline
+        32 swap new-resizable [
+            building [ call ] with-variable
+        ] keep
+    ] keep like ; inline
 
 : make-assoc ( quot exemplar -- assoc )
-    [
-        5 swap new-assoc [
-            building set call
-        ] keep
-    ] with-scope ; inline
+    5 swap new-assoc [
+        building [ call ] with-variable
+    ] keep ; inline
 
 PRIVATE>