Finish ,exit

part of darcs patch Thu Sep 22 18:59:15 EEST 2005  Martin Gasbichler <gasbichl@informatik.uni-tuebingen.de>
This commit is contained in:
eknauel 2005-09-27 16:36:00 +00:00
parent 62365b40d3
commit 04e4dba6a2
2 changed files with 2 additions and 1 deletions

View File

@ -512,6 +512,7 @@
(define-structure scheme-commands scheme-commands-interface (define-structure scheme-commands scheme-commands-interface
(open scheme (open scheme
(subset scsh (exit))
srfi-8 srfi-8
srfi-13 srfi-13
srfi-23 srfi-23

View File

@ -40,5 +40,5 @@
(ensure-loaded s) (ensure-loaded s)
"reloaded package"))))) "reloaded package")))))
((exit) ((exit)
(exit)) (exit 0))
(else (error "unknwon scheme command" command)))) (else (error "unknwon scheme command" command))))