Plaster
New
List
Login
common-lisp
default
anonymous
2022.01.14 08:36:18
* (handler-bind ((error (lambda (c) (declare (ignore c)) (error "another")))) (restart-case (error "one") (xxx ()))) debugger invoked on a SIMPLE-ERROR in thread #<THREAD "main thread" RUNNING {1004AB81F3}>: another Type HELP for debugger help, or (SB-EXT:EXIT) to exit from SBCL. restarts (invokable by number or by possibly-abbreviated name): 0: [ABORT] Exit debugger, returning to top level. ((LAMBDA ())) source: (RESTART-CASE (ERROR "one") (XXX NIL)) 0] * (handler-bind ((error (lambda (c) (declare (ignore c)) (error "another")))) (restart-case (progn (error "one") 1) (xxx ()))) debugger invoked on a SIMPLE-ERROR in thread #<THREAD "main thread" RUNNING {1004AB81F3}>: another Type HELP for debugger help, or (SB-EXT:EXIT) to exit from SBCL. restarts (invokable by number or by possibly-abbreviated name): 0: [XXX ] XXX 1: [ABORT] Exit debugger, returning to top level. ((FLET "H0") #<unused argument>) source: (ERROR "another") 0]
Raw
Annotate
Repaste
Edit