parser: make sure lines is an array.

diff --git a/core/parser/parser.factor b/core/parser/parser.factor
index 0bbb8d4424eff120c953307cfd6be0a7bf43dbe1..873ca9db4ca0d371ffaed086caf46c360888d6f5 100644 (file)
--- 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 )
-    <lexer> (parse-lines) ;
+    >array <lexer> (parse-lines) ;
 
 : parse-literal ( accum end quot -- accum )
     [ parse-until ] dip call suffix! ; inline