repl.wisp in ruby-wisp-source-0.8.0

- old
+ new

@@ -1,13 +1,14 @@
-(import repl "repl")
-(import vm "vm")
-(import [transpile] "./engine/node")
-(import [read push-back-reader] "./reader")
-(import [subs =] "./runtime")
-(import [count list] "./sequence")
-(import [compile compile-program] "./compiler")
-(import [pr-str] "./ast")
+(ns wisp.repl
+  (:require [repl :as repl]
+            [vm :as vm])
+  (:use [wisp.engine.node :only [transpile]]
+        [wisp.reader :only [read push-back-reader]]
+        [wisp.runtime :only [subs =]]
+        [wisp.sequence :only [count list]]
+        [wisp.compiler :only [compile compile*]]
+        [wisp.ast :only [pr-str]]))
 
 (defn evaluate-code
   "Evaluates some text from REPL input. If multiple forms are
   present, evaluates in sequence until one throws an error
   or the last form is reached. The result from the last
@@ -45,10 +46,10 @@
         (let [_ (if context.*debug* (.log console "READ:" (pr-str form)))
               ;env (assoc (ana/empty-env) :context :expr)
               ;body (ana/analyze env form)
               ;_ (when *debug* (println "ANALYZED:" (pr-str (:form body))))
               body form
-              code (compile-program (list body))
+              code (compile* (list body))
               _ (if context.*debug* (.log console "EMITTED:" (pr-str code)))
               value (.run-in-context vm code context uri)]
           {:value value :js code :form form})))
     (catch error
       {:error error})))