vocabs.loader: use ?if

[factor.git] / core / parser / parser.factor

diff --git a/core/parser/parser.factor b/core/parser/parser.factor
index 50dcb3b3d3c9b97f287cf5d62684ddeac4be5a77..e483e0c8d49fe861d57fae1f89ce90b804aebfa1 100644 (file)
--- a/core/parser/parser.factor
+++ b/core/parser/parser.factor
@@ -46,7 +46,7 @@ SYMBOL: auto-use?
     no-word-restarted ;
 
 : parse-word ( string -- word )
-    dup search [ ] [ no-word ] ?if-old ;
+    [ search ] [ no-word ] ?unless ;
 
 ERROR: number-expected ;