        (f)
        (println (:value ret))
        (when-let [st (:stacktrace ret)]
-         (println st)))))
+         (println st)
+         (flush)))))
 
 (defn evaluate-form
   "Evaluate a ClojureScript form in the JavaScript environment. Returns a

              :success (:value ret)))))
      (catch Throwable ex
        (.printStackTrace ex)
        (println (str ex))))))

(defn load-stream [repl-env filename res]
  (let [env (ana/empty-env)]

            {:line 1 :column 1})
          identity opts)
        (loop []
          ;; try to let things flush before printing prompt
          (Thread/sleep 10)
          (print (str "ClojureScript:" ana/*cljs-ns* "> "))
          (flush)
          (let [rdr (readers/source-logging-push-back-reader
