X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;ds=sidebyside;f=src%2Fcompiler%2Fcontrol.lisp;h=91ff7db42fa4312520e82fd4e183ee1f7b19737f;hb=4fc9d21ae1d8a6a2f8ff70f589d5da103203de13;hp=e2949d29f73d7f086a2a463dde9f3e98e93445ee;hpb=a530bbe337109d898d5b4a001fc8f1afa3b5dc39;p=sbcl.git

diff --git a/src/compiler/control.lisp b/src/compiler/control.lisp
index e2949d2..91ff7db 100644
--- a/src/compiler/control.lisp
+++ b/src/compiler/control.lisp
@@ -18,9 +18,6 @@
 
 (in-package "SB!C")
 
-(file-comment
-  "$Header$")
-
 ;;; Insert Block in the emission order after the block After.
 (defun add-to-emit-order (block after)
   (declare (type block-annotation block after))