Address
Make repl work when default chunks not supplied.
:compile-only compile-only
:source where} opts)
(default env (fiber/getenv (fiber/current)))
- (default chunks getline)
+ (default chunks (fn [buf p] (getline "" buf)))
(default compile-only false)
(default onstatus debug/stacktrace)
(default on-compile-error bad-compile)
[&opt chunks onsignal env]
(def level (+ (dyn :debug-level 0) 1))
(default env (make-env))
+ (default chunks (fn [buf p] (getline (string "repl:"
+ (parser/where p)
+ ":"
+ (parser/state p) "> ")
+ buf)))
(default onsignal (fn [f x]
(case (fiber/status f)
:dead (do
