parsed -> suffix!, add append!

[factor.git] / extra / infix / infix.factor

diff --git a/extra/infix/infix.factor b/extra/infix/infix.factor
index ce197800583f5f0231581d6425ddba57e5468172..4530d6c5c4f7b068be6f896823863743b6c8245c 100644 (file)
--- a/extra/infix/infix.factor
+++ b/extra/infix/infix.factor
@@ -82,7 +82,7 @@ M: ast-function infix-codegen
 PRIVATE>
 
 SYNTAX: [infix
-    "infix]" [infix-parse parsed \ call parsed ;
+    "infix]" [infix-parse suffix! \ call suffix! ;
 
 <PRIVATE