X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=src%2Fcode%2Ftime.lisp;h=4f72454644aa90082af75554e907a885487429c3;hb=b8f63d9b4e978bec3bfc1f4fc471e5ed946781fd;hp=4bb9d9c42737f6bed288147f67a3bdc9d0b8b434;hpb=a530bbe337109d898d5b4a001fc8f1afa3b5dc39;p=sbcl.git

diff --git a/src/code/time.lisp b/src/code/time.lisp
index 4bb9d9c..4f72454 100644
--- a/src/code/time.lisp
+++ b/src/code/time.lisp
@@ -11,9 +11,6 @@
 
 (in-package "SB!IMPL")
 
-(file-comment
-  "$Header$")
-
 (defconstant internal-time-units-per-second 100
   #!+sb-doc
   "The number of internal time units that fit into a second. See
@@ -102,9 +99,9 @@
   (minutes-west sb!c-call:int :out)
   (daylight-savings-p sb!alien:boolean :out))
 
-;;; Subtract from the returned Internal-Time to get the universal time.
-;;; The offset between our time base and the Perq one is 2145 weeks and
-;;; five days.
+;;; Subtract from the returned Internal-Time to get the universal
+;;; time. The offset between our time base and the Perq one is 2145
+;;; weeks and five days.
 (defconstant seconds-in-week (* 60 60 24 7))
 (defconstant weeks-offset 2145)
 (defconstant seconds-offset 432000)