diff --git a/pcl/braid.lisp b/pcl/braid.lisp
index 6053e62f7198b8d2257d6773710594d0db9f700b..594a24185f91d2283b8d97b6834c3748ae191564 100644
--- a/pcl/braid.lisp
+++ b/pcl/braid.lisp
@@ -24,6 +24,10 @@
 ;;; Suggestions, comments and requests for improvements are also welcome.
 ;;; *************************************************************************
 ;;;
+#+cmu
+(ext:file-comment
+  "$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/pcl/braid.lisp,v 1.14 1998/12/20 04:30:16 dtc Exp $")
+;;;
 ;;; Bootstrapping the meta-braid.
 ;;;
 ;;; The code in this file takes the early definitions that have been saved
diff --git a/pcl/cache.lisp b/pcl/cache.lisp
index 660a93d73ffea82f1a151b6530b764d07436adc4..f90160ff2181e6b44b039d9cea321439e426f57d 100644
--- a/pcl/cache.lisp
+++ b/pcl/cache.lisp
@@ -24,6 +24,10 @@
 ;;; Suggestions, comments and requests for improvements are also welcome.
 ;;; *************************************************************************
 ;;;
+#+cmu
+(ext:file-comment
+  "$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/pcl/cache.lisp,v 1.11 1998/12/20 04:30:16 dtc Exp $")
+;;;
 ;;; The basics of the PCL wrapper cache mechanism.
 ;;;
 
diff --git a/pcl/cmu-low.lisp b/pcl/cmu-low.lisp
index 5b5b08368c14f9f978273b54eefb8509fe1d1af6..99de6e97c1f51ad07278f9f67b3e729bbbe78aa9 100644
--- a/pcl/cmu-low.lisp
+++ b/pcl/cmu-low.lisp
@@ -23,6 +23,10 @@
 ;;;
 ;;; Suggestions, comments and requests for improvements are also welcome.
 ;;; *************************************************************************
+;;;
+#+cmu
+(ext:file-comment
+  "$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/pcl/Attic/cmu-low.lisp,v 1.17 1998/12/20 04:30:17 dtc Exp $")
 ;;; 
 ;;; This is the CMU Lisp version of the file low.
 ;;; 
diff --git a/pcl/combin.lisp b/pcl/combin.lisp
index ac83e859d124cb29df0892ab59c831df1b99dbdd..cb76ac83cde3ec9aa6d5f5a94b6e97125f57003e 100644
--- a/pcl/combin.lisp
+++ b/pcl/combin.lisp
@@ -24,6 +24,10 @@
 ;;; Suggestions, comments and requests for improvements are also welcome.
 ;;; *************************************************************************
 ;;;
+#+cmu
+(ext:file-comment
+  "$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/pcl/combin.lisp,v 1.8 1998/12/20 04:30:17 dtc Exp $")
+;;;
 
 (in-package :pcl)
 
diff --git a/pcl/construct.lisp b/pcl/construct.lisp
index 5c941f7da97c3a8045aa54b64ef2bf5521543cf3..2925bbdc3284e6540ebc5c07b40087d591515010 100644
--- a/pcl/construct.lisp
+++ b/pcl/construct.lisp
@@ -24,6 +24,9 @@
 ;;; Suggestions, comments and requests for improvements are also welcome.
 ;;; *************************************************************************
 ;;;
+#+cmu
+(ext:file-comment
+  "$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/pcl/Attic/construct.lisp,v 1.11 1998/12/20 04:30:18 dtc Exp $")
 ;;;
 ;;; This file defines the defconstructor and other make-instance optimization
 ;;; mechanisms.
diff --git a/pcl/cpl.lisp b/pcl/cpl.lisp
index 6d01615bb056e98554089e756886110e05782af6..0089e6cc0e22f5ca1808cf8ded0c9c0a2e254565 100644
--- a/pcl/cpl.lisp
+++ b/pcl/cpl.lisp
@@ -24,6 +24,10 @@
 ;;; Suggestions, comments and requests for improvements are also welcome.
 ;;; *************************************************************************
 ;;;
+#+cmu
+(ext:file-comment
+  "$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/pcl/cpl.lisp,v 1.8 1998/12/20 04:30:18 dtc Exp $")
+;;;
 
 (in-package :pcl)
 
diff --git a/pcl/defclass.lisp b/pcl/defclass.lisp
index d9788634af71b84cfb6a879d0c897164f8487758..7deda0fde1796b9837a7b7f0f089cbd2f287d158 100644
--- a/pcl/defclass.lisp
+++ b/pcl/defclass.lisp
@@ -24,6 +24,10 @@
 ;;; Suggestions, comments and requests for improvements are also welcome.
 ;;; *************************************************************************
 ;;;
+#+cmu
+(ext:file-comment
+  "$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/pcl/defclass.lisp,v 1.12 1998/12/20 04:30:18 dtc Exp $")
+;;;
 
 (in-package :pcl)
 
diff --git a/pcl/defcombin.lisp b/pcl/defcombin.lisp
index a8c2d9b2a505be18566a52d1101289c14c4ab498..ab09a3cfa81015ef5bd3193e6e34594811e1add6 100644
--- a/pcl/defcombin.lisp
+++ b/pcl/defcombin.lisp
@@ -24,6 +24,10 @@
 ;;; Suggestions, comments and requests for improvements are also welcome.
 ;;; *************************************************************************
 ;;;
+#+cmu
+(ext:file-comment
+  "$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/pcl/defcombin.lisp,v 1.9 1998/12/20 04:30:18 dtc Exp $")
+;;;
 
 (in-package :pcl)
 
diff --git a/pcl/defsys.lisp b/pcl/defsys.lisp
index 89740559479d35fddfc5e10b0ac81e6c46e2e40e..b76cafb40536e13f67e3e67ec9810d96fbf53f05 100644
--- a/pcl/defsys.lisp
+++ b/pcl/defsys.lisp
@@ -24,6 +24,10 @@
 ;;; Suggestions, comments and requests for improvements are also welcome.
 ;;; *************************************************************************
 ;;;
+#+cmu
+(ext:file-comment
+  "$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/pcl/defsys.lisp,v 1.18 1998/12/20 04:30:18 dtc Exp $")
+;;;
 ;;; Some support stuff for compiling and loading PCL.  It would be nice if
 ;;; there was some portable make-system we could all agree to share for a
 ;;; while.  At least until people really get databases and stuff.
diff --git a/pcl/dfun.lisp b/pcl/dfun.lisp
index 97a62e402365f5af53bda7c43f7c07c5879f17f0..89e53ae9ea8e375fa34744757219ad58380f37b5 100644
--- a/pcl/dfun.lisp
+++ b/pcl/dfun.lisp
@@ -24,6 +24,10 @@
 ;;; Suggestions, comments and requests for improvements are also welcome.
 ;;; *************************************************************************
 ;;;
+#+cmu
+(ext:file-comment
+  "$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/pcl/dfun.lisp,v 1.9 1998/12/20 04:30:19 dtc Exp $")
+;;;
 
 (in-package :pcl)
 
diff --git a/pcl/dlap.lisp b/pcl/dlap.lisp
index 88710c107be5d175310fb4ee54e4dec49c2dc40c..d355f374e1cf76ffb36d00c718e4b49e89ec368d 100644
--- a/pcl/dlap.lisp
+++ b/pcl/dlap.lisp
@@ -24,6 +24,10 @@
 ;;; Suggestions, comments and requests for improvements are also welcome.
 ;;; *************************************************************************
 ;;;
+#+cmu
+(ext:file-comment
+  "$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/pcl/Attic/dlap.lisp,v 1.7 1998/12/20 04:30:19 dtc Exp $")
+;;;
 
 (in-package :pcl)
 
diff --git a/pcl/dlisp.lisp b/pcl/dlisp.lisp
index f411931e614faab5956c31ac1d3389df3f0872c2..e8950e9356fa7f5050675383cb831143cbd3849c 100644
--- a/pcl/dlisp.lisp
+++ b/pcl/dlisp.lisp
@@ -24,6 +24,10 @@
 ;;; Suggestions, comments and requests for improvements are also welcome.
 ;;; *************************************************************************
 ;;;
+#+cmu
+(ext:file-comment
+  "$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/pcl/dlisp.lisp,v 1.5 1998/12/20 04:30:19 dtc Exp $")
+;;;
 
 (in-package :pcl)
 
diff --git a/pcl/dlisp2.lisp b/pcl/dlisp2.lisp
index 5b6d3a5b58f303e0bb6b0077fb99dbcb3d6aa01f..2e84dc3a6c033814bc5df008f4c6820c05761f21 100644
--- a/pcl/dlisp2.lisp
+++ b/pcl/dlisp2.lisp
@@ -24,6 +24,10 @@
 ;;; Suggestions, comments and requests for improvements are also welcome.
 ;;; *************************************************************************
 ;;;
+#+cmu
+(ext:file-comment
+  "$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/pcl/dlisp2.lisp,v 1.6 1998/12/20 04:30:19 dtc Exp $")
+;;;
 
 (in-package :pcl)
 
diff --git a/pcl/dlisp3.lisp b/pcl/dlisp3.lisp
index 7e89d5637fcbb0059e18c859e6bebc5df186b204..9bcd4e631680137eb522aa1415f848df794c75cc 100644
--- a/pcl/dlisp3.lisp
+++ b/pcl/dlisp3.lisp
@@ -24,6 +24,10 @@
 ;;; Suggestions, comments and requests for improvements are also welcome.
 ;;; *************************************************************************
 ;;;
+#+cmu
+(ext:file-comment
+  "$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/pcl/dlisp3.lisp,v 1.3 1998/12/20 04:30:19 dtc Exp $")
+;;;
 
 (in-package :pcl)
 
diff --git a/pcl/env.lisp b/pcl/env.lisp
index 733b8e387fe4a3f722064b621bf209f318cdc4d0..f872e27009259c56e5755f931078fe704add2546 100644
--- a/pcl/env.lisp
+++ b/pcl/env.lisp
@@ -24,6 +24,10 @@
 ;;; Suggestions, comments and requests for improvements are also welcome.
 ;;; *************************************************************************
 ;;;
+#+cmu
+(ext:file-comment
+  "$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/pcl/env.lisp,v 1.10 1998/12/20 04:30:19 dtc Exp $")
+;;;
 ;;; Basic environmental stuff.
 ;;;
 
diff --git a/pcl/extensions.lisp b/pcl/extensions.lisp
index 32231cf41af32d41286bd9b78d4051f75b7957a4..a76786899731b604bcb58cfc9978eb2c96f5fdf1 100644
--- a/pcl/extensions.lisp
+++ b/pcl/extensions.lisp
@@ -16,6 +16,10 @@
 ;;; Suggestions, bugs, criticism and questions to lange@cs.ucla.edu
 ;;; *************************************************************************
 ;;;
+#+cmu
+(ext:file-comment
+  "$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/pcl/Attic/extensions.lisp,v 1.2 1998/12/20 04:30:19 dtc Exp $")
+;;;
 
 (in-package 'pcl)
 
diff --git a/pcl/fast-init.lisp b/pcl/fast-init.lisp
index b475c5fac17dbfa4a1d283ba5774cc538569e178..f062adb213adf8f26dbbe4feab3b3bcb3296bab2 100644
--- a/pcl/fast-init.lisp
+++ b/pcl/fast-init.lisp
@@ -24,6 +24,9 @@
 ;;; Suggestions, comments and requests for improvements are also welcome.
 ;;; *************************************************************************
 ;;;
+#+cmu
+(ext:file-comment
+  "$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/pcl/Attic/fast-init.lisp,v 1.4 1998/12/20 04:30:20 dtc Exp $")
 ;;;
 ;;; This file defines the optimized make-instance functions.
 ;;; 
diff --git a/pcl/fin.lisp b/pcl/fin.lisp
index c5edfc06df35d83cf0389abac8e1f62ee2285d6b..db54b64c0eaa689a935f1f6922e8046b111ae59a 100644
--- a/pcl/fin.lisp
+++ b/pcl/fin.lisp
@@ -23,6 +23,10 @@
 ;;;
 ;;; Suggestions, comments and requests for improvements are also welcome.
 ;;; *************************************************************************
+;;;
+#+cmu
+(ext:file-comment
+  "$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/pcl/fin.lisp,v 1.11 1998/12/20 04:30:20 dtc Exp $")
 ;;;
 
   ;;   
diff --git a/pcl/fngen.lisp b/pcl/fngen.lisp
index 61ae0ac66aa8a66cd2c0042e38ac32d5a20ae346..0e3b1693bb35a9a68e17545b0ebc6f5d03649ae5 100644
--- a/pcl/fngen.lisp
+++ b/pcl/fngen.lisp
@@ -24,6 +24,10 @@
 ;;; Suggestions, comments and requests for improvements are also welcome.
 ;;; *************************************************************************
 ;;;
+#+cmu
+(ext:file-comment
+  "$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/pcl/fngen.lisp,v 1.7 1998/12/20 04:30:20 dtc Exp $")
+;;;
 
 (in-package :pcl)
 
diff --git a/pcl/fsc.lisp b/pcl/fsc.lisp
index d0071f598508ff71c5864a7db7f09cca89deae2e..d7b95a0edfb29ffb3e77f22cafb5eb4ec0974966 100644
--- a/pcl/fsc.lisp
+++ b/pcl/fsc.lisp
@@ -24,6 +24,10 @@
 ;;; Suggestions, comments and requests for improvements are also welcome.
 ;;; *************************************************************************
 ;;;
+#+cmu
+(ext:file-comment
+  "$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/pcl/fsc.lisp,v 1.8 1998/12/20 04:30:20 dtc Exp $")
+;;;
 ;;; This file contains the definition of the FUNCALLABLE-STANDARD-CLASS
 ;;; metaclass.  Much of the implementation of this metaclass is actually
 ;;; defined on the class STD-CLASS.  What appears in this file is a modest
diff --git a/pcl/generic-functions.lisp b/pcl/generic-functions.lisp
index 28721d0ad5b97c4933b94066b1f9c51cbcefe45a..b7f57f948b2984610be0e68c1c9117daa73c6d2a 100644
--- a/pcl/generic-functions.lisp
+++ b/pcl/generic-functions.lisp
@@ -1,4 +1,9 @@
 ;;;-*-Mode:LISP; Package:PCL; Base:10; Syntax:Common-lisp -*-
+;;;
+#+cmu
+(ext:file-comment
+  "$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/pcl/generic-functions.lisp,v 1.8 1998/12/20 04:30:20 dtc Exp $")
+;;;
 
 (in-package :pcl)
 
diff --git a/pcl/init.lisp b/pcl/init.lisp
index b5c77f74a44b0e29e16df2f95b299f42a609fb07..e1b708364da8fd970613d4e28e3ba931ed5bcf9e 100644
--- a/pcl/init.lisp
+++ b/pcl/init.lisp
@@ -24,6 +24,9 @@
 ;;; Suggestions, comments and requests for improvements are also welcome.
 ;;; *************************************************************************
 ;;;
+#+cmu
+(ext:file-comment
+  "$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/pcl/init.lisp,v 1.9 1998/12/20 04:30:20 dtc Exp $")
 ;;;
 ;;; This file defines the initialization and related protocols.
 ;;; 
diff --git a/pcl/iterate.lisp b/pcl/iterate.lisp
index 2b89076693adba1901acf1e995edecc0424b72bf..3c9a306be42431e6c7adacda946ee04dda9f3081 100644
--- a/pcl/iterate.lisp
+++ b/pcl/iterate.lisp
@@ -23,6 +23,10 @@
 ;;;
 ;;; Suggestions, comments and requests for improvements are also welcome.
 ;;; *************************************************************************
+;;;
+#+cmu
+(ext:file-comment
+  "$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/pcl/Attic/iterate.lisp,v 1.6 1998/12/20 04:30:21 dtc Exp $")
 ;;; 
 ;;; Original source {pooh/n}<pooh>vanmelle>lisp>iterate;4 created 27-Sep-88 12:35:33
 
diff --git a/pcl/lap.lisp b/pcl/lap.lisp
index 3e250fa5aab22fa5b169e63d5b83b18e4d51d7be..7adddc86401be805ea2a6a2ebd61e31f89c5484f 100644
--- a/pcl/lap.lisp
+++ b/pcl/lap.lisp
@@ -24,6 +24,10 @@
 ;;; Suggestions, comments and requests for improvements are also welcome.
 ;;; *************************************************************************
 ;;;
+#+cmu
+(ext:file-comment
+  "$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/pcl/Attic/lap.lisp,v 1.7 1998/12/20 04:30:21 dtc Exp $")
+;;;
 
 (in-package 'pcl)
 
diff --git a/pcl/low.lisp b/pcl/low.lisp
index 4b1d4d356480aa0db8cfab60d272f4835343d7da..3e35436c99e996b508468a25d8e5951a952375ff 100644
--- a/pcl/low.lisp
+++ b/pcl/low.lisp
@@ -24,6 +24,10 @@
 ;;; Suggestions, comments and requests for improvements are also welcome.
 ;;; *************************************************************************
 ;;;
+#+cmu
+(ext:file-comment
+  "$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/pcl/low.lisp,v 1.9 1998/12/20 04:30:21 dtc Exp $")
+;;;
 ;;; This file contains portable versions of low-level functions and macros
 ;;; which are ripe for implementation specific customization.  None of the
 ;;; code in this file *has* to be customized for a particular Common Lisp
diff --git a/pcl/macros.lisp b/pcl/macros.lisp
index e9001c1b894d328b5ac38619cc133b6f46fd1cee..e1bdca921e9371b3b7d2511b7cbc5136cb4b090a 100644
--- a/pcl/macros.lisp
+++ b/pcl/macros.lisp
@@ -24,6 +24,10 @@
 ;;; Suggestions, comments and requests for improvements are also welcome.
 ;;; *************************************************************************
 ;;;
+#+cmu
+(ext:file-comment
+  "$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/pcl/macros.lisp,v 1.10 1998/12/20 04:30:21 dtc Exp $")
+;;;
 ;;; Macros global variable definitions, and other random support stuff used
 ;;; by the rest of the system.
 ;;;
diff --git a/pcl/methods.lisp b/pcl/methods.lisp
index 86b8c98478839e7b4e4ea75e99650dccdfc51717..df445118419568878b7223b97d981685f74ee3dd 100644
--- a/pcl/methods.lisp
+++ b/pcl/methods.lisp
@@ -24,6 +24,10 @@
 ;;; Suggestions, comments and requests for improvements are also welcome.
 ;;; *************************************************************************
 ;;;
+#+cmu
+(ext:file-comment
+  "$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/pcl/methods.lisp,v 1.12 1998/12/20 04:30:21 dtc Exp $")
+;;;
 
 (in-package :pcl)
 
diff --git a/pcl/pkg.lisp b/pcl/pkg.lisp
index 1c3f0e455e3f46130b6f303205ecfabdaa63263c..55f21b5ad7bf116f806511add378b46b574a1e71 100644
--- a/pcl/pkg.lisp
+++ b/pcl/pkg.lisp
@@ -24,7 +24,10 @@
 ;;; Suggestions, comments and requests for improvements are also welcome.
 ;;; *************************************************************************
 ;;;
-
+#+cmu
+(ext:file-comment
+  "$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/pcl/pkg.lisp,v 1.15 1998/12/20 04:30:22 dtc Exp $")
+;;;
 ;;; CMUCL 18a: Jan-1998 -- Changing to DEFPACKAGE.
 ;;; Note that at this time CMUCL is not in compliance with ANSI
 ;;; specified use of feature names :cltl2 :x3j13 :draft-ansi-cl or :ansi-cl
diff --git a/pcl/plap.lisp b/pcl/plap.lisp
index 622dd5c3cf04120c7158ce990ff0d31eaf9dfe4c..fd69ba4bf4d2bb4b7c42aae62a6c60d56c26f11b 100644
--- a/pcl/plap.lisp
+++ b/pcl/plap.lisp
@@ -24,6 +24,10 @@
 ;;; Suggestions, comments and requests for improvements are also welcome.
 ;;; *************************************************************************
 ;;;
+#+cmu
+(ext:file-comment
+  "$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/pcl/Attic/plap.lisp,v 1.8 1998/12/20 04:30:22 dtc Exp $")
+;;;
 
 (in-package 'pcl)
 
diff --git a/pcl/slots-boot.lisp b/pcl/slots-boot.lisp
index ad112f2e0b844f15b7aea0b2abb6721afcc9a331..f0ccfe593f37db16d0ccb2b44d54a7e858b86102 100644
--- a/pcl/slots-boot.lisp
+++ b/pcl/slots-boot.lisp
@@ -24,6 +24,10 @@
 ;;; Suggestions, comments and requests for improvements are also welcome.
 ;;; *************************************************************************
 ;;;
+#+cmu
+(ext:file-comment
+  "$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/pcl/slots-boot.lisp,v 1.6 1998/12/20 04:30:22 dtc Exp $")
+;;;
 
 (in-package :pcl)
 
diff --git a/pcl/slots.lisp b/pcl/slots.lisp
index d21dc075148353f761d3c06ab550ae0fcf5e75e1..6fd00f79ba12bd41e9672c97c29a4f71bcb09c22 100644
--- a/pcl/slots.lisp
+++ b/pcl/slots.lisp
@@ -24,6 +24,10 @@
 ;;; Suggestions, comments and requests for improvements are also welcome.
 ;;; *************************************************************************
 ;;;
+#+cmu
+(ext:file-comment
+  "$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/pcl/slots.lisp,v 1.9 1998/12/20 04:30:22 dtc Exp $")
+;;;
 
 (in-package :pcl)
 
diff --git a/pcl/std-class.lisp b/pcl/std-class.lisp
index 88d26fbc051015946a97ce14f585971067be09af..087445aaeb930557e4e8ba21a782c00cf512a9af 100644
--- a/pcl/std-class.lisp
+++ b/pcl/std-class.lisp
@@ -24,6 +24,10 @@
 ;;; Suggestions, comments and requests for improvements are also welcome.
 ;;; *************************************************************************
 ;;;
+#+cmu
+(ext:file-comment
+  "$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/pcl/std-class.lisp,v 1.18 1998/12/20 04:30:22 dtc Exp $")
+;;;
 
 (in-package :pcl)
 
diff --git a/pcl/structure-class.lisp b/pcl/structure-class.lisp
index 75f678c442c21de2007e64f3ea91ed61933fa2f0..46c812953d0e3bd90ff937d7baf40831f691c04f 100644
--- a/pcl/structure-class.lisp
+++ b/pcl/structure-class.lisp
@@ -24,6 +24,10 @@
 ;;; Suggestions, comments and requests for improvements are also welcome.
 ;;; *************************************************************************
 ;;;
+#+cmu
+(ext:file-comment
+  "$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/pcl/Attic/structure-class.lisp,v 1.2 1998/12/20 04:30:22 dtc Exp $")
+;;;
 
 (in-package 'pcl)
 
diff --git a/pcl/user-instances.lisp b/pcl/user-instances.lisp
index 1600efc741ffb0c54e0d400671cb6a010adbbc19..0038015f2950d6aeb7119748fe71a892ff7a90fe 100644
--- a/pcl/user-instances.lisp
+++ b/pcl/user-instances.lisp
@@ -18,6 +18,10 @@
 ;;; Suggestions, bugs, criticism and questions to lange@cs.ucla.edu
 ;;; *************************************************************************
 ;;;
+#+cmu
+(ext:file-comment
+  "$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/pcl/Attic/user-instances.lisp,v 1.2 1998/12/20 04:30:23 dtc Exp $")
+;;;
 
 (in-package 'pcl)
 
diff --git a/pcl/vector.lisp b/pcl/vector.lisp
index 52d58a5be5f478579d38f5d9d2cf8cc96ccafe30..dc667763681c70132f030d1a9c0072e3bd231d06 100644
--- a/pcl/vector.lisp
+++ b/pcl/vector.lisp
@@ -24,6 +24,10 @@
 ;;; Suggestions, comments and requests for improvements are also welcome.
 ;;; *************************************************************************
 ;;;
+#+cmu
+(ext:file-comment
+  "$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/pcl/vector.lisp,v 1.12 1998/12/20 04:30:23 dtc Exp $")
+;;;
 ;;; Permutation vectors.
 ;;;
 
diff --git a/pcl/walk.lisp b/pcl/walk.lisp
index 40a0660746192d09ce14fae3d30df0a1536f78a0..4f89b723cb336847bc1534bf607a9ed4804a2ebc 100644
--- a/pcl/walk.lisp
+++ b/pcl/walk.lisp
@@ -23,7 +23,11 @@
 ;;;
 ;;; Suggestions, comments and requests for improvements are also welcome.
 ;;; *************************************************************************
-;;; 
+;;;
+#+cmu
+(ext:file-comment
+  "$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/pcl/walk.lisp,v 1.15 1998/12/20 04:30:23 dtc Exp $")
+;;;
 ;;; A simple code walker, based IN PART on: (roll the credits)
 ;;;   Larry Masinter's Masterscope
 ;;;   Moon's Common Lisp code walker