scsh-conservatory
/
scsh-0.6
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

+ Exit with status 1 in case of an error 

+ Display the condition in the top-level scsh handler
This commit is contained in:
mainzelm 2004-03-11 10:17:41 +00:00
parent 622ef7a99f
commit 7b13b9bebb
2 changed files with 4 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
scsh/scsh-package.scm
View File

@ -334,6 +334,7 @@
(open command-processor (open command-processor
command-levels ; with-new-session command-levels ; with-new-session
conditions conditions
display-conditions
ensures-loaded ensures-loaded
environments environments
error-package error-package

5
scsh/top.scm
View File

@ -347,9 +347,10 @@
(more) (more)
(with-handler (with-handler
(lambda (c m) (lambda (c m)
(scheme-exit-now 0)) (scheme-exit-now 1))
(lambda () (lambda ()
(scsh-exit-now 0))))) (display-condition cond (current-error-port))
(scsh-exit-now 1)))))
(lambda () (lambda ()
(with-scsh-initialized (with-scsh-initialized
(not term-switch) context args (not term-switch) context args