Updating code for make and fry changes

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

diff --git a/extra/combinators/conditional/conditional.factor b/extra/combinators/conditional/conditional.factor
index cb27ef3f55b11bb0553d28f3b29de5a7038d2bfb..3c9d6d24368ca455e7538af31eb800fbd8666566 100644 (file)
--- a/extra/combinators/conditional/conditional.factor
+++ b/extra/combinators/conditional/conditional.factor
@@ -5,7 +5,7 @@ IN: combinators.conditional
 
 ! !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
 
-MACRO: 1if ( test then else -- ) '[ dup @ , , if ] ;
+MACRO: 1if ( test then else -- ) '[ dup @ _ _ if ] ;
 
 ! !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!