X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=src%2Fcompiler%2Fctype.lisp;h=b9bd2c475061b6f70a0b6dfaa46f2ec41ff8e3bf;hb=e02c32bd4d07a7d30c9a9d78be54f1f9f84f9877;hp=1ab25ede9ef29e1563729044f03beafbcaf86365;hpb=a530bbe337109d898d5b4a001fc8f1afa3b5dc39;p=sbcl.git diff --git a/src/compiler/ctype.lisp b/src/compiler/ctype.lisp index 1ab25ed..b9bd2c4 100644 --- a/src/compiler/ctype.lisp +++ b/src/compiler/ctype.lisp @@ -13,9 +13,6 @@ (in-package "SB!C") -(file-comment - "$Header$") - ;;; These are the functions that are to be called when a problem is ;;; detected. They are passed format arguments. If null, we don't do ;;; anything. The error function is called when something is