mirrors/clog
1
Fork 0
mirror of https://github.com/rabbibotton/clog.git synced 2025-12-06 02:30:42 -08:00
Code Issues Projects Releases Wiki Activity

remove debug code

Browse source
This commit is contained in:
David Botton 2024-04-02 00:15:18 -04:00
parent 5e009cee5a
commit a3be6d4026
1 changed files with 22 additions and 23 deletions
Download patch file Download diff file Expand all files Collapse all files

1
tools/clog-builder-eval.lisp
View file

@ -33,7 +33,6 @@
(if clog-obj (if clog-obj
(let ((restart (one-of clog-obj condition (compute-restarts)))) (let ((restart (one-of clog-obj condition (compute-restarts))))
(when restart (when restart
(print restart)
(let ((*debugger-hook* encapsulation)) (let ((*debugger-hook* encapsulation))
(invoke-restart-interactively restart)))) (invoke-restart-interactively restart))))
(format t "Error - ~A~%" condition)))) (format t "Error - ~A~%" condition))))