]> gitweb.factorcode.org Git - factor.git/blobdiff - core/syntax/syntax.factor
factor: use ??if instead of ?if-old
[factor.git] / core / syntax / syntax.factor
index d3bec9f3dd0164d37b3b4a98297d396cd6e5ed05..10b2568003dac3e8d5ec92838a677d8647906f57 100644 (file)
@@ -27,7 +27,7 @@ IN: bootstrap.syntax
     "syntax" lookup-word t "delimiter" set-word-prop ;
 
 : define-core-syntax ( name quot -- )
-    [ dup "syntax" lookup-word [ ] [ no-word-error ] ?if ] dip
+    [ [ "syntax" lookup-word ] [ no-word-error ] ?unless ] dip
     define-syntax ;
 
 [