X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=src%2Fcode%2Fparse-defmacro-errors.lisp;h=271b668ed34c7180d8c41106b4fcb126622f7be7;hb=5dc28680e9cb2d598da02aed512aa49ea81fdade;hp=883cb0d75a0b358c01b060aba487baf15e46953e;hpb=a530bbe337109d898d5b4a001fc8f1afa3b5dc39;p=sbcl.git diff --git a/src/code/parse-defmacro-errors.lisp b/src/code/parse-defmacro-errors.lisp index 883cb0d..271b668 100644 --- a/src/code/parse-defmacro-errors.lisp +++ b/src/code/parse-defmacro-errors.lisp @@ -15,9 +15,6 @@ (in-package "SB!KERNEL") -(file-comment - "$Header$") - ;;; We save space in macro definitions by calling this function. (defun do-arg-count-error (error-kind name arg lambda-list minimum maximum) (multiple-value-bind (fname sb!debug:*stack-top-hint*) (find-caller-name)