X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=src%2Fcode%2Ftypecheckfuns.lisp;h=2083c558a6e0091b2bcaf5d8b0be904a87d993d7;hb=2b277125b2d14a05710d7c8e4c0a22f97eea662a;hp=b36fe1735f6bd10fbbba07e3b1f21ac99d83531a;hpb=e33fb894f991b2926d8f3bace9058e4c0b2c3a37;p=sbcl.git diff --git a/src/code/typecheckfuns.lisp b/src/code/typecheckfuns.lisp index b36fe17..2083c55 100644 --- a/src/code/typecheckfuns.lisp +++ b/src/code/typecheckfuns.lisp @@ -186,7 +186,7 @@ (setf (gethash typespec *typecheckfuns*) unmemoized-typecheckfun) ;; UNMEMOIZED-TYPECHECKFUN shouldn't be NIL unless the compiler ;; knew that the memo would exist, so we shouldn't be here. - (error "internal error: no typecheckfun memo for ~% ~S" typespec))) + (bug "no typecheckfun memo for ~S" typespec))) (defun ctype-needs-to-be-interpreted-p (ctype) ;; What we should really do is factor out the code in