X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;ds=sidebyside;f=src%2Fcompiler%2Fcompiler-deftype.lisp;h=44a0c449b15ee8936d6d88e28c32159fe01a6a85;hb=3bd7a97d1b11a2b0aee086ef211cae807f3dfc35;hp=298bc9161803bffdb88adda89304c3f7b082c648;hpb=a530bbe337109d898d5b4a001fc8f1afa3b5dc39;p=sbcl.git diff --git a/src/compiler/compiler-deftype.lisp b/src/compiler/compiler-deftype.lisp index 298bc91..44a0c44 100644 --- a/src/compiler/compiler-deftype.lisp +++ b/src/compiler/compiler-deftype.lisp @@ -11,7 +11,7 @@ (in-package "SB!IMPL") -(file-comment "$Header$") +(/show0 "compiler-deftype.lisp 14") (defun %compiler-deftype (name expander &optional doc) (ecase (info :type :kind name) @@ -47,3 +47,5 @@ (sb!c::%note-type-defined name) (warn "defining type before %NOTE-TYPE-DEFINED is defined")) name) + +(/show0 "compiler-deftype.lisp end of file")