]> gitweb.factorcode.org Git - factor.git/commitdiff
fuel.eval: re-use listener:parse-lines-interactive.
authorJohn Benediktsson <mrjbq7@gmail.com>
Fri, 23 May 2014 18:12:30 +0000 (11:12 -0700)
committerJohn Benediktsson <mrjbq7@gmail.com>
Fri, 23 May 2014 18:12:30 +0000 (11:12 -0700)
extra/fuel/eval/eval.factor

index 1620ce345ecee0fd77eea2bd81d23b09167b8e3f..644d0024b2a84c2102ab34b8e813a08052efd5f4 100644 (file)
@@ -1,8 +1,8 @@
 ! Copyright (C) 2009 Jose Antonio Ortega Ruiz.
 ! See http://factorcode.org/license.txt for BSD license.
-USING: accessors arrays compiler.units continuations debugger
-fuel.pprint io io.streams.string kernel namespaces parser sequences
-vectors vocabs.parser ;
+USING: accessors arrays continuations debugger fuel.pprint io
+io.streams.string kernel listener namespaces sequences
+vocabs.parser ;
 
 IN: fuel.eval
 
@@ -61,7 +61,7 @@ t fuel-eval-res-flag set-global
     fuel-eval-output set-global fuel-send-retort fuel-pop-status ;
 
 : (fuel-eval) ( lines -- )
-    [ [ parse-lines ] with-compilation-unit call( -- ) ] curry
+    [ parse-lines-interactive call( -- ) ] curry
     [ [ fuel-eval-error set-global ] [ print-error ] bi ] recover ;
 
 : (fuel-eval-usings) ( usings -- )