summaryrefslogtreecommitdiff
path: root/module/ice-9/deprecated.scm
diff options
context:
space:
mode:
authorAndy Wingo <wingo@pobox.com>2010-06-22 23:50:27 +0200
committerAndy Wingo <wingo@pobox.com>2010-06-22 23:50:27 +0200
commitff87b2bd7c8a421333fa2182837388e6421df88e (patch)
tree0e9d14af04ee7b28fab3e0d5df11804c922ff725 /module/ice-9/deprecated.scm
parent8fba85750d512bf628520310574e658c147b6cc7 (diff)
downloadguile-ff87b2bd7c8a421333fa2182837388e6421df88e.tar.gz
top-repl out to its own module
* module/ice-9/boot-9.scm: * module/ice-9/top-repl.scm: Move top-repl out here. * module/Makefile.am: Add new file. * module/ice-9/deprecated.scm (top-repl): Deprecated shim. * libguile/script.c (scm_compile_shell_switches): Invoke top-repl from its new location.
Diffstat (limited to 'module/ice-9/deprecated.scm')
-rw-r--r--module/ice-9/deprecated.scm8
1 files changed, 7 insertions, 1 deletions
diff --git a/module/ice-9/deprecated.scm b/module/ice-9/deprecated.scm
index 4e80a8d22..1ce98f244 100644
--- a/module/ice-9/deprecated.scm
+++ b/module/ice-9/deprecated.scm
@@ -64,7 +64,8 @@
the-last-stack
save-stack
named-module-use!
- load-emacs-interface)
+ load-emacs-interface
+ top-repl)
#:replace (module-ref-submodule module-define-submodule!))
@@ -685,3 +686,8 @@ Use Geiser.")
(and (provided? 'debug-extensions)
(debug-enable 'backtrace))
(named-module-use! '(guile-user) '(ice-9 emacs)))
+
+(define (top-repl)
+ (issue-deprecation-warning
+ "`top-repl' has moved to the `(ice-9 top-repl)' module.")
+ ((module-ref (resolve-module '(ice-9 top-repl)) 'top-repl)))