diff options
Diffstat (limited to 'module/system/repl/repl.scm')
-rw-r--r-- | module/system/repl/repl.scm | 6 |
1 files changed, 1 insertions, 5 deletions
diff --git a/module/system/repl/repl.scm b/module/system/repl/repl.scm index 5c01c8b3a..73473af8c 100644 --- a/module/system/repl/repl.scm +++ b/module/system/repl/repl.scm @@ -23,14 +23,11 @@ :use-syntax (system base syntax) :use-module (system repl common) :use-module (system repl command) - :use-module (system vm frame) :use-module (ice-9 rdelim) :export (start-repl)) (define (start-repl lang) (let ((repl (make-repl lang))) -;; (set-current-vmodule! repl.module) -;; (set-current-evaluator! repl.vm) (repl-welcome repl) (let prompt-loop () (repl-prompt repl) @@ -38,8 +35,7 @@ (lambda () (if (eq? (next-char #t) #\,) ;; meta command - (begin (read-char) - (meta-command repl (read-line))) + (begin (read-char) (meta-command repl (read-line))) ;; evaluation (let rep-loop () (repl-print repl (repl-eval repl (repl-read repl))) |