Updating code for make and fry changes

[factor.git] / extra / combinators / lib / lib.factor

diff --git a/extra/combinators/lib/lib.factor b/extra/combinators/lib/lib.factor
index b2577e663685112ac00edb9d3341d9d94b80d722..dd8fbd89f57b220c24930a11b501e8ae05211245 100755 (executable)
--- a/extra/combinators/lib/lib.factor
+++ b/extra/combinators/lib/lib.factor
@@ -2,7 +2,7 @@
 !                          Doug Coleman, Eduardo Cavazos,
 !                          Daniel Ehrenberg.
 ! See http://factorcode.org/license.txt for BSD license.
-USING: kernel combinators fry namespaces quotations hashtables
+USING: kernel combinators fry namespaces make quotations hashtables
 sequences assocs arrays stack-checker effects math math.ranges
 generalizations macros continuations random locals accessors ;
 
@@ -65,10 +65,10 @@ IN: combinators.lib
 MACRO: preserving ( predicate -- quot )
     dup infer in>>
     dup 1+
-    '[ , , nkeep , nrot ] ;
+    '[ _ _ nkeep _ nrot ] ;
 
 MACRO: ifte ( quot quot quot -- )
-    '[ , preserving , , if ] ;
+    '[ _ preserving _ _ if ] ;
 
 ! !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
 ! switch