cs: fix exit on catastrophic failure
Actuall exit, instead of calling `exit` with the wrong number of arguments and generating an endless stream of errors.
This commit is contained in:
parent
9caa0554bc
commit
fb87a5032c
|
@ -122,7 +122,7 @@
|
|||
(end-uninterrupted 'reset)
|
||||
(if (currently-in-engine?)
|
||||
(engine-return (void))
|
||||
(chez:exit)))
|
||||
(#%exit 1)))
|
||||
|
||||
(define (engine-block-via-timer)
|
||||
(cond
|
||||
|
|
Loading…
Reference in New Issue
Block a user