andrius
/
mes
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Exit upon error. 

* module/mes/scm.mes (error): Add exit 1.
This commit is contained in:
Jan Nieuwenhuizen 2016-10-30 20:33:59 +01:00
parent 79d989268f
commit 27282738fd
1 changed files with 3 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
module/mes/scm.mes
View File

@ -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))