X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=src%2Fcode%2Fcold-error.lisp;h=e4e094c95bf9d21bb4a1e160d8585017b1c47a2f;hb=829ced3e78a23ba153ba4db64e6ea6984c2313b6;hp=fb4926c8f25e351a6cd6eba9f65000d024fb09e5;hpb=9bc5da72887b15eb83500e16f05c3e42835476a3;p=sbcl.git diff --git a/src/code/cold-error.lisp b/src/code/cold-error.lisp index fb4926c..e4e094c 100644 --- a/src/code/cold-error.lisp +++ b/src/code/cold-error.lisp @@ -145,7 +145,6 @@ #!+sb-doc "Print a message and invoke the debugger without allowing any possibility of condition handling occurring." - (declare (optimize (sb!c::rest-conversion 0))) (let ((*debugger-hook* nil) ; as specifically required by ANSI (sb!debug:*stack-top-hint* (or sb!debug:*stack-top-hint* 'break))) (apply #'%break 'break datum arguments)))