From c1269bc8a34d3ef82cf15bac99d151dbbbd209cf Mon Sep 17 00:00:00 2001
From: John Benediktsson <mrjbq7@gmail.com>
Date: Fri, 27 Jul 2012 19:06:22 -0700
Subject: [PATCH] parser: make sure lines is an array.

---
 core/parser/parser.factor | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

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 )
-    <lexer> (parse-lines) ;
+    >array <lexer> (parse-lines) ;
 
 : parse-literal ( accum end quot -- accum )
     [ parse-until ] dip call suffix! ; inline