X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=src%2Fcode%2Fdebug.lisp;h=79f9504aa0c5fabd5cd15f56009ea57ea2c647df;hb=6973177fbe23d007655345c1fe2e0d6a5e397aa5;hp=b4115b587fec36ea2555739d7d925b8efcde6a8e;hpb=a530bbe337109d898d5b4a001fc8f1afa3b5dc39;p=sbcl.git diff --git a/src/code/debug.lisp b/src/code/debug.lisp index b4115b5..79f9504 100644 --- a/src/code/debug.lisp +++ b/src/code/debug.lisp @@ -10,9 +10,6 @@ ;;;; files for more information. (in-package "SB!DEBUG") - -(file-comment - "$Header$") ;;;; variables and constants @@ -1204,7 +1201,7 @@ Function and macro commands: ;;; We also cache the last top-level form that we printed a source for so that ;;; we don't have to do repeated reads and calls to FORM-NUMBER-TRANSLATIONS. (defvar *cached-top-level-form-offset* nil) -(declaim (type (or sb!kernel:index null) *cached-top-level-form-offset*)) +(declaim (type (or index null) *cached-top-level-form-offset*)) (defvar *cached-top-level-form*) (defvar *cached-form-number-translations*)