Make parser constructor MEMO: again

2007-11-24 20:27:09 -05:00 · 2007-11-24 20:27:09 -05:00 · 30541ec78a
parent 72fe4e2d70
commit 30541ec78a
1 changed files with 1 additions and 1 deletions
--- a/extra/io/unix/launcher/launcher.factor
+++ b/extra/io/unix/launcher/launcher.factor
@ -30,7 +30,7 @@ LAZY: 'argument' ( -- parser )
    "\"" 'quoted' "'" 'quoted' 'unquoted' <|> <|>
    [ >string ] <@ ;

-: 'arguments' ( -- parser )
+MEMO: 'arguments' ( -- parser )
    'argument' " " token <!+> nonempty-list-of ;

 : tokenize-command ( command -- arguments )