diff --git a/core/parser/parser.factor b/core/parser/parser.factor index 0bbb8d4424..873ca9db4c 100644 --- a/core/parser/parser.factor +++ b/core/parser/parser.factor @@ -128,7 +128,7 @@ M: f parse-quotation \ ] parse-until >quotation ; [ f parse-until >quotation ] with-lexer ; : parse-lines ( lines -- quot ) - (parse-lines) ; + >array (parse-lines) ; : parse-literal ( accum end quot -- accum ) [ parse-until ] dip call suffix! ; inline