summaryrefslogtreecommitdiff
path: root/Alpha/Repl.scm
diff options
context:
space:
mode:
Diffstat (limited to 'Alpha/Repl.scm')
-rw-r--r--Alpha/Repl.scm17
1 files changed, 0 insertions, 17 deletions
diff --git a/Alpha/Repl.scm b/Alpha/Repl.scm
deleted file mode 100644
index f3f7898..0000000
--- a/Alpha/Repl.scm
+++ /dev/null
@@ -1,17 +0,0 @@
-(define-module (Alpha Repl))
-;; (use-modules (system repl common))
-;; (repl-default-option-set!
-;; 'prompt
-;; (lambda (repl)
-;; (format #f "\n[~a@~a:~a]\nλ> "
-;; (getenv "USER")
-;; (vector-ref (uname) 1)
-;; (pwd))))
-
-;; TODO(bsima): (doc x)
-
-(eval-when (compile load eval)
- (define-meta-command ((src nala) repl (form))
- "Print source code of specified Scheme procedure."
- (call-with-values (repl-prepare-eval-thunk repl (repl-parse repl form))
- (lambda args (for-each print-src args)))))