mirrors/ecl
1
Fork 0
mirror of https://gitlab.com/embeddable-common-lisp/ecl.git synced 2026-03-06 12:20:48 -08:00
Code Issues Projects Releases Packages Wiki Activity

Forgot to reassign *debugger-hook* to avoid exiting on errors

Browse source
This commit is contained in:
jjgarcia 2006-02-08 16:56:59 +00:00
parent c5c4202487
commit 1161eb7c1e
1 changed files with 2 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

3
src/lsp/top.lsp
View file

@ -334,7 +334,8 @@ rebinds this variable to NIL when control enters a break loop.")
ECL specific.
The top-level loop of ECL. It is called by default when ECL is invoked."
(catch *quit-tag*
(let* (+ ++ +++ - * ** *** / // ///)
(let* ((*debugger-hook* nil)
+ ++ +++ - * ** *** / // ///)
(in-package "CL-USER")