summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorAndy Wingo <wingo@pobox.com>2008-10-03 15:07:09 +0200
committerAndy Wingo <wingo@pobox.com>2008-10-03 15:07:09 +0200
commitedb1d1d78da289ffe9170ffe21e120cb31e463b5 (patch)
tree4ca98120a0ef512c91e1533910512f6d62c8e36b
parent64da3c12459038d9147ee60cf96009f20972e7f3 (diff)
downloadguile-edb1d1d78da289ffe9170ffe21e120cb31e463b5.tar.gz
remove repl.scm's start-stack definition
* module/system/repl/repl.scm: Now that we actually compile start-stack, no need to provide our own definition here.
-rw-r--r--module/system/repl/repl.scm5
1 files changed, 0 insertions, 5 deletions
diff --git a/module/system/repl/repl.scm b/module/system/repl/repl.scm
index 8fd5be2ee..1e558e79c 100644
--- a/module/system/repl/repl.scm
+++ b/module/system/repl/repl.scm
@@ -96,11 +96,6 @@
default-catch-handler
default-pre-unwind-handler))
-(eval-case
- ((compile-toplevel)
- (define-macro (start-stack tag expr)
- expr)))
-
(define (start-repl lang)
(let ((repl (make-repl lang))
(status #f))