boot-module: do not redefine exit as quit.

* mes/module/mes/guile/module.mes (exit): Remove redefinition.
This commit is contained in:
Jan (janneke) Nieuwenhuizen 2020-12-30 11:51:19 +01:00
parent 9c16fa9bfe
commit 00e29c3dfe
No known key found for this signature in database
GPG Key ID: F3C1A0D9C1D65273
1 changed files with 4 additions and 2 deletions

View File

@ -2005,12 +2005,14 @@
(force-output cep)
(throw 'abort key)))
;; FIXME: how does Guile exit 0?
(define core:exit exit)
(define (quit . args)
(apply throw 'quit args))
(define exit quit)
;; FIXME: how does Guile exit 0?
;; this gives
;; unhandled exception: error: (("option must be specified with argument:" "main"))
;;(define exit quit)
;;(define has-shown-backtrace-hint? #f) Defined by scm_init_backtrace ()