X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;ds=sidebyside;f=src%2Fcompiler%2Fgeneric%2Finterr.lisp;h=0ce2339517adb50ddfb3fb07b7635f6c3656daa3;hb=68c539ab90bb39f342229e68bf9286f63824597a;hp=6b36a7b6da6b7a310850957df97a3c5d84007af9;hpb=a530bbe337109d898d5b4a001fc8f1afa3b5dc39;p=sbcl.git diff --git a/src/compiler/generic/interr.lisp b/src/compiler/generic/interr.lisp index 6b36a7b..0ce2339 100644 --- a/src/compiler/generic/interr.lisp +++ b/src/compiler/generic/interr.lisp @@ -13,9 +13,6 @@ (in-package "SB!KERNEL") -(file-comment - "$Header$") - (defun error-number-or-lose (name) (or (position name sb!c:*backend-internal-errors* :key #'car) (error "unknown internal error: ~S" name)))