projects
/
mes.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
| inline |
side by side
(parent:
79d9892
)
Exit upon error.
author
Jan Nieuwenhuizen
<janneke@gnu.org>
Sun, 30 Oct 2016 19:33:59 +0000
(20:33 +0100)
committer
Jan Nieuwenhuizen
<janneke@gnu.org>
Mon, 12 Dec 2016 19:33:49 +0000
(20:33 +0100)
* module/mes/scm.mes (error): Add exit 1.
module/mes/scm.mes
patch
|
blob
|
history
diff --git
a/module/mes/scm.mes
b/module/mes/scm.mes
index 042104fea86deaf686309648f87be07943dbcc7f..2e488be620a9ef5bd82aa4310c12019cda467615 100644
(file)
--- a/
module/mes/scm.mes
+++ b/
module/mes/scm.mes
@@
-163,7
+163,9
@@
(display who (current-error-port))
(display ":" (current-error-port))
(display rest (current-error-port))
- (newline (current-error-port)))
+ (newline (current-error-port))
+ (display "exiting...\n" (current-error-port))
+ (exit 1))
(define (syntax-error message . rest)
(display "syntax-error:" (current-error-port))