X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=src%2Fcode%2Fcold-error.lisp;h=f61708fd48c5562158bb2cdeaaefd4fc5e7a0ddf;hb=1e161456a066b34e4a764fd351217dafc4f4f787;hp=ba9bfaebfeecbe4cf2def89535f4d27f77bd9466;hpb=cb3058c533711c39292b3526269437f424f4cf04;p=sbcl.git

diff --git a/src/code/cold-error.lisp b/src/code/cold-error.lisp
index ba9bfae..f61708f 100644
--- a/src/code/cold-error.lisp
+++ b/src/code/cold-error.lisp
@@ -152,7 +152,8 @@
 (defun break (&optional (datum "break") &rest arguments)
   #!+sb-doc
   "Print a message and invoke the debugger without allowing any possibility
-   of condition handling occurring."
+of condition handling occurring."
+  (declare (optimize (sb!c::rest-conversion 0)))
   (let ((*debugger-hook* nil)) ; as specifically required by ANSI
     (apply #'%break 'break datum arguments)))