From 47bd4c9840ab0edb399460b4940b8586bb2644e6 Mon Sep 17 00:00:00 2001
From: ram <ram>
Date: Fri, 8 Feb 1991 13:36:49 +0000
Subject: [PATCH] New file header with RCS header FILE-COMMENT.

---
 code/alieneval.lisp     | 14 +++++++++-----
 code/array.lisp         | 14 +++++++++-----
 code/backq.lisp         | 12 ++++++++----
 code/bignum-test.lisp   | 19 +++++++++++++++----
 code/bignum.lisp        | 10 +++++++---
 code/bit-bash.lisp      | 12 ++++++++----
 code/c-call.lisp        | 12 ++++++++----
 code/char.lisp          | 12 ++++++++----
 code/clx-ext.lisp       | 13 ++++++++-----
 code/commandline.lisp   | 12 ++++++++----
 code/debug-info.lisp    | 12 ++++++++----
 code/debug-int.lisp     | 13 ++++++++-----
 code/debug.lisp         | 14 +++++++++-----
 code/defmacro.lisp      | 12 ++++++++----
 code/defstruct.lisp     | 14 +++++++++-----
 code/describe.lisp      | 12 ++++++++----
 code/error.lisp         | 12 ++++++++----
 code/eval.lisp          | 14 +++++++++-----
 code/exports.lisp       | 14 +++++++++-----
 code/extensions.lisp    | 12 ++++++++----
 code/fd-stream.lisp     | 14 +++++++++-----
 code/fdefinition.lisp   | 14 +++++++++-----
 code/filesys.lisp       | 14 +++++++++-----
 code/float-trap.lisp    | 14 +++++++++-----
 code/float.lisp         | 14 +++++++++-----
 code/foreign.lisp       | 14 +++++++++-----
 code/format-time.lisp   | 12 ++++++++----
 code/format.lisp        | 12 ++++++++----
 code/globals.lisp       | 12 ++++++++----
 code/hash.lisp          | 12 ++++++++----
 code/internet.lisp      | 12 ++++++++----
 code/interr.lisp        | 14 +++++++++-----
 code/irrat.lisp         | 14 +++++++++-----
 code/kernel.lisp        | 14 +++++++++-----
 code/lispinit.lisp      | 14 +++++++++-----
 code/list.lisp          | 12 ++++++++----
 code/load.lisp          | 14 +++++++++-----
 code/machdef.lisp       | 12 ++++++++----
 code/macros.lisp        | 14 +++++++++-----
 code/mipsstrops.lisp    | 12 ++++++++----
 code/misc.lisp          | 14 +++++++++-----
 code/numbers.lisp       | 14 +++++++++-----
 code/old-loop.lisp      | 12 ++++++++----
 code/package.lisp       | 12 ++++++++----
 code/parse-time.lisp    | 12 ++++++++----
 code/pmax-disassem.lisp | 13 +++++++++++--
 code/pmax-machdef.lisp  | 12 ++++++++----
 code/pmax-vm.lisp       | 14 +++++++++-----
 code/pprint.lisp        | 12 ++++++++----
 code/pred.lisp          | 14 +++++++++-----
 code/print.lisp         | 14 +++++++++-----
 code/purify.lisp        | 12 ++++++++----
 code/query.lisp         | 12 ++++++++----
 code/rand.lisp          | 12 ++++++++----
 code/reader.lisp        | 14 +++++++++-----
 code/remote.lisp        | 12 ++++++++----
 code/run-program.lisp   | 12 ++++++++----
 code/save.lisp          | 15 +++++++++------
 code/search-list.lisp   | 12 ++++++++----
 code/seq.lisp           | 12 ++++++++----
 code/serve-event.lisp   | 12 ++++++++----
 code/sharpm.lisp        | 12 ++++++++----
 code/signal.lisp        | 14 +++++++++-----
 code/sort.lisp          | 14 +++++++++-----
 code/sparc-machdef.lisp | 12 ++++++++----
 code/sparc-vm.lisp      | 14 +++++++++-----
 code/stream.lisp        | 14 +++++++++-----
 code/string.lisp        | 12 ++++++++----
 code/struct.lisp        | 12 ++++++++----
 code/symbol.lisp        | 12 ++++++++----
 code/sysmacs.lisp       | 12 ++++++++----
 code/time.lisp          | 12 ++++++++----
 code/tty-inspect.lisp   | 12 ++++++++----
 code/type-boot.lisp     | 12 ++++++++----
 code/vm.lisp            | 14 +++++++++-----
 code/weak.lisp          | 14 +++++++++-----
 code/wire.lisp          | 12 ++++++++----
 tools/worldcom.lisp     | 13 ++++++++-----
 tools/worldload.lisp    | 13 ++++++++-----
 79 files changed, 672 insertions(+), 349 deletions(-)

diff --git a/code/alieneval.lisp b/code/alieneval.lisp
index 1d5c4860a..fbe368540 100644
--- a/code/alieneval.lisp
+++ b/code/alieneval.lisp
@@ -1,13 +1,17 @@
 ;;; -*- Log: code.log; Package: Lisp -*-
 ;;;
 ;;; **********************************************************************
-;;; This code was written as part of the Spice Lisp project at
-;;; Carnegie-Mellon University, and has been placed in the public domain.
-;;; If you want to use this code or any part of Spice Lisp, please contact
-;;; Scott Fahlman (FAHLMAN@CMUC). 
+;;; This code was written as part of the CMU Common Lisp project at
+;;; Carnegie Mellon University, and has been placed in the public domain.
+;;; If you want to use this code or any part of CMU Common Lisp, please contact
+;;; Scott Fahlman or slisp-group@cs.cmu.edu.
+;;;
+(ext:file-comment
+  "$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/alieneval.lisp,v 1.10 1991/02/08 13:30:36 ram Exp $")
+;;;
 ;;; **********************************************************************
 ;;;
-;;; $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/alieneval.lisp,v 1.9 1990/11/18 17:09:54 wlott Exp $
+;;; $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/alieneval.lisp,v 1.10 1991/02/08 13:30:36 ram Exp $
 ;;;
 ;;;    This file contains any the part of the Alien implementation that
 ;;; is not part of the compiler.
diff --git a/code/array.lisp b/code/array.lisp
index 3ee67c739..a6081dc8e 100644
--- a/code/array.lisp
+++ b/code/array.lisp
@@ -1,13 +1,17 @@
 ;;; -*- Log: code.log; Package: Lisp -*-
 ;;;
 ;;; **********************************************************************
-;;; This code was written as part of the Spice Lisp project at
-;;; Carnegie-Mellon University, and has been placed in the public domain.
-;;; If you want to use this code or any part of Spice Lisp, please contact
-;;; Scott Fahlman (FAHLMAN@CMUC). 
+;;; This code was written as part of the CMU Common Lisp project at
+;;; Carnegie Mellon University, and has been placed in the public domain.
+;;; If you want to use this code or any part of CMU Common Lisp, please contact
+;;; Scott Fahlman or slisp-group@cs.cmu.edu.
+;;;
+(ext:file-comment
+  "$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/array.lisp,v 1.9 1991/02/08 13:30:44 ram Exp $")
+;;;
 ;;; **********************************************************************
 ;;;
-;;; $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/array.lisp,v 1.8 1991/01/14 01:44:09 wlott Exp $
+;;; $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/array.lisp,v 1.9 1991/02/08 13:30:44 ram Exp $
 ;;;
 ;;; Functions to implement arrays for CMU Common Lisp.
 ;;; Written by Skef Wholey.
diff --git a/code/backq.lisp b/code/backq.lisp
index 4d40fc348..40b58da10 100644
--- a/code/backq.lisp
+++ b/code/backq.lisp
@@ -1,10 +1,14 @@
 ;;; -*- Log: code.log; Mode: Lisp; Package: Lisp -*-
 ;;;
 ;;; **********************************************************************
-;;; This code was written as part of the Spice Lisp project at
-;;; Carnegie-Mellon University, and has been placed in the public domain.
-;;; If you want to use this code or any part of Spice Lisp, please contact
-;;; Scott Fahlman (FAHLMAN@CMUC). 
+;;; This code was written as part of the CMU Common Lisp project at
+;;; Carnegie Mellon University, and has been placed in the public domain.
+;;; If you want to use this code or any part of CMU Common Lisp, please contact
+;;; Scott Fahlman or slisp-group@cs.cmu.edu.
+;;;
+(ext:file-comment
+  "$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/backq.lisp,v 1.2 1991/02/08 13:30:51 ram Exp $")
+;;;
 ;;; **********************************************************************
 ;;;
 ;;;    BACKQUOTE: Code Spice Lispified by Lee Schumacher.
diff --git a/code/bignum-test.lisp b/code/bignum-test.lisp
index 24962ef1b..63fc241ab 100644
--- a/code/bignum-test.lisp
+++ b/code/bignum-test.lisp
@@ -1,8 +1,19 @@
 ;;;; -*- Package: Bignum -*-
-;;;;
-;;;;    Some stuff to check that bignum operations are retuning the correct
-;;;; results.
-;;;; 
+;;;
+;;; **********************************************************************
+;;; This code was written as part of the CMU Common Lisp project at
+;;; Carnegie Mellon University, and has been placed in the public domain.
+;;; If you want to use this code or any part of CMU Common Lisp, please contact
+;;; Scott Fahlman or slisp-group@cs.cmu.edu.
+;;;
+(ext:file-comment
+  "$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/bignum-test.lisp,v 1.2 1991/02/08 13:30:53 ram Exp $")
+;;;
+;;; **********************************************************************
+;;;
+;;;    Some stuff to check that bignum operations are retuning the correct
+;;; results.
+;;; 
 (in-package "BIGNUM")
 
 (defvar *in-bignum-wrapper* nil)
diff --git a/code/bignum.lisp b/code/bignum.lisp
index f32dec34d..500bae7f6 100644
--- a/code/bignum.lisp
+++ b/code/bignum.lisp
@@ -2,9 +2,13 @@
 ;;;
 ;;; **********************************************************************
 ;;; This code was written as part of the CMU Common Lisp project at
-;;; Carnegie Mellon University, and has been placed in the public
-;;; domain.  If you want to use this code or any part of CMU Common
-;;; Lisp, please contact Scott Fahlman (Scott.Fahlman@CS.CMU.EDU)
+;;; Carnegie Mellon University, and has been placed in the public domain.
+;;; If you want to use this code or any part of CMU Common Lisp, please contact
+;;; Scott Fahlman or slisp-group@cs.cmu.edu.
+;;;
+(ext:file-comment
+  "$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/bignum.lisp,v 1.16 1991/02/08 13:30:56 ram Exp $")
+;;;
 ;;; **********************************************************************
 ;;;
 ;;; This file contains code to implement bignum support.
diff --git a/code/bit-bash.lisp b/code/bit-bash.lisp
index f0e3840ad..5df64588b 100644
--- a/code/bit-bash.lisp
+++ b/code/bit-bash.lisp
@@ -1,10 +1,14 @@
 ;;; -*- Log: code.log; Package: Lisp -*-
 ;;;
 ;;; **********************************************************************
-;;; This code was written as part of the Spice Lisp project at
-;;; Carnegie-Mellon University, and has been placed in the public domain.
-;;; If you want to use this code or any part of Spice Lisp, please contact
-;;; Scott Fahlman (FAHLMAN@CMUC). 
+;;; This code was written as part of the CMU Common Lisp project at
+;;; Carnegie Mellon University, and has been placed in the public domain.
+;;; If you want to use this code or any part of CMU Common Lisp, please contact
+;;; Scott Fahlman or slisp-group@cs.cmu.edu.
+;;;
+(ext:file-comment
+  "$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/bit-bash.lisp,v 1.8 1991/02/08 13:31:12 ram Exp $")
+;;;
 ;;; **********************************************************************
 ;;;
 ;;; Functions to implement bit bashing.
diff --git a/code/c-call.lisp b/code/c-call.lisp
index a3536e141..10bc6a6ed 100644
--- a/code/c-call.lisp
+++ b/code/c-call.lisp
@@ -1,10 +1,14 @@
 ;;; -*- Mode: Lisp; Package: EXTENSIONS; Log: code.log -*-
 ;;;
 ;;; **********************************************************************
-;;; This code was written as part of the Spice Lisp project at
-;;; Carnegie-Mellon University, and has been placed in the public domain.
-;;; If you want to use this code or any part of Spice Lisp, please contact
-;;; Scott Fahlman (FAHLMAN@CMUC). 
+;;; This code was written as part of the CMU Common Lisp project at
+;;; Carnegie Mellon University, and has been placed in the public domain.
+;;; If you want to use this code or any part of CMU Common Lisp, please contact
+;;; Scott Fahlman or slisp-group@cs.cmu.edu.
+;;;
+(ext:file-comment
+  "$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/c-call.lisp,v 1.4 1991/02/08 13:31:16 ram Exp $")
+;;;
 ;;; **********************************************************************
 ;;;
 ;;;    This file contains stuff used for calling out to C routines that are
diff --git a/code/char.lisp b/code/char.lisp
index f97e56fb1..975fbc938 100644
--- a/code/char.lisp
+++ b/code/char.lisp
@@ -1,10 +1,14 @@
 ;;; -*- Log: code.log; Package: Lisp -*-
 ;;;
 ;;; **********************************************************************
-;;; This code was written as part of the Spice Lisp project at
-;;; Carnegie-Mellon University, and has been placed in the public domain.
-;;; If you want to use this code or any part of Spice Lisp, please contact
-;;; Scott Fahlman (FAHLMAN@CMUC). 
+;;; This code was written as part of the CMU Common Lisp project at
+;;; Carnegie Mellon University, and has been placed in the public domain.
+;;; If you want to use this code or any part of CMU Common Lisp, please contact
+;;; Scott Fahlman or slisp-group@cs.cmu.edu.
+;;;
+(ext:file-comment
+  "$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/char.lisp,v 1.3 1991/02/08 13:31:22 ram Exp $")
+;;;
 ;;; **********************************************************************
 ;;;
 ;;; Character functions for Spice Lisp.  Part of the standard Spice Lisp
diff --git a/code/clx-ext.lisp b/code/clx-ext.lisp
index 4bc191986..3d0268fd9 100644
--- a/code/clx-ext.lisp
+++ b/code/clx-ext.lisp
@@ -1,11 +1,14 @@
 ;;; -*- Package: Extensions; Log: code.log; Mode: Lisp -*-
 ;;;
 ;;; **********************************************************************
-;;; This code was written as part of the Spice Lisp project at
-;;; Carnegie-Mellon University, and has been placed in the public domain.
-;;; Spice Lisp is currently incomplete and under active development.
-;;; If you want to use this code or any part of Spice Lisp, please contact
-;;; Scott Fahlman (FAHLMAN@CMUC). 
+;;; This code was written as part of the CMU Common Lisp project at
+;;; Carnegie Mellon University, and has been placed in the public domain.
+;;; If you want to use this code or any part of CMU Common Lisp, please contact
+;;; Scott Fahlman or slisp-group@cs.cmu.edu.
+;;;
+(ext:file-comment
+  "$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/clx-ext.lisp,v 1.4 1991/02/08 13:31:25 ram Exp $")
+;;;
 ;;; **********************************************************************
 ;;;
 ;;; This file contains code to extend CLX in the CMU Common Lisp environment.
diff --git a/code/commandline.lisp b/code/commandline.lisp
index 2ae87e6af..04513d404 100644
--- a/code/commandline.lisp
+++ b/code/commandline.lisp
@@ -1,10 +1,14 @@
 ;;; -*- Mode: Lisp; Package: Extensions; Log: code.log -*-
 ;;;
 ;;; **********************************************************************
-;;; This code was written as part of the Spice Lisp project at
-;;; Carnegie-Mellon University, and has been placed in the public domain.
-;;; If you want to use this code or any part of Spice Lisp, please contact
-;;; Scott Fahlman (FAHLMAN@CMUC). 
+;;; This code was written as part of the CMU Common Lisp project at
+;;; Carnegie Mellon University, and has been placed in the public domain.
+;;; If you want to use this code or any part of CMU Common Lisp, please contact
+;;; Scott Fahlman or slisp-group@cs.cmu.edu.
+;;;
+(ext:file-comment
+  "$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/commandline.lisp,v 1.2 1991/02/08 13:31:31 ram Exp $")
+;;;
 ;;; **********************************************************************
 ;;;
 ;;; Stuff to eat the command line passed to us from the shell.
diff --git a/code/debug-info.lisp b/code/debug-info.lisp
index d365b4b19..b55aa729e 100644
--- a/code/debug-info.lisp
+++ b/code/debug-info.lisp
@@ -1,10 +1,14 @@
 ;;; -*- Log: code.log; Package: C -*-
 ;;;
 ;;; **********************************************************************
-;;; This code was written as part of the Spice Lisp project at
-;;; Carnegie-Mellon University, and has been placed in the public domain.
-;;; If you want to use this code or any part of Spice Lisp, please contact
-;;; Scott Fahlman (FAHLMAN@CMUC). 
+;;; This code was written as part of the CMU Common Lisp project at
+;;; Carnegie Mellon University, and has been placed in the public domain.
+;;; If you want to use this code or any part of CMU Common Lisp, please contact
+;;; Scott Fahlman or slisp-group@cs.cmu.edu.
+;;;
+(ext:file-comment
+  "$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/debug-info.lisp,v 1.20 1991/02/08 13:31:35 ram Exp $")
+;;;
 ;;; **********************************************************************
 ;;;
 ;;;    This file contains structures used for recording debugger information.
diff --git a/code/debug-int.lisp b/code/debug-int.lisp
index 05f69be7e..21811188e 100644
--- a/code/debug-int.lisp
+++ b/code/debug-int.lisp
@@ -1,11 +1,14 @@
 ;;; -*- Mode: completion; Log: code.log; Package: debug-internals -*-
 ;;;
 ;;; **********************************************************************
-;;; This code was written as part of the Spice Lisp project at
-;;; Carnegie-Mellon University, and has been placed in the public domain.
-;;; Spice Lisp is currently incomplete and under active development.
-;;; If you want to use this code or any part of Spice Lisp, please contact
-;;; Scott Fahlman (FAHLMAN@CMUC). 
+;;; This code was written as part of the CMU Common Lisp project at
+;;; Carnegie Mellon University, and has been placed in the public domain.
+;;; If you want to use this code or any part of CMU Common Lisp, please contact
+;;; Scott Fahlman or slisp-group@cs.cmu.edu.
+;;;
+(ext:file-comment
+  "$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/debug-int.lisp,v 1.20 1991/02/08 13:31:38 ram Exp $")
+;;;
 ;;; **********************************************************************
 ;;;
 ;;; This file contains the implementation of the programmer's interface
diff --git a/code/debug.lisp b/code/debug.lisp
index 0ef7f033c..49080ef47 100644
--- a/code/debug.lisp
+++ b/code/debug.lisp
@@ -1,13 +1,17 @@
 ;;; -*- Mode: Lisp; Package: Debug; Log: code.log -*-
 ;;;
 ;;; **********************************************************************
-;;; This code was written as part of the Spice Lisp project at
-;;; Carnegie-Mellon University, and has been placed in the public domain.
-;;; If you want to use this code or any part of Spice Lisp, please contact
-;;; Scott Fahlman (FAHLMAN@CMUC). 
+;;; This code was written as part of the CMU Common Lisp project at
+;;; Carnegie Mellon University, and has been placed in the public domain.
+;;; If you want to use this code or any part of CMU Common Lisp, please contact
+;;; Scott Fahlman or slisp-group@cs.cmu.edu.
+;;;
+(ext:file-comment
+  "$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/debug.lisp,v 1.15 1991/02/08 13:31:52 ram Exp $")
+;;;
 ;;; **********************************************************************
 ;;;
-;;; $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/debug.lisp,v 1.14 1991/01/31 02:08:21 wlott Exp $
+;;; $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/debug.lisp,v 1.15 1991/02/08 13:31:52 ram Exp $
 ;;;
 ;;; CMU Common Lisp Debugger.  This is a very basic command-line oriented
 ;;; debugger.
diff --git a/code/defmacro.lisp b/code/defmacro.lisp
index af1f63ddf..9f20c0728 100644
--- a/code/defmacro.lisp
+++ b/code/defmacro.lisp
@@ -1,10 +1,14 @@
 ;;; -*- Log: code.log; Mode: Lisp; Package: Lisp -*-
 ;;;
 ;;; **********************************************************************
-;;; This code was written as part of the Spice Lisp project at
-;;; Carnegie-Mellon University, and has been placed in the public domain.
-;;; If you want to use this code or any part of Spice Lisp, please contact
-;;; Scott Fahlman (FAHLMAN@CMUC). 
+;;; This code was written as part of the CMU Common Lisp project at
+;;; Carnegie Mellon University, and has been placed in the public domain.
+;;; If you want to use this code or any part of CMU Common Lisp, please contact
+;;; Scott Fahlman or slisp-group@cs.cmu.edu.
+;;;
+(ext:file-comment
+  "$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/defmacro.lisp,v 1.12 1991/02/08 13:31:57 ram Exp $")
+;;;
 ;;; **********************************************************************
 ;;;
 ;;; Written by Blaine Burks.
diff --git a/code/defstruct.lisp b/code/defstruct.lisp
index 9b3f3babc..f71b2b938 100644
--- a/code/defstruct.lisp
+++ b/code/defstruct.lisp
@@ -1,13 +1,17 @@
 ;;; -*- Log: code.log; Package: C -*-
 ;;;
 ;;; **********************************************************************
-;;; This code was written as part of the Spice Lisp project at
-;;; Carnegie-Mellon University, and has been placed in the public domain.
-;;; If you want to use this code or any part of Spice Lisp, please contact
-;;; Scott Fahlman (FAHLMAN@CMUC). 
+;;; This code was written as part of the CMU Common Lisp project at
+;;; Carnegie Mellon University, and has been placed in the public domain.
+;;; If you want to use this code or any part of CMU Common Lisp, please contact
+;;; Scott Fahlman or slisp-group@cs.cmu.edu.
+;;;
+(ext:file-comment
+  "$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/defstruct.lisp,v 1.22 1991/02/08 13:32:03 ram Exp $")
+;;;
 ;;; **********************************************************************
 ;;;
-;;; $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/defstruct.lisp,v 1.21 1991/02/03 11:07:06 wlott Exp $
+;;; $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/defstruct.lisp,v 1.22 1991/02/08 13:32:03 ram Exp $
 ;;;
 ;;; Defstruct structure definition package (Mark II).
 ;;; Written by Skef Wholey and Rob MacLachlan.
diff --git a/code/describe.lisp b/code/describe.lisp
index 92f17fc46..b51770fcb 100644
--- a/code/describe.lisp
+++ b/code/describe.lisp
@@ -1,10 +1,14 @@
 ;;; -*- Mode: Lisp; Package: Lisp; Log: code.log -*-
 ;;;
 ;;; **********************************************************************
-;;; This code was written as part of the Spice Lisp project at
-;;; Carnegie-Mellon University, and has been placed in the public domain.
-;;; If you want to use this code or any part of Spice Lisp, please contact
-;;; Scott Fahlman (Scott.Fahlman@cs.cmu.edu). 
+;;; This code was written as part of the CMU Common Lisp project at
+;;; Carnegie Mellon University, and has been placed in the public domain.
+;;; If you want to use this code or any part of CMU Common Lisp, please contact
+;;; Scott Fahlman or slisp-group@cs.cmu.edu.
+;;;
+(ext:file-comment
+  "$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/describe.lisp,v 1.9 1991/02/08 13:32:09 ram Exp $")
+;;;
 ;;; **********************************************************************
 ;;;
 ;;; This is the describe mechanism for Common Lisp.
diff --git a/code/error.lisp b/code/error.lisp
index e2ce1415a..5c6283475 100644
--- a/code/error.lisp
+++ b/code/error.lisp
@@ -1,10 +1,14 @@
 ;;; -*- Package: conditions; Log: code.log -*-
 ;;;
 ;;; **********************************************************************
-;;; This code was written as part of the Spice Lisp project at
-;;; Carnegie-Mellon University, and has been placed in the public domain.
-;;; If you want to use this code or any part of Spice Lisp, please contact
-;;; Scott Fahlman (FAHLMAN@CMUC). 
+;;; This code was written as part of the CMU Common Lisp project at
+;;; Carnegie Mellon University, and has been placed in the public domain.
+;;; If you want to use this code or any part of CMU Common Lisp, please contact
+;;; Scott Fahlman or slisp-group@cs.cmu.edu.
+;;;
+(ext:file-comment
+  "$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/error.lisp,v 1.10 1991/02/08 13:32:12 ram Exp $")
+;;;
 ;;; **********************************************************************
 ;;;
 ;;; This is a condition system for CMU Common Lisp.
diff --git a/code/eval.lisp b/code/eval.lisp
index 1c23ed313..505da4128 100644
--- a/code/eval.lisp
+++ b/code/eval.lisp
@@ -1,13 +1,17 @@
 ;;; -*- Log: code.log; Package: Lisp -*-
 ;;;
 ;;; **********************************************************************
-;;; This code was written as part of the Spice Lisp project at
-;;; Carnegie-Mellon University, and has been placed in the public domain.
-;;; If you want to use this code or any part of Spice Lisp, please contact
-;;; Scott Fahlman (FAHLMAN@CMUC). 
+;;; This code was written as part of the CMU Common Lisp project at
+;;; Carnegie Mellon University, and has been placed in the public domain.
+;;; If you want to use this code or any part of CMU Common Lisp, please contact
+;;; Scott Fahlman or slisp-group@cs.cmu.edu.
+;;;
+(ext:file-comment
+  "$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/eval.lisp,v 1.8 1991/02/08 13:32:17 ram Exp $")
+;;;
 ;;; **********************************************************************
 ;;;
-;;; $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/eval.lisp,v 1.7 1990/10/11 18:17:18 ram Exp $
+;;; $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/eval.lisp,v 1.8 1991/02/08 13:32:17 ram Exp $
 ;;;    
 (in-package "LISP")
 (export '(eval constantp quote proclaim
diff --git a/code/exports.lisp b/code/exports.lisp
index 33ebb54e2..b5b29407e 100644
--- a/code/exports.lisp
+++ b/code/exports.lisp
@@ -1,13 +1,17 @@
 ;;; -*- Log: C.Log -*-
 ;;;
 ;;; **********************************************************************
-;;; This code was written as part of the Spice Lisp project at
-;;; Carnegie-Mellon University, and has been placed in the public domain.
-;;; If you want to use this code or any part of Spice Lisp, please contact
-;;; Scott Fahlman (FAHLMAN@CMUC). 
+;;; This code was written as part of the CMU Common Lisp project at
+;;; Carnegie Mellon University, and has been placed in the public domain.
+;;; If you want to use this code or any part of CMU Common Lisp, please contact
+;;; Scott Fahlman or slisp-group@cs.cmu.edu.
+;;;
+(ext:file-comment
+  "$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/exports.lisp,v 1.67 1991/02/08 13:32:20 ram Exp $")
+;;;
 ;;; **********************************************************************
 ;;;
-;;; $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/exports.lisp,v 1.66 1991/01/08 23:20:56 wlott Exp $
+;;; $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/exports.lisp,v 1.67 1991/02/08 13:32:20 ram Exp $
 ;;;
 ;;; All the stuff necessary to export various symbols from various packages.
 ;;;
diff --git a/code/extensions.lisp b/code/extensions.lisp
index 6c9d433bd..5a9b3d6d0 100644
--- a/code/extensions.lisp
+++ b/code/extensions.lisp
@@ -1,10 +1,14 @@
 ;;; -*- Log: code.log; Package: Extensions -*-
 ;;;
 ;;; **********************************************************************
-;;; This code was written as part of the Spice Lisp project at
-;;; Carnegie-Mellon University, and has been placed in the public domain.
-;;; If you want to use this code or any part of Spice Lisp, please contact
-;;; Scott Fahlman (FAHLMAN@CMUC). 
+;;; This code was written as part of the CMU Common Lisp project at
+;;; Carnegie Mellon University, and has been placed in the public domain.
+;;; If you want to use this code or any part of CMU Common Lisp, please contact
+;;; Scott Fahlman or slisp-group@cs.cmu.edu.
+;;;
+(ext:file-comment
+  "$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/extensions.lisp,v 1.8 1991/02/08 13:32:27 ram Exp $")
+;;;
 ;;; **********************************************************************
 ;;;
 ;;; Spice Lisp extensions to the language.
diff --git a/code/fd-stream.lisp b/code/fd-stream.lisp
index a26e0fa5c..d40686477 100644
--- a/code/fd-stream.lisp
+++ b/code/fd-stream.lisp
@@ -1,13 +1,17 @@
 ;;; -*- Log: code.log; Package: LISP -*-
 
 ;;; **********************************************************************
-;;; This code was written as part of the Spice Lisp project at
-;;; Carnegie-Mellon University, and has been placed in the public domain.
-;;; If you want to use this code or any part of Spice Lisp, please contact
-;;; Scott Fahlman (FAHLMAN@CMUC). 
+;;; This code was written as part of the CMU Common Lisp project at
+;;; Carnegie Mellon University, and has been placed in the public domain.
+;;; If you want to use this code or any part of CMU Common Lisp, please contact
+;;; Scott Fahlman or slisp-group@cs.cmu.edu.
+;;;
+(ext:file-comment
+  "$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/fd-stream.lisp,v 1.10 1991/02/08 13:32:31 ram Exp $")
+;;;
 ;;; **********************************************************************
 ;;;
-;;; $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/fd-stream.lisp,v 1.9 1991/01/13 00:52:08 wlott Exp $
+;;; $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/fd-stream.lisp,v 1.10 1991/02/08 13:32:31 ram Exp $
 ;;;
 ;;; Streams for UNIX file descriptors.
 ;;;
diff --git a/code/fdefinition.lisp b/code/fdefinition.lisp
index a492959b1..1b2a15195 100644
--- a/code/fdefinition.lisp
+++ b/code/fdefinition.lisp
@@ -1,13 +1,17 @@
 ;;; -*- Package: Lisp; Log: code.log -*-
 ;;;
 ;;; **********************************************************************
-;;; This code was written as part of the Spice Lisp project at
-;;; Carnegie-Mellon University, and has been placed in the public domain.
-;;; If you want to use this code or any part of Spice Lisp, please contact
-;;; Scott Fahlman (FAHLMAN@CMUC). 
+;;; This code was written as part of the CMU Common Lisp project at
+;;; Carnegie Mellon University, and has been placed in the public domain.
+;;; If you want to use this code or any part of CMU Common Lisp, please contact
+;;; Scott Fahlman or slisp-group@cs.cmu.edu.
+;;;
+(ext:file-comment
+  "$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/fdefinition.lisp,v 1.4 1991/02/08 13:32:37 ram Exp $")
+;;;
 ;;; **********************************************************************
 ;;;
-;;; $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/fdefinition.lisp,v 1.3 1990/09/23 18:05:50 wlott Exp $
+;;; $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/fdefinition.lisp,v 1.4 1991/02/08 13:32:37 ram Exp $
 ;;;
 ;;;    Functions that hack on the global function namespace (primarily
 ;;; concerned with SETF functions here.)
diff --git a/code/filesys.lisp b/code/filesys.lisp
index 668e45135..23a4a49ea 100644
--- a/code/filesys.lisp
+++ b/code/filesys.lisp
@@ -1,13 +1,17 @@
 ;;; -*- Log: code.log; Package: Lisp -*-
 ;;; ### Some day fix to accept :wild in any pathname component.
 ;;; **********************************************************************
-;;; This code was written as part of the Spice Lisp project at
-;;; Carnegie-Mellon University, and has been placed in the public domain.
-;;; If you want to use this code or any part of Spice Lisp, please contact
-;;; Scott Fahlman (FAHLMAN@CMUC). 
+;;; This code was written as part of the CMU Common Lisp project at
+;;; Carnegie Mellon University, and has been placed in the public domain.
+;;; If you want to use this code or any part of CMU Common Lisp, please contact
+;;; Scott Fahlman or slisp-group@cs.cmu.edu.
+;;;
+(ext:file-comment
+  "$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/filesys.lisp,v 1.8 1991/02/08 13:32:39 ram Exp $")
+;;;
 ;;; **********************************************************************
 ;;;
-;;; $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/filesys.lisp,v 1.7 1990/11/23 08:36:30 wlott Exp $
+;;; $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/filesys.lisp,v 1.8 1991/02/08 13:32:39 ram Exp $
 ;;;
 ;;; Ugly pathname functions for Spice Lisp.
 ;;;    these functions are part of the standard Spice Lisp environment.
diff --git a/code/float-trap.lisp b/code/float-trap.lisp
index feed75396..b0c89f91d 100644
--- a/code/float-trap.lisp
+++ b/code/float-trap.lisp
@@ -1,13 +1,17 @@
 ;;; -*- Package: VM -*-
 ;;;
 ;;; **********************************************************************
-;;; This code was written as part of the Spice Lisp project at
-;;; Carnegie-Mellon University, and has been placed in the public domain.
-;;; If you want to use this code or any part of Spice Lisp, please contact
-;;; Scott Fahlman (FAHLMAN@CMUC). 
+;;; This code was written as part of the CMU Common Lisp project at
+;;; Carnegie Mellon University, and has been placed in the public domain.
+;;; If you want to use this code or any part of CMU Common Lisp, please contact
+;;; Scott Fahlman or slisp-group@cs.cmu.edu.
+;;;
+(ext:file-comment
+  "$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/float-trap.lisp,v 1.5 1991/02/08 13:32:45 ram Exp $")
+;;;
 ;;; **********************************************************************
 ;;;
-;;; $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/float-trap.lisp,v 1.4 1990/12/07 18:00:37 ram Exp $
+;;; $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/float-trap.lisp,v 1.5 1991/02/08 13:32:45 ram Exp $
 ;;;
 ;;;    This file contains stuff for controlling floating point traps.  It is
 ;;; IEEE float specific, but should work for pretty much any FPU where the
diff --git a/code/float.lisp b/code/float.lisp
index facfb13ab..14b8ca73e 100644
--- a/code/float.lisp
+++ b/code/float.lisp
@@ -1,13 +1,17 @@
 ;;; -*- Mode: Lisp; Package: KERNEL; Log: code.log -*-
 ;;;
 ;;; **********************************************************************
-;;; This code was written as part of the Spice Lisp project at
-;;; Carnegie-Mellon University, and has been placed in the public domain.
-;;; If you want to use this code or any part of Spice Lisp, please contact
-;;; Scott Fahlman (FAHLMAN@CMUC). 
+;;; This code was written as part of the CMU Common Lisp project at
+;;; Carnegie Mellon University, and has been placed in the public domain.
+;;; If you want to use this code or any part of CMU Common Lisp, please contact
+;;; Scott Fahlman or slisp-group@cs.cmu.edu.
+;;;
+(ext:file-comment
+  "$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/float.lisp,v 1.8 1991/02/08 13:32:47 ram Exp $")
+;;;
 ;;; **********************************************************************
 ;;;
-;;; $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/float.lisp,v 1.7 1990/12/12 00:01:16 ram Exp $
+;;; $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/float.lisp,v 1.8 1991/02/08 13:32:47 ram Exp $
 ;;;
 ;;;    This file contains the definitions of float specific number support
 ;;; (other than irrational stuff, which is in irrat.)  There is code in here
diff --git a/code/foreign.lisp b/code/foreign.lisp
index 14e80d1fb..3d6a9fb1d 100644
--- a/code/foreign.lisp
+++ b/code/foreign.lisp
@@ -1,13 +1,17 @@
 ;;; -*- Package: SYSTEM -*-
 ;;;
 ;;; **********************************************************************
-;;; This code was written as part of the Spice Lisp project at
-;;; Carnegie-Mellon University, and has been placed in the public domain.
-;;; If you want to use this code or any part of Spice Lisp, please contact
-;;; Scott Fahlman (FAHLMAN@CMUC). 
+;;; This code was written as part of the CMU Common Lisp project at
+;;; Carnegie Mellon University, and has been placed in the public domain.
+;;; If you want to use this code or any part of CMU Common Lisp, please contact
+;;; Scott Fahlman or slisp-group@cs.cmu.edu.
+;;;
+(ext:file-comment
+  "$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/foreign.lisp,v 1.5 1991/02/08 13:32:52 ram Exp $")
+;;;
 ;;; **********************************************************************
 ;;;
-;;; $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/foreign.lisp,v 1.4 1991/02/01 01:18:00 wlott Exp $
+;;; $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/foreign.lisp,v 1.5 1991/02/08 13:32:52 ram Exp $
 ;;;
 ;;; Load-foreign and support routines.
 ;;;
diff --git a/code/format-time.lisp b/code/format-time.lisp
index 730ad179b..c3670fc49 100644
--- a/code/format-time.lisp
+++ b/code/format-time.lisp
@@ -1,10 +1,14 @@
 ;;; -*- Mode: Lisp; Package: Extensions; Log: code.log -*-
 
 ;;; **********************************************************************
-;;; This code was written as part of the Spice Lisp project at
-;;; Carnegie-Mellon University, and has been placed in the public domain.
-;;; If you want to use this code or any part of Spice Lisp, please contact
-;;; Scott Fahlman (FAHLMAN@CMUC). 
+;;; This code was written as part of the CMU Common Lisp project at
+;;; Carnegie Mellon University, and has been placed in the public domain.
+;;; If you want to use this code or any part of CMU Common Lisp, please contact
+;;; Scott Fahlman or slisp-group@cs.cmu.edu.
+;;;
+(ext:file-comment
+  "$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/format-time.lisp,v 1.3 1991/02/08 13:32:55 ram Exp $")
+;;;
 ;;; **********************************************************************
 
 ;;; Really slick time printing routines built upon the Common Lisp
diff --git a/code/format.lisp b/code/format.lisp
index ec2ed2bc7..e06ed7d67 100644
--- a/code/format.lisp
+++ b/code/format.lisp
@@ -1,10 +1,14 @@
 ;;; -*- Log: code.log; Package: Lisp -*-
 ;;;
 ;;; **********************************************************************
-;;; This code was written as part of the Spice Lisp project at
-;;; Carnegie-Mellon University, and has been placed in the public domain.
-;;; If you want to use this code or any part of Spice Lisp, please contact
-;;; Scott Fahlman (FAHLMAN@CMUC). 
+;;; This code was written as part of the CMU Common Lisp project at
+;;; Carnegie Mellon University, and has been placed in the public domain.
+;;; If you want to use this code or any part of CMU Common Lisp, please contact
+;;; Scott Fahlman or slisp-group@cs.cmu.edu.
+;;;
+(ext:file-comment
+  "$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/format.lisp,v 1.7 1991/02/08 13:32:58 ram Exp $")
+;;;
 ;;; **********************************************************************
 ;;;
 ;;; Functions to implement FORMAT for Spice Lisp.
diff --git a/code/globals.lisp b/code/globals.lisp
index 886dae6cb..e696226f2 100644
--- a/code/globals.lisp
+++ b/code/globals.lisp
@@ -1,10 +1,14 @@
 ;;; -*- Package: Lisp; Log: code.log -*-
 ;;;
 ;;; **********************************************************************
-;;; This code was written as part of the Spice Lisp project at
-;;; Carnegie-Mellon University, and has been placed in the public domain.
-;;; If you want to use this code or any part of Spice Lisp, please contact
-;;; Scott Fahlman (FAHLMAN@CMUC). 
+;;; This code was written as part of the CMU Common Lisp project at
+;;; Carnegie Mellon University, and has been placed in the public domain.
+;;; If you want to use this code or any part of CMU Common Lisp, please contact
+;;; Scott Fahlman or slisp-group@cs.cmu.edu.
+;;;
+(ext:file-comment
+  "$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/globals.lisp,v 1.5 1991/02/08 13:33:06 ram Exp $")
+;;;
 ;;; **********************************************************************
 ;;;
 ;;;    This file contains special proclamations for variables that are
diff --git a/code/hash.lisp b/code/hash.lisp
index 32cff70e2..7fd3dba96 100644
--- a/code/hash.lisp
+++ b/code/hash.lisp
@@ -1,10 +1,14 @@
 ;;; -*- Log: code.log; Package: Lisp -*-
 ;;;
 ;;; **********************************************************************
-;;; This code was written as part of the Spice Lisp project at
-;;; Carnegie-Mellon University, and has been placed in the public domain.
-;;; If you want to use this code or any part of Spice Lisp, please contact
-;;; Scott Fahlman (FAHLMAN@CMUC). 
+;;; This code was written as part of the CMU Common Lisp project at
+;;; Carnegie Mellon University, and has been placed in the public domain.
+;;; If you want to use this code or any part of CMU Common Lisp, please contact
+;;; Scott Fahlman or slisp-group@cs.cmu.edu.
+;;;
+(ext:file-comment
+  "$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/hash.lisp,v 1.9 1991/02/08 13:33:08 ram Exp $")
+;;;
 ;;; **********************************************************************
 ;;;
 ;;; Hashing and hash table functions for Spice Lisp.
diff --git a/code/internet.lisp b/code/internet.lisp
index 194e78d48..383401c66 100644
--- a/code/internet.lisp
+++ b/code/internet.lisp
@@ -1,10 +1,14 @@
 ;;; -*- Log: code.log; Package: extensions -*-
 ;;;
 ;;; **********************************************************************
-;;; This code was written as part of the Spice Lisp project at
-;;; Carnegie-Mellon University, and has been placed in the public domain.
-;;; If you want to use this code or any part of Spice Lisp, please contact
-;;; Scott Fahlman (FAHLMAN@CMUC). 
+;;; This code was written as part of the CMU Common Lisp project at
+;;; Carnegie Mellon University, and has been placed in the public domain.
+;;; If you want to use this code or any part of CMU Common Lisp, please contact
+;;; Scott Fahlman or slisp-group@cs.cmu.edu.
+;;;
+(ext:file-comment
+  "$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/internet.lisp,v 1.4 1991/02/08 13:33:30 ram Exp $")
+;;;
 ;;; **********************************************************************
 ;;;
 ;;; This file contains an interface to internet domain sockets.
diff --git a/code/interr.lisp b/code/interr.lisp
index c2f52412e..390c409c8 100644
--- a/code/interr.lisp
+++ b/code/interr.lisp
@@ -1,13 +1,17 @@
 ;;; -*- Log: code.log; Package: KERNEL -*-
 ;;;
 ;;; **********************************************************************
-;;; This code was written as part of the Spice Lisp project at
-;;; Carnegie-Mellon University, and has been placed in the public domain.
-;;; If you want to use this code or any part of Spice Lisp, please contact
-;;; Scott Fahlman (FAHLMAN@CMUC). 
+;;; This code was written as part of the CMU Common Lisp project at
+;;; Carnegie Mellon University, and has been placed in the public domain.
+;;; If you want to use this code or any part of CMU Common Lisp, please contact
+;;; Scott Fahlman or slisp-group@cs.cmu.edu.
+;;;
+(ext:file-comment
+  "$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/interr.lisp,v 1.16 1991/02/08 13:33:35 ram Exp $")
+;;;
 ;;; **********************************************************************
 ;;;
-;;; $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/interr.lisp,v 1.15 1990/12/11 15:18:29 wlott Exp $
+;;; $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/interr.lisp,v 1.16 1991/02/08 13:33:35 ram Exp $
 ;;;
 ;;; Functions and macros to define and deal with internal errors (i.e.
 ;;; problems that can be signaled from assembler code).
diff --git a/code/irrat.lisp b/code/irrat.lisp
index fa185bfe1..94f1400bf 100644
--- a/code/irrat.lisp
+++ b/code/irrat.lisp
@@ -1,13 +1,17 @@
 ;;; -*- Mode: Lisp; Package: KERNEL; Log: code.log -*-
 ;;;
 ;;; **********************************************************************
-;;; This code was written as part of the Spice Lisp project at
-;;; Carnegie-Mellon University, and has been placed in the public domain.
-;;; If you want to use this code or any part of Spice Lisp, please contact
-;;; Scott Fahlman (FAHLMAN@CMUC). 
+;;; This code was written as part of the CMU Common Lisp project at
+;;; Carnegie Mellon University, and has been placed in the public domain.
+;;; If you want to use this code or any part of CMU Common Lisp, please contact
+;;; Scott Fahlman or slisp-group@cs.cmu.edu.
+;;;
+(ext:file-comment
+  "$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/irrat.lisp,v 1.7 1991/02/08 13:33:39 ram Exp $")
+;;;
 ;;; **********************************************************************
 ;;;
-;;; $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/irrat.lisp,v 1.6 1991/01/03 13:16:27 ram Exp $
+;;; $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/irrat.lisp,v 1.7 1991/02/08 13:33:39 ram Exp $
 ;;;
 ;;; This file contains all the irrational functions.  Actually, most of the
 ;;; work is done by calling out to C...
diff --git a/code/kernel.lisp b/code/kernel.lisp
index 55e7c698b..f0902e61b 100644
--- a/code/kernel.lisp
+++ b/code/kernel.lisp
@@ -1,13 +1,17 @@
 ;;; -*- Log: code.log; Package: KERNEL -*-
 ;;;
 ;;; **********************************************************************
-;;; This code was written as part of the Spice Lisp project at
-;;; Carnegie-Mellon University, and has been placed in the public domain.
-;;; If you want to use this code or any part of Spice Lisp, please contact
-;;; Scott Fahlman (FAHLMAN@CMUC). 
+;;; This code was written as part of the CMU Common Lisp project at
+;;; Carnegie Mellon University, and has been placed in the public domain.
+;;; If you want to use this code or any part of CMU Common Lisp, please contact
+;;; Scott Fahlman or slisp-group@cs.cmu.edu.
+;;;
+(ext:file-comment
+  "$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/kernel.lisp,v 1.5 1991/02/08 13:33:42 ram Exp $")
+;;;
 ;;; **********************************************************************
 ;;;
-;;; $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/kernel.lisp,v 1.4 1990/11/10 18:35:32 wlott Exp $
+;;; $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/kernel.lisp,v 1.5 1991/02/08 13:33:42 ram Exp $
 ;;;    
 (in-package "KERNEL")
 
diff --git a/code/lispinit.lisp b/code/lispinit.lisp
index 2fe7b8011..cff987d67 100644
--- a/code/lispinit.lisp
+++ b/code/lispinit.lisp
@@ -1,13 +1,17 @@
 ;;; -*- Mode: Lisp; Package: Lisp; Log: code.log -*-
 ;;;
 ;;; **********************************************************************
-;;; This code was written as part of the Spice Lisp project at
-;;; Carnegie-Mellon University, and has been placed in the public domain.
-;;; If you want to use this code or any part of Spice Lisp, please contact
-;;; Scott Fahlman (FAHLMAN@CMUC). 
+;;; This code was written as part of the CMU Common Lisp project at
+;;; Carnegie Mellon University, and has been placed in the public domain.
+;;; If you want to use this code or any part of CMU Common Lisp, please contact
+;;; Scott Fahlman or slisp-group@cs.cmu.edu.
+;;;
+(ext:file-comment
+  "$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/lispinit.lisp,v 1.20 1991/02/08 13:33:44 ram Exp $")
+;;;
 ;;; **********************************************************************
 ;;;
-;;; $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/lispinit.lisp,v 1.19 1991/01/31 02:09:17 wlott Exp $
+;;; $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/lispinit.lisp,v 1.20 1991/02/08 13:33:44 ram Exp $
 ;;;
 ;;; Initialization stuff for CMU Common Lisp, plus some other random functions
 ;;; that we don't have any better place for.
diff --git a/code/list.lisp b/code/list.lisp
index 038e81a77..1c77bf5ad 100644
--- a/code/list.lisp
+++ b/code/list.lisp
@@ -1,10 +1,14 @@
 ;;; -*- Log: code.log; Package: Lisp -*-
 ;;;
 ;;; **********************************************************************
-;;; This code was written as part of the Spice Lisp project at
-;;; Carnegie-Mellon University, and has been placed in the public domain.
-;;; If you want to use this code or any part of Spice Lisp, please contact
-;;; Scott Fahlman (FAHLMAN@CMUC). 
+;;; This code was written as part of the CMU Common Lisp project at
+;;; Carnegie Mellon University, and has been placed in the public domain.
+;;; If you want to use this code or any part of CMU Common Lisp, please contact
+;;; Scott Fahlman or slisp-group@cs.cmu.edu.
+;;;
+(ext:file-comment
+  "$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/list.lisp,v 1.6 1991/02/08 13:33:49 ram Exp $")
+;;;
 ;;; **********************************************************************
 ;;;
 ;;; Functions to implement lists for Spice Lisp.
diff --git a/code/load.lisp b/code/load.lisp
index 3e3852676..dbb300296 100644
--- a/code/load.lisp
+++ b/code/load.lisp
@@ -1,13 +1,17 @@
 ;;; -*- Log: code.log; Package: Lisp -*-
 ;;;
 ;;; **********************************************************************
-;;; This code was written as part of the Spice Lisp project at
-;;; Carnegie-Mellon University, and has been placed in the public domain.
-;;; If you want to use this code or any part of Spice Lisp, please contact
-;;; Scott Fahlman (FAHLMAN@CMUC). 
+;;; This code was written as part of the CMU Common Lisp project at
+;;; Carnegie Mellon University, and has been placed in the public domain.
+;;; If you want to use this code or any part of CMU Common Lisp, please contact
+;;; Scott Fahlman or slisp-group@cs.cmu.edu.
+;;;
+(ext:file-comment
+  "$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/load.lisp,v 1.25 1991/02/08 13:33:54 ram Exp $")
+;;;
 ;;; **********************************************************************
 ;;;
-;;; $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/load.lisp,v 1.24 1991/01/25 21:44:44 wlott Exp $
+;;; $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/load.lisp,v 1.25 1991/02/08 13:33:54 ram Exp $
 ;;;
 ;;; Loader for Spice Lisp.
 ;;; Written by Skef Wholey and Rob MacLachlan.
diff --git a/code/machdef.lisp b/code/machdef.lisp
index 274d2bc42..9f8766ff6 100644
--- a/code/machdef.lisp
+++ b/code/machdef.lisp
@@ -1,10 +1,14 @@
 ;;; -*- Log: code.log; Package: Mach -*-
 ;;;
 ;;; **********************************************************************
-;;; This code was written as part of the Spice Lisp project at
-;;; Carnegie-Mellon University, and has been placed in the public domain.
-;;; If you want to use this code or any part of Spice Lisp, please contact
-;;; Scott Fahlman (FAHLMAN@CMUC). 
+;;; This code was written as part of the CMU Common Lisp project at
+;;; Carnegie Mellon University, and has been placed in the public domain.
+;;; If you want to use this code or any part of CMU Common Lisp, please contact
+;;; Scott Fahlman or slisp-group@cs.cmu.edu.
+;;;
+(ext:file-comment
+  "$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/machdef.lisp,v 1.5 1991/02/08 13:34:05 ram Exp $")
+;;;
 ;;; **********************************************************************
 ;;;
 ;;; Record definitions needed for the interface to Mach.
diff --git a/code/macros.lisp b/code/macros.lisp
index 4ff1b20ec..787af0e09 100644
--- a/code/macros.lisp
+++ b/code/macros.lisp
@@ -1,13 +1,17 @@
 ;;; -*- Log: code.log; Package: Lisp -*-
 ;;;
 ;;; **********************************************************************
-;;; This code was written as part of the Spice Lisp project at
-;;; Carnegie-Mellon University, and has been placed in the public domain.
-;;; If you want to use this code or any part of Spice Lisp, please contact
-;;; Scott Fahlman (FAHLMAN@CMUC). 
+;;; This code was written as part of the CMU Common Lisp project at
+;;; Carnegie Mellon University, and has been placed in the public domain.
+;;; If you want to use this code or any part of CMU Common Lisp, please contact
+;;; Scott Fahlman or slisp-group@cs.cmu.edu.
+;;;
+(ext:file-comment
+  "$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/macros.lisp,v 1.20 1991/02/08 13:34:07 ram Exp $")
+;;;
 ;;; **********************************************************************
 ;;;
-;;; $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/macros.lisp,v 1.19 1991/01/31 17:31:23 ram Exp $
+;;; $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/macros.lisp,v 1.20 1991/02/08 13:34:07 ram Exp $
 ;;;
 ;;; This file contains the macros that are part of the standard
 ;;; Spice Lisp environment.
diff --git a/code/mipsstrops.lisp b/code/mipsstrops.lisp
index 97ceae414..e6e08e1a6 100644
--- a/code/mipsstrops.lisp
+++ b/code/mipsstrops.lisp
@@ -1,10 +1,14 @@
 ;;; -*- Log: Code.Log; Package: Lisp -*-
 ;;;
 ;;; **********************************************************************
-;;; This code was written as part of the Spice Lisp project at
-;;; Carnegie-Mellon University, and has been placed in the public domain.
-;;; If you want to use this code or any part of Spice Lisp, please contact
-;;; Scott Fahlman (FAHLMAN@CMUC). 
+;;; This code was written as part of the CMU Common Lisp project at
+;;; Carnegie Mellon University, and has been placed in the public domain.
+;;; If you want to use this code or any part of CMU Common Lisp, please contact
+;;; Scott Fahlman or slisp-group@cs.cmu.edu.
+;;;
+(ext:file-comment
+  "$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/mipsstrops.lisp,v 1.5 1991/02/08 13:34:14 ram Exp $")
+;;;
 ;;; **********************************************************************
 ;;;
 ;;;    String hacking functions that are stubs for things that might
diff --git a/code/misc.lisp b/code/misc.lisp
index a91f8ab09..44121be2c 100644
--- a/code/misc.lisp
+++ b/code/misc.lisp
@@ -1,13 +1,17 @@
 ;;; -*- Mode: Lisp; Package: Lisp; Log: code.log -*-
 ;;;
 ;;; **********************************************************************
-;;; This code was written as part of the Spice Lisp project at
-;;; Carnegie-Mellon University, and has been placed in the public domain.
-;;; If you want to use this code or any part of Spice Lisp, please contact
-;;; Scott Fahlman (FAHLMAN@CMUC). 
+;;; This code was written as part of the CMU Common Lisp project at
+;;; Carnegie Mellon University, and has been placed in the public domain.
+;;; If you want to use this code or any part of CMU Common Lisp, please contact
+;;; Scott Fahlman or slisp-group@cs.cmu.edu.
+;;;
+(ext:file-comment
+  "$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/misc.lisp,v 1.8 1991/02/08 13:34:17 ram Exp $")
+;;;
 ;;; **********************************************************************
 ;;;
-;;; $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/misc.lisp,v 1.7 1991/02/03 11:20:11 wlott Exp $
+;;; $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/misc.lisp,v 1.8 1991/02/08 13:34:17 ram Exp $
 ;;;
 ;;; Assorted miscellaneous functions for Spice Lisp.
 ;;;
diff --git a/code/numbers.lisp b/code/numbers.lisp
index 5aa9b996e..563c481e8 100644
--- a/code/numbers.lisp
+++ b/code/numbers.lisp
@@ -1,13 +1,17 @@
 ;;; -*- Mode: Lisp; Package: KERNEL; Log: code.log -*-
 ;;;
 ;;; **********************************************************************
-;;; This code was written as part of the Spice Lisp project at
-;;; Carnegie-Mellon University, and has been placed in the public domain.
-;;; If you want to use this code or any part of Spice Lisp, please contact
-;;; Scott Fahlman (FAHLMAN@CMUC). 
+;;; This code was written as part of the CMU Common Lisp project at
+;;; Carnegie Mellon University, and has been placed in the public domain.
+;;; If you want to use this code or any part of CMU Common Lisp, please contact
+;;; Scott Fahlman or slisp-group@cs.cmu.edu.
+;;;
+(ext:file-comment
+  "$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/numbers.lisp,v 1.17 1991/02/08 13:34:19 ram Exp $")
+;;;
 ;;; **********************************************************************
 ;;;
-;;; $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/numbers.lisp,v 1.16 1990/12/12 18:14:58 ram Exp $
+;;; $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/numbers.lisp,v 1.17 1991/02/08 13:34:19 ram Exp $
 ;;;
 ;;; This file contains the definitions of most number functions.
 ;;;
diff --git a/code/old-loop.lisp b/code/old-loop.lisp
index eab20ccce..e3de0c32f 100644
--- a/code/old-loop.lisp
+++ b/code/old-loop.lisp
@@ -2,12 +2,16 @@
 ;;;
 ;;; **********************************************************************
 ;;; This code was written as part of the CMU Common Lisp project at
-;;; Carnegie Mellon University, and has been placed in the public
-;;; domain.  If you want to use this code or any part of CMU Common
-;;; Lisp, please contact Scott Fahlman (Scott.Fahlman@CS.CMU.EDU)
+;;; Carnegie Mellon University, and has been placed in the public domain.
+;;; If you want to use this code or any part of CMU Common Lisp, please contact
+;;; Scott Fahlman or slisp-group@cs.cmu.edu.
+;;;
+(ext:file-comment
+  "$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/old-loop.lisp,v 1.6 1991/02/08 13:34:00 ram Exp $")
+;;;
 ;;; **********************************************************************
 ;;;
-;;; $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/old-loop.lisp,v 1.5 1990/11/25 08:15:31 wlott Exp $
+;;; $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/old-loop.lisp,v 1.6 1991/02/08 13:34:00 ram Exp $
 ;;;
 ;;; Loop facility, written by William Lott.
 ;;; 
diff --git a/code/package.lisp b/code/package.lisp
index 6b76e54cb..88508ab96 100644
--- a/code/package.lisp
+++ b/code/package.lisp
@@ -1,10 +1,14 @@
 ;;; -*- Log: code.log; Package: Lisp -*-
 ;;;
 ;;; **********************************************************************
-;;; This code was written as part of the Spice Lisp project at
-;;; Carnegie-Mellon University, and has been placed in the public domain.
-;;; If you want to use this code or any part of Spice Lisp, please contact
-;;; Scott Fahlman (FAHLMAN@CMUC). 
+;;; This code was written as part of the CMU Common Lisp project at
+;;; Carnegie Mellon University, and has been placed in the public domain.
+;;; If you want to use this code or any part of CMU Common Lisp, please contact
+;;; Scott Fahlman or slisp-group@cs.cmu.edu.
+;;;
+(ext:file-comment
+  "$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/package.lisp,v 1.9 1991/02/08 13:34:25 ram Exp $")
+;;;
 ;;; **********************************************************************
 ;;;
 ;;;     Package stuff and stuff like that.
diff --git a/code/parse-time.lisp b/code/parse-time.lisp
index 50db34cc6..52b2011a9 100644
--- a/code/parse-time.lisp
+++ b/code/parse-time.lisp
@@ -1,10 +1,14 @@
 ;;;  -*- Mode: Lisp; Package: Extensions; Log: code.log -*-
 
 ;;; **********************************************************************
-;;; This code was written as part of the Spice Lisp project at
-;;; Carnegie-Mellon University, and has been placed in the public domain.
-;;; If you want to use this code or any part of Spice Lisp, please contact
-;;; Scott Fahlman (FAHLMAN@CMUC). 
+;;; This code was written as part of the CMU Common Lisp project at
+;;; Carnegie Mellon University, and has been placed in the public domain.
+;;; If you want to use this code or any part of CMU Common Lisp, please contact
+;;; Scott Fahlman or slisp-group@cs.cmu.edu.
+;;;
+(ext:file-comment
+  "$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/parse-time.lisp,v 1.2 1991/02/08 13:34:32 ram Exp $")
+;;;
 ;;; **********************************************************************
 
 ;;; Parsing routines for time and date strings. Parse-time returns the
diff --git a/code/pmax-disassem.lisp b/code/pmax-disassem.lisp
index 2ab6405a6..02c5701c0 100644
--- a/code/pmax-disassem.lisp
+++ b/code/pmax-disassem.lisp
@@ -1,6 +1,15 @@
 ;;; -*- Mode: Lisp; Package: MIPS -*-
-;;; 
-;;; $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/pmax-disassem.lisp,v 1.16 1990/11/18 09:00:24 wlott Exp $
+;;;
+;;; **********************************************************************
+;;; This code was written as part of the CMU Common Lisp project at
+;;; Carnegie Mellon University, and has been placed in the public domain.
+;;; If you want to use this code or any part of CMU Common Lisp, please contact
+;;; Scott Fahlman or slisp-group@cs.cmu.edu.
+;;;
+(ext:file-comment
+  "$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/pmax-disassem.lisp,v 1.17 1991/02/08 13:34:36 ram Exp $")
+;;;
+;;; **********************************************************************
 ;;;
 ;;; A simple dissambler for the MIPS R2000.
 ;;;
diff --git a/code/pmax-machdef.lisp b/code/pmax-machdef.lisp
index 6477c8ce5..1e9536445 100644
--- a/code/pmax-machdef.lisp
+++ b/code/pmax-machdef.lisp
@@ -1,10 +1,14 @@
 ;;; -*- Log: code.log; Package: Mach -*-
 ;;;
 ;;; **********************************************************************
-;;; This code was written as part of the Spice Lisp project at
-;;; Carnegie-Mellon University, and has been placed in the public domain.
-;;; If you want to use this code or any part of Spice Lisp, please contact
-;;; Scott Fahlman (FAHLMAN@CMUC). 
+;;; This code was written as part of the CMU Common Lisp project at
+;;; Carnegie Mellon University, and has been placed in the public domain.
+;;; If you want to use this code or any part of CMU Common Lisp, please contact
+;;; Scott Fahlman or slisp-group@cs.cmu.edu.
+;;;
+(ext:file-comment
+  "$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/pmax-machdef.lisp,v 1.2 1991/02/08 13:34:41 ram Exp $")
+;;;
 ;;; **********************************************************************
 ;;;
 ;;; Record definitions needed for the interface to Mach.
diff --git a/code/pmax-vm.lisp b/code/pmax-vm.lisp
index 14ea98135..cbf2c1de2 100644
--- a/code/pmax-vm.lisp
+++ b/code/pmax-vm.lisp
@@ -1,13 +1,17 @@
 ;;; -*- Package: MIPS -*-
 ;;;
 ;;; **********************************************************************
-;;; This code was written as part of the Spice Lisp project at
-;;; Carnegie-Mellon University, and has been placed in the public domain.
-;;; If you want to use this code or any part of Spice Lisp, please contact
-;;; Scott Fahlman (FAHLMAN@CMUC). 
+;;; This code was written as part of the CMU Common Lisp project at
+;;; Carnegie Mellon University, and has been placed in the public domain.
+;;; If you want to use this code or any part of CMU Common Lisp, please contact
+;;; Scott Fahlman or slisp-group@cs.cmu.edu.
+;;;
+(ext:file-comment
+  "$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/pmax-vm.lisp,v 1.7 1991/02/08 13:34:42 ram Exp $")
+;;;
 ;;; **********************************************************************
 ;;;
-;;; $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/pmax-vm.lisp,v 1.6 1991/02/03 11:19:52 wlott Exp $
+;;; $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/pmax-vm.lisp,v 1.7 1991/02/08 13:34:42 ram Exp $
 ;;;
 ;;; This file contains the PMAX specific runtime stuff.
 ;;;
diff --git a/code/pprint.lisp b/code/pprint.lisp
index 0ad74719f..6e79a1f5d 100644
--- a/code/pprint.lisp
+++ b/code/pprint.lisp
@@ -1,10 +1,14 @@
 ;;; -*- Log: code.log; Package: Lisp -*-
 ;;;
 ;;; **********************************************************************
-;;; This code was written as part of the Spice Lisp project at
-;;; Carnegie-Mellon University, and has been placed in the public domain.
-;;; If you want to use this code or any part of Spice Lisp, please contact
-;;; Scott Fahlman (FAHLMAN@CMUC). 
+;;; This code was written as part of the CMU Common Lisp project at
+;;; Carnegie Mellon University, and has been placed in the public domain.
+;;; If you want to use this code or any part of CMU Common Lisp, please contact
+;;; Scott Fahlman or slisp-group@cs.cmu.edu.
+;;;
+(ext:file-comment
+  "$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/pprint.lisp,v 1.3 1991/02/08 13:34:45 ram Exp $")
+;;;
 ;;; **********************************************************************
 ;;;
 ;;; CMU Common Lisp pretty printer.
diff --git a/code/pred.lisp b/code/pred.lisp
index dadbece8c..c6ec81d57 100644
--- a/code/pred.lisp
+++ b/code/pred.lisp
@@ -1,13 +1,17 @@
 ;;; -*- Mode: Lisp; Package: LISP; Log: code.log -*-
 ;;;
 ;;; **********************************************************************
-;;; This code was written as part of the Spice Lisp project at
-;;; Carnegie-Mellon University, and has been placed in the public domain.
-;;; If you want to use this code or any part of Spice Lisp, please contact
-;;; Scott Fahlman (FAHLMAN@CMUC). 
+;;; This code was written as part of the CMU Common Lisp project at
+;;; Carnegie Mellon University, and has been placed in the public domain.
+;;; If you want to use this code or any part of CMU Common Lisp, please contact
+;;; Scott Fahlman or slisp-group@cs.cmu.edu.
+;;;
+(ext:file-comment
+  "$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/pred.lisp,v 1.16 1991/02/08 13:34:47 ram Exp $")
+;;;
 ;;; **********************************************************************
 ;;;
-;;; $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/pred.lisp,v 1.15 1990/10/27 15:27:46 wlott Exp $
+;;; $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/pred.lisp,v 1.16 1991/02/08 13:34:47 ram Exp $
 ;;;
 ;;; Predicate functions for CMU Common Lisp.
 ;;;
diff --git a/code/print.lisp b/code/print.lisp
index de4dc2104..fc093cba5 100644
--- a/code/print.lisp
+++ b/code/print.lisp
@@ -1,13 +1,17 @@
 ;;; -*- Log: code.log; Package: Lisp -*-
 ;;;
 ;;; **********************************************************************
-;;; This code was written as part of the Spice Lisp project at
-;;; Carnegie-Mellon University, and has been placed in the public domain.
-;;; If you want to use this code or any part of Spice Lisp, please contact
-;;; Scott Fahlman (FAHLMAN@CMUC). 
+;;; This code was written as part of the CMU Common Lisp project at
+;;; Carnegie Mellon University, and has been placed in the public domain.
+;;; If you want to use this code or any part of CMU Common Lisp, please contact
+;;; Scott Fahlman or slisp-group@cs.cmu.edu.
+;;;
+(ext:file-comment
+  "$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/print.lisp,v 1.19 1991/02/08 13:34:51 ram Exp $")
+;;;
 ;;; **********************************************************************
 ;;;
-;;; $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/print.lisp,v 1.18 1990/11/29 02:32:27 ram Exp $
+;;; $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/print.lisp,v 1.19 1991/02/08 13:34:51 ram Exp $
 ;;;
 ;;; CMU Common Lisp printer.
 ;;;
diff --git a/code/purify.lisp b/code/purify.lisp
index a47441227..1f4d17a69 100644
--- a/code/purify.lisp
+++ b/code/purify.lisp
@@ -1,10 +1,14 @@
 ;;; -*- Log: code.log; Package: Lisp -*-
 ;;;
 ;;; **********************************************************************
-;;; This code was written as part of the Spice Lisp project at
-;;; Carnegie-Mellon University, and has been placed in the public domain.
-;;; If you want to use this code or any part of Spice Lisp, please contact
-;;; Scott Fahlman (FAHLMAN@CMUC). 
+;;; This code was written as part of the CMU Common Lisp project at
+;;; Carnegie Mellon University, and has been placed in the public domain.
+;;; If you want to use this code or any part of CMU Common Lisp, please contact
+;;; Scott Fahlman or slisp-group@cs.cmu.edu.
+;;;
+(ext:file-comment
+  "$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/purify.lisp,v 1.11 1991/02/08 13:35:00 ram Exp $")
+;;;
 ;;; **********************************************************************
 ;;;
 ;;; Storage purifier for Spice Lisp.
diff --git a/code/query.lisp b/code/query.lisp
index c5ca1b451..5aa0e0846 100644
--- a/code/query.lisp
+++ b/code/query.lisp
@@ -1,10 +1,14 @@
 ;;; -*- Mode: Lisp; Package: Lisp; Log: code.log -*-
 ;;;
 ;;; **********************************************************************
-;;; This code was written as part of the Spice Lisp project at
-;;; Carnegie-Mellon University, and has been placed in the public domain.
-;;; If you want to use this code or any part of Spice Lisp, please contact
-;;; Scott Fahlman (FAHLMAN@CMUC). 
+;;; This code was written as part of the CMU Common Lisp project at
+;;; Carnegie Mellon University, and has been placed in the public domain.
+;;; If you want to use this code or any part of CMU Common Lisp, please contact
+;;; Scott Fahlman or slisp-group@cs.cmu.edu.
+;;;
+(ext:file-comment
+  "$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/query.lisp,v 1.2 1991/02/08 13:35:02 ram Exp $")
+;;;
 ;;; **********************************************************************
 ;;;
 ;;; Querying the user.
diff --git a/code/rand.lisp b/code/rand.lisp
index 34ca6a70c..01b806f8a 100644
--- a/code/rand.lisp
+++ b/code/rand.lisp
@@ -1,10 +1,14 @@
 ;;; -*- Mode: Lisp; Package: Lisp; Log: code.log -*-
 ;;;
 ;;; **********************************************************************
-;;; This code was written as part of the Spice Lisp project at
-;;; Carnegie-Mellon University, and has been placed in the public domain.
-;;; If you want to use this code or any part of Spice Lisp, please contact
-;;; Scott Fahlman (FAHLMAN@CMUC). 
+;;; This code was written as part of the CMU Common Lisp project at
+;;; Carnegie Mellon University, and has been placed in the public domain.
+;;; If you want to use this code or any part of CMU Common Lisp, please contact
+;;; Scott Fahlman or slisp-group@cs.cmu.edu.
+;;;
+(ext:file-comment
+  "$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/rand.lisp,v 1.3 1991/02/08 13:35:04 ram Exp $")
+;;;
 ;;; **********************************************************************
 ;;;
 ;;; Functions to random number functions for Spice Lisp 
diff --git a/code/reader.lisp b/code/reader.lisp
index 8037877ef..2c86b2cca 100644
--- a/code/reader.lisp
+++ b/code/reader.lisp
@@ -1,13 +1,17 @@
 ;;; -*- Log: code.log; Package: Lisp -*-
 ;;;
 ;;; **********************************************************************
-;;; This code was written as part of the Spice Lisp project at
-;;; Carnegie-Mellon University, and has been placed in the public domain.
-;;; If you want to use this code or any part of Spice Lisp, please contact
-;;; Scott Fahlman (FAHLMAN@CMUC). 
+;;; This code was written as part of the CMU Common Lisp project at
+;;; Carnegie Mellon University, and has been placed in the public domain.
+;;; If you want to use this code or any part of CMU Common Lisp, please contact
+;;; Scott Fahlman or slisp-group@cs.cmu.edu.
+;;;
+(ext:file-comment
+  "$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/reader.lisp,v 1.5 1991/02/08 13:35:06 ram Exp $")
+;;;
 ;;; **********************************************************************
 ;;;
-;;; $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/reader.lisp,v 1.4 1990/09/06 19:38:45 wlott Exp $
+;;; $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/reader.lisp,v 1.5 1991/02/08 13:35:06 ram Exp $
 ;;;
 ;;; Spice Lisp Reader 
 ;;; Written by David Dill
diff --git a/code/remote.lisp b/code/remote.lisp
index fe1cb6060..48592226c 100644
--- a/code/remote.lisp
+++ b/code/remote.lisp
@@ -1,10 +1,14 @@
 ;;; -*- Log: code.log; Package: wire -*-
 ;;;
 ;;; **********************************************************************
-;;; This code was written as part of the Spice Lisp project at
-;;; Carnegie-Mellon University, and has been placed in the public domain.
-;;; If you want to use this code or any part of Spice Lisp, please contact
-;;; Scott Fahlman (FAHLMAN@CMUC). 
+;;; This code was written as part of the CMU Common Lisp project at
+;;; Carnegie Mellon University, and has been placed in the public domain.
+;;; If you want to use this code or any part of CMU Common Lisp, please contact
+;;; Scott Fahlman or slisp-group@cs.cmu.edu.
+;;;
+(ext:file-comment
+  "$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/remote.lisp,v 1.2 1991/02/08 13:35:13 ram Exp $")
+;;;
 ;;; **********************************************************************
 ;;;
 ;;; This file implements a simple remote procedure call mechanism on top
diff --git a/code/run-program.lisp b/code/run-program.lisp
index feb3956ec..d5358778a 100644
--- a/code/run-program.lisp
+++ b/code/run-program.lisp
@@ -1,10 +1,14 @@
 ;;; -*- Package: Extensions; Log: code.log  -*-
 ;;;
 ;;; **********************************************************************
-;;; This code was written as part of the Spice Lisp project at
-;;; Carnegie-Mellon University, and has been placed in the public domain.
-;;; If you want to use this code or any part of Spice Lisp, please contact
-;;; Scott Fahlman (FAHLMAN@CMUC). 
+;;; This code was written as part of the CMU Common Lisp project at
+;;; Carnegie Mellon University, and has been placed in the public domain.
+;;; If you want to use this code or any part of CMU Common Lisp, please contact
+;;; Scott Fahlman or slisp-group@cs.cmu.edu.
+;;;
+(ext:file-comment
+  "$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/run-program.lisp,v 1.3 1991/02/08 13:35:16 ram Exp $")
+;;;
 ;;; **********************************************************************
 ;;;
 ;;; RUN-PROGRAM and friends.  Factilty for running unix programs from inside
diff --git a/code/save.lisp b/code/save.lisp
index 7ca8639d9..36d6d5bc2 100644
--- a/code/save.lisp
+++ b/code/save.lisp
@@ -1,14 +1,17 @@
 ;;; -*- Mode: Lisp; Package: Lisp; Log: code.log -*-
 ;;;
 ;;; **********************************************************************
-;;; This code was written as part of the Spice Lisp project at
-;;; Carnegie-Mellon University, and has been placed in the public domain.
-;;; Spice Lisp is currently incomplete and under active development.
-;;; If you want to use this code or any part of Spice Lisp, please contact
-;;; Scott Fahlman (FAHLMAN@CMUC). 
+;;; This code was written as part of the CMU Common Lisp project at
+;;; Carnegie Mellon University, and has been placed in the public domain.
+;;; If you want to use this code or any part of CMU Common Lisp, please contact
+;;; Scott Fahlman or slisp-group@cs.cmu.edu.
+;;;
+(ext:file-comment
+  "$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/save.lisp,v 1.5 1991/02/08 13:35:22 ram Exp $")
+;;;
 ;;; **********************************************************************
 ;;;
-;;; $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/save.lisp,v 1.4 1990/10/03 15:55:58 ram Exp $
+;;; $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/save.lisp,v 1.5 1991/02/08 13:35:22 ram Exp $
 ;;;
 ;;; Dump the current lisp image into a core file.  All the real work is done
 ;;; be C.
diff --git a/code/search-list.lisp b/code/search-list.lisp
index 1fc6e541f..8c6ccdf80 100644
--- a/code/search-list.lisp
+++ b/code/search-list.lisp
@@ -1,10 +1,14 @@
 ;;; -*- Mode: Lisp; Package: Lisp; Log: code.log -*-
 ;;;
 ;;; **********************************************************************
-;;; This code was written as part of the Spice Lisp project at
-;;; Carnegie-Mellon University, and has been placed in the public domain.
-;;; If you want to use this code or any part of Spice Lisp, please contact
-;;; Scott Fahlman (FAHLMAN@CMUC). 
+;;; This code was written as part of the CMU Common Lisp project at
+;;; Carnegie Mellon University, and has been placed in the public domain.
+;;; If you want to use this code or any part of CMU Common Lisp, please contact
+;;; Scott Fahlman or slisp-group@cs.cmu.edu.
+;;;
+(ext:file-comment
+  "$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/search-list.lisp,v 1.3 1991/02/08 13:35:25 ram Exp $")
+;;;
 ;;; **********************************************************************
 ;;;
 ;;; Logical name (search list) hackery for Lisp'ers.
diff --git a/code/seq.lisp b/code/seq.lisp
index 65b2acaa4..007e94a5b 100644
--- a/code/seq.lisp
+++ b/code/seq.lisp
@@ -1,10 +1,14 @@
 ;;; -*- Log: code.log; Package: Lisp -*-
 ;;;
 ;;; **********************************************************************
-;;; This code was written as part of the Spice Lisp project at
-;;; Carnegie-Mellon University, and has been placed in the public domain.
-;;; If you want to use this code or any part of Spice Lisp, please contact
-;;; Scott Fahlman (FAHLMAN@CMUC). 
+;;; This code was written as part of the CMU Common Lisp project at
+;;; Carnegie Mellon University, and has been placed in the public domain.
+;;; If you want to use this code or any part of CMU Common Lisp, please contact
+;;; Scott Fahlman or slisp-group@cs.cmu.edu.
+;;;
+(ext:file-comment
+  "$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/seq.lisp,v 1.6 1991/02/08 13:35:27 ram Exp $")
+;;;
 ;;; **********************************************************************
 ;;;
 ;;; Functions to implement generic sequences for Spice Lisp.
diff --git a/code/serve-event.lisp b/code/serve-event.lisp
index 61df51fc4..624b7a8c8 100644
--- a/code/serve-event.lisp
+++ b/code/serve-event.lisp
@@ -1,10 +1,14 @@
 ;;; -*- Log: code.log; Package: LISP -*-
 
 ;;; **********************************************************************
-;;; This code was written as part of the Spice Lisp project at
-;;; Carnegie-Mellon University, and has been placed in the public domain.
-;;; If you want to use this code or any part of Spice Lisp, please contact
-;;; Scott Fahlman (FAHLMAN@CMUC). 
+;;; This code was written as part of the CMU Common Lisp project at
+;;; Carnegie Mellon University, and has been placed in the public domain.
+;;; If you want to use this code or any part of CMU Common Lisp, please contact
+;;; Scott Fahlman or slisp-group@cs.cmu.edu.
+;;;
+(ext:file-comment
+  "$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/serve-event.lisp,v 1.7 1991/02/08 13:35:36 ram Exp $")
+;;;
 ;;; **********************************************************************
 ;;;
 ;;; SYSTEM:SERVE-EVENT, now in it's own file.
diff --git a/code/sharpm.lisp b/code/sharpm.lisp
index 7a0746a31..79b8b6313 100644
--- a/code/sharpm.lisp
+++ b/code/sharpm.lisp
@@ -1,10 +1,14 @@
 ;;; -*- Log: code.log; Package: Lisp -*-
 ;;;
 ;;; **********************************************************************
-;;; This code was written as part of the Spice Lisp project at
-;;; Carnegie-Mellon University, and has been placed in the public domain.
-;;; If you want to use this code or any part of Spice Lisp, please contact
-;;; Scott Fahlman (FAHLMAN@CMUC). 
+;;; This code was written as part of the CMU Common Lisp project at
+;;; Carnegie Mellon University, and has been placed in the public domain.
+;;; If you want to use this code or any part of CMU Common Lisp, please contact
+;;; Scott Fahlman or slisp-group@cs.cmu.edu.
+;;;
+(ext:file-comment
+  "$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/sharpm.lisp,v 1.4 1991/02/08 13:35:39 ram Exp $")
+;;;
 ;;; **********************************************************************
 ;;;
 ;;; Spice Lisp Interim Sharp Macro
diff --git a/code/signal.lisp b/code/signal.lisp
index eaa768015..55ff24ce8 100644
--- a/code/signal.lisp
+++ b/code/signal.lisp
@@ -1,13 +1,17 @@
 ;;; -*- Log: code.log; Package: MACH -*-
 ;;;
 ;;; **********************************************************************
-;;; This code was written as part of the Spice Lisp project at
-;;; Carnegie-Mellon University, and has been placed in the public domain.
-;;; If you want to use this code or any part of Spice Lisp, please contact
-;;; Scott Fahlman (FAHLMAN@CMUC). 
+;;; This code was written as part of the CMU Common Lisp project at
+;;; Carnegie Mellon University, and has been placed in the public domain.
+;;; If you want to use this code or any part of CMU Common Lisp, please contact
+;;; Scott Fahlman or slisp-group@cs.cmu.edu.
+;;;
+(ext:file-comment
+  "$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/signal.lisp,v 1.12 1991/02/08 13:35:43 ram Exp $")
+;;;
 ;;; **********************************************************************
 ;;;
-;;; $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/signal.lisp,v 1.11 1990/11/28 09:50:43 wlott Exp $
+;;; $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/signal.lisp,v 1.12 1991/02/08 13:35:43 ram Exp $
 ;;;
 ;;; Code for handling UNIX signals.
 ;;; 
diff --git a/code/sort.lisp b/code/sort.lisp
index c1183a566..10c9e55bf 100644
--- a/code/sort.lisp
+++ b/code/sort.lisp
@@ -1,11 +1,15 @@
 ;;; -*- Log: code.log; Package: Lisp -*-
 ;;;
 ;;; **********************************************************************
-;;; This code was written as part of the Spice Lisp project at 
-;;; Carnegie-Mellon University, and has been placed in the public domain.  
-;;; If you want to use this code or any part of Spice Lisp, please contact 
-;;; Scott Fahlman (FAHLMAN@CMUC).  
-;;; ********************************************************************** 
+;;; This code was written as part of the CMU Common Lisp project at
+;;; Carnegie Mellon University, and has been placed in the public domain.
+;;; If you want to use this code or any part of CMU Common Lisp, please contact
+;;; Scott Fahlman or slisp-group@cs.cmu.edu.
+;;;
+(ext:file-comment
+  "$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/sort.lisp,v 1.2 1991/02/08 13:35:46 ram Exp $")
+;;;
+;;; **********************************************************************
 ;;;
 ;;; Sort functions for Spice Lisp 
 ;;;   these functions are part of the standard spice lisp environment.  
diff --git a/code/sparc-machdef.lisp b/code/sparc-machdef.lisp
index 8b8e96b5a..5baee104c 100644
--- a/code/sparc-machdef.lisp
+++ b/code/sparc-machdef.lisp
@@ -1,10 +1,14 @@
 ;;; -*- Log: code.log; Package: Mach -*-
 ;;;
 ;;; **********************************************************************
-;;; This code was written as part of the Spice Lisp project at
-;;; Carnegie-Mellon University, and has been placed in the public domain.
-;;; If you want to use this code or any part of Spice Lisp, please contact
-;;; Scott Fahlman (FAHLMAN@CMUC). 
+;;; This code was written as part of the CMU Common Lisp project at
+;;; Carnegie Mellon University, and has been placed in the public domain.
+;;; If you want to use this code or any part of CMU Common Lisp, please contact
+;;; Scott Fahlman or slisp-group@cs.cmu.edu.
+;;;
+(ext:file-comment
+  "$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/sparc-machdef.lisp,v 1.2 1991/02/08 13:35:49 ram Exp $")
+;;;
 ;;; **********************************************************************
 ;;;
 ;;; Record definitions needed for the interface to Mach.
diff --git a/code/sparc-vm.lisp b/code/sparc-vm.lisp
index ea7746a26..705b7345c 100644
--- a/code/sparc-vm.lisp
+++ b/code/sparc-vm.lisp
@@ -1,13 +1,17 @@
 ;;; -*- Package: SPARC -*-
 ;;;
 ;;; **********************************************************************
-;;; This code was written as part of the Spice Lisp project at
-;;; Carnegie-Mellon University, and has been placed in the public domain.
-;;; If you want to use this code or any part of Spice Lisp, please contact
-;;; Scott Fahlman (FAHLMAN@CMUC). 
+;;; This code was written as part of the CMU Common Lisp project at
+;;; Carnegie Mellon University, and has been placed in the public domain.
+;;; If you want to use this code or any part of CMU Common Lisp, please contact
+;;; Scott Fahlman or slisp-group@cs.cmu.edu.
+;;;
+(ext:file-comment
+  "$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/sparc-vm.lisp,v 1.8 1991/02/08 13:35:51 ram Exp $")
+;;;
 ;;; **********************************************************************
 ;;;
-;;; $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/sparc-vm.lisp,v 1.7 1991/02/03 11:20:08 wlott Exp $
+;;; $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/sparc-vm.lisp,v 1.8 1991/02/08 13:35:51 ram Exp $
 ;;;
 ;;; This file contains the SPARC specific runtime stuff.
 ;;;
diff --git a/code/stream.lisp b/code/stream.lisp
index 613739717..359ae11ff 100644
--- a/code/stream.lisp
+++ b/code/stream.lisp
@@ -1,13 +1,17 @@
 ;;; -*- Log: code.log; Package: Lisp -*-
 ;;;
 ;;; **********************************************************************
-;;; This code was written as part of the Spice Lisp project at
-;;; Carnegie-Mellon University, and has been placed in the public domain.
-;;; If you want to use this code or any part of Spice Lisp, please contact
-;;; Scott Fahlman (FAHLMAN@CMUC). 
+;;; This code was written as part of the CMU Common Lisp project at
+;;; Carnegie Mellon University, and has been placed in the public domain.
+;;; If you want to use this code or any part of CMU Common Lisp, please contact
+;;; Scott Fahlman or slisp-group@cs.cmu.edu.
+;;;
+(ext:file-comment
+  "$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/stream.lisp,v 1.9 1991/02/08 13:35:53 ram Exp $")
+;;;
 ;;; **********************************************************************
 ;;;
-;;; $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/stream.lisp,v 1.8 1991/01/13 01:34:20 wlott Exp $
+;;; $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/stream.lisp,v 1.9 1991/02/08 13:35:53 ram Exp $
 ;;;
 ;;; Stream functions for Spice Lisp.
 ;;; Written by Skef Wholey and Rob MacLachlan.
diff --git a/code/string.lisp b/code/string.lisp
index 94b214e00..18205bff3 100644
--- a/code/string.lisp
+++ b/code/string.lisp
@@ -1,10 +1,14 @@
 ;;; -*- Log: code.log; Package: Lisp -*-
 ;;;
 ;;; **********************************************************************
-;;; This code was written as part of the Spice Lisp project at
-;;; Carnegie-Mellon University, and has been placed in the public domain.
-;;; If you want to use this code or any part of Spice Lisp, please contact
-;;; Scott Fahlman (FAHLMAN@CMUC). 
+;;; This code was written as part of the CMU Common Lisp project at
+;;; Carnegie Mellon University, and has been placed in the public domain.
+;;; If you want to use this code or any part of CMU Common Lisp, please contact
+;;; Scott Fahlman or slisp-group@cs.cmu.edu.
+;;;
+(ext:file-comment
+  "$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/string.lisp,v 1.3 1991/02/08 13:35:59 ram Exp $")
+;;;
 ;;; **********************************************************************
 ;;;
 ;;; Functions to implement strings for Spice Lisp
diff --git a/code/struct.lisp b/code/struct.lisp
index f6042f268..5424f48f2 100644
--- a/code/struct.lisp
+++ b/code/struct.lisp
@@ -1,10 +1,14 @@
 ;;; -*- Log: code.log; Package: Lisp -*-
 ;;;
 ;;; **********************************************************************
-;;; This code was written as part of the Spice Lisp project at
-;;; Carnegie-Mellon University, and has been placed in the public domain.
-;;; If you want to use this code or any part of Spice Lisp, please contact
-;;; Scott Fahlman (FAHLMAN@CMUC). 
+;;; This code was written as part of the CMU Common Lisp project at
+;;; Carnegie Mellon University, and has been placed in the public domain.
+;;; If you want to use this code or any part of CMU Common Lisp, please contact
+;;; Scott Fahlman or slisp-group@cs.cmu.edu.
+;;;
+(ext:file-comment
+  "$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/struct.lisp,v 1.8 1991/02/08 13:36:03 ram Exp $")
+;;;
 ;;; **********************************************************************
 ;;;
 ;;;    This file contains structure definitions that need to be compiled early
diff --git a/code/symbol.lisp b/code/symbol.lisp
index 0dddd5ecf..f276cf1c5 100644
--- a/code/symbol.lisp
+++ b/code/symbol.lisp
@@ -1,10 +1,14 @@
 ;;; -*- Log: code.log; Package: Lisp -*-
 ;;;;
 ;;; **********************************************************************
-;;; This code was written as part of the Spice Lisp project at
-;;; Carnegie-Mellon University, and has been placed in the public domain.
-;;; If you want to use this code or any part of Spice Lisp, please contact
-;;; Scott Fahlman (FAHLMAN@CMUC). 
+;;; This code was written as part of the CMU Common Lisp project at
+;;; Carnegie Mellon University, and has been placed in the public domain.
+;;; If you want to use this code or any part of CMU Common Lisp, please contact
+;;; Scott Fahlman or slisp-group@cs.cmu.edu.
+;;;
+(ext:file-comment
+  "$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/symbol.lisp,v 1.5 1991/02/08 13:36:05 ram Exp $")
+;;;
 ;;; **********************************************************************
 ;;;
 ;;; Symbol manipulating functions for Spice Lisp.
diff --git a/code/sysmacs.lisp b/code/sysmacs.lisp
index 9cee05b77..3ad3be797 100644
--- a/code/sysmacs.lisp
+++ b/code/sysmacs.lisp
@@ -1,10 +1,14 @@
 ;;; -*- Mode: Lisp; Package: Lisp; Log: code.log -*-
 ;;;
 ;;; **********************************************************************
-;;; This code was written as part of the Spice Lisp project at
-;;; Carnegie-Mellon University, and has been placed in the public domain.
-;;; If you want to use this code or any part of Spice Lisp, please contact
-;;; Scott Fahlman (FAHLMAN@CMUC). 
+;;; This code was written as part of the CMU Common Lisp project at
+;;; Carnegie Mellon University, and has been placed in the public domain.
+;;; If you want to use this code or any part of CMU Common Lisp, please contact
+;;; Scott Fahlman or slisp-group@cs.cmu.edu.
+;;;
+(ext:file-comment
+  "$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/sysmacs.lisp,v 1.7 1991/02/08 13:36:22 ram Exp $")
+;;;
 ;;; **********************************************************************
 ;;;
 ;;;    Miscellaneous system hacking macros.
diff --git a/code/time.lisp b/code/time.lisp
index 815d46edf..5d60c1b7e 100644
--- a/code/time.lisp
+++ b/code/time.lisp
@@ -1,10 +1,14 @@
 ;;; -*- Mode: Lisp; Package: Lisp; Log: code.log -*-
 ;;;
 ;;; **********************************************************************
-;;; This code was written as part of the Spice Lisp project at
-;;; Carnegie-Mellon University, and has been placed in the public domain.
-;;; If you want to use this code or any part of Spice Lisp, please contact
-;;; Scott Fahlman (FAHLMAN@CMUC). 
+;;; This code was written as part of the CMU Common Lisp project at
+;;; Carnegie Mellon University, and has been placed in the public domain.
+;;; If you want to use this code or any part of CMU Common Lisp, please contact
+;;; Scott Fahlman or slisp-group@cs.cmu.edu.
+;;;
+(ext:file-comment
+  "$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/time.lisp,v 1.6 1991/02/08 13:36:25 ram Exp $")
+;;;
 ;;; **********************************************************************
 ;;;
 ;;;    This file contains the definitions for the Spice Lisp time functions.
diff --git a/code/tty-inspect.lisp b/code/tty-inspect.lisp
index 7c39e3376..bd0d52b3a 100644
--- a/code/tty-inspect.lisp
+++ b/code/tty-inspect.lisp
@@ -1,10 +1,14 @@
 ;;; -*- Log: code.log; Package: inspect -*-
 ;;;
 ;;; **********************************************************************
-;;; This code was written as part of the Spice Lisp project at
-;;; Carnegie-Mellon University, and has been placed in the public domain.
-;;; If you want to use this code or any part of Spice Lisp, please contact
-;;; Scott Fahlman (FAHLMAN@CMUC). 
+;;; This code was written as part of the CMU Common Lisp project at
+;;; Carnegie Mellon University, and has been placed in the public domain.
+;;; If you want to use this code or any part of CMU Common Lisp, please contact
+;;; Scott Fahlman or slisp-group@cs.cmu.edu.
+;;;
+(ext:file-comment
+  "$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/tty-inspect.lisp,v 1.7 1991/02/08 13:36:32 ram Exp $")
+;;;
 ;;; **********************************************************************
 ;;;
 ;;; Tty interface for INSPECT.
diff --git a/code/type-boot.lisp b/code/type-boot.lisp
index 5d8980053..4c632dd71 100644
--- a/code/type-boot.lisp
+++ b/code/type-boot.lisp
@@ -1,10 +1,14 @@
 ;;; -*- Log: code.log; Package: C -*-
 ;;;
 ;;; **********************************************************************
-;;; This code was written as part of the Spice Lisp project at
-;;; Carnegie-Mellon University, and has been placed in the public domain.
-;;; If you want to use this code or any part of Spice Lisp, please contact
-;;; Scott Fahlman (FAHLMAN@CMUC). 
+;;; This code was written as part of the CMU Common Lisp project at
+;;; Carnegie Mellon University, and has been placed in the public domain.
+;;; If you want to use this code or any part of CMU Common Lisp, please contact
+;;; Scott Fahlman or slisp-group@cs.cmu.edu.
+;;;
+(ext:file-comment
+  "$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/type-boot.lisp,v 1.6 1991/02/08 13:36:35 ram Exp $")
+;;;
 ;;; **********************************************************************
 ;;;
 ;;;    Some initialization hacks that we need to get the type system started up
diff --git a/code/vm.lisp b/code/vm.lisp
index 901307a16..b424e782b 100644
--- a/code/vm.lisp
+++ b/code/vm.lisp
@@ -1,13 +1,17 @@
 ;;; -*- Log: code.log; Package: MACH -*-
 ;;;
 ;;; **********************************************************************
-;;; This code was written as part of the Spice Lisp project at
-;;; Carnegie-Mellon University, and has been placed in the public domain.
-;;; If you want to use this code or any part of Spice Lisp, please contact
-;;; Scott Fahlman (FAHLMAN@CMUC). 
+;;; This code was written as part of the CMU Common Lisp project at
+;;; Carnegie Mellon University, and has been placed in the public domain.
+;;; If you want to use this code or any part of CMU Common Lisp, please contact
+;;; Scott Fahlman or slisp-group@cs.cmu.edu.
+;;;
+(ext:file-comment
+  "$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/vm.lisp,v 1.2 1991/02/08 13:36:37 ram Exp $")
+;;;
 ;;; **********************************************************************
 ;;;
-;;; $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/vm.lisp,v 1.1 1990/10/13 16:01:42 wlott Exp $
+;;; $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/vm.lisp,v 1.2 1991/02/08 13:36:37 ram Exp $
 ;;;
 ;;; This file contains stubs for interfacing MACH's vm primitives.
 ;;;
diff --git a/code/weak.lisp b/code/weak.lisp
index 0eec447c1..67e86647e 100644
--- a/code/weak.lisp
+++ b/code/weak.lisp
@@ -1,13 +1,17 @@
 ;;; -*- Mode: Lisp; Package: EXTENSIONS; Log: code.log -*-
 ;;;
 ;;; **********************************************************************
-;;; This code was written as part of the Spice Lisp project at
-;;; Carnegie-Mellon University, and has been placed in the public domain.
-;;; If you want to use this code or any part of Spice Lisp, please contact
-;;; Scott Fahlman (Scott.Fahlman@CS.CMU.EDU). 
+;;; This code was written as part of the CMU Common Lisp project at
+;;; Carnegie Mellon University, and has been placed in the public domain.
+;;; If you want to use this code or any part of CMU Common Lisp, please contact
+;;; Scott Fahlman or slisp-group@cs.cmu.edu.
+;;;
+(ext:file-comment
+  "$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/weak.lisp,v 1.2 1991/02/08 13:36:39 ram Exp $")
+;;;
 ;;; **********************************************************************
 ;;;
-;;; $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/weak.lisp,v 1.1 1990/06/04 18:51:21 ch Exp $
+;;; $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/weak.lisp,v 1.2 1991/02/08 13:36:39 ram Exp $
 ;;;
 ;;; Weak Pointer Support.
 ;;;
diff --git a/code/wire.lisp b/code/wire.lisp
index e65614bbe..d47ee55d6 100644
--- a/code/wire.lisp
+++ b/code/wire.lisp
@@ -1,10 +1,14 @@
 ;;; -*- Log: code.log; Package: wire -*-
 ;;;
 ;;; **********************************************************************
-;;; This code was written as part of the Spice Lisp project at
-;;; Carnegie-Mellon University, and has been placed in the public domain.
-;;; If you want to use this code or any part of Spice Lisp, please contact
-;;; Scott Fahlman (FAHLMAN@CMUC). 
+;;; This code was written as part of the CMU Common Lisp project at
+;;; Carnegie Mellon University, and has been placed in the public domain.
+;;; If you want to use this code or any part of CMU Common Lisp, please contact
+;;; Scott Fahlman or slisp-group@cs.cmu.edu.
+;;;
+(ext:file-comment
+  "$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/wire.lisp,v 1.3 1991/02/08 13:36:40 ram Exp $")
+;;;
 ;;; **********************************************************************
 ;;;
 ;;; This file contains an interface to internet domain sockets.
diff --git a/tools/worldcom.lisp b/tools/worldcom.lisp
index d62a2c1da..745a857a2 100644
--- a/tools/worldcom.lisp
+++ b/tools/worldcom.lisp
@@ -1,11 +1,14 @@
 ;;; -*- Package: User; Log: code.log -*-
 ;;;
 ;;; **********************************************************************
-;;; This code was written as part of the Spice Lisp project at
-;;; Carnegie-Mellon University, and has been placed in the public domain.
-;;; Spice Lisp is currently incomplete and under active development.
-;;; If you want to use this code or any part of Spice Lisp, please contact
-;;; Scott Fahlman (FAHLMAN@CMUC). 
+;;; This code was written as part of the CMU Common Lisp project at
+;;; Carnegie Mellon University, and has been placed in the public domain.
+;;; If you want to use this code or any part of CMU Common Lisp, please contact
+;;; Scott Fahlman or slisp-group@cs.cmu.edu.
+;;;
+(ext:file-comment
+  "$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/tools/worldcom.lisp,v 1.14 1991/02/08 13:36:47 ram Exp $")
+;;;
 ;;; **********************************************************************
 
 (in-package "USER")
diff --git a/tools/worldload.lisp b/tools/worldload.lisp
index d561d3c44..e89809e70 100644
--- a/tools/worldload.lisp
+++ b/tools/worldload.lisp
@@ -1,11 +1,14 @@
 ;;; -*- Mode: Lisp; Package: Lisp; Log: code.log -*-
 ;;;
 ;;; **********************************************************************
-;;; This code was written as part of the Spice Lisp project at
-;;; Carnegie-Mellon University, and has been placed in the public domain.
-;;; Spice Lisp is currently incomplete and under active development.
-;;; If you want to use this code or any part of Spice Lisp, please contact
-;;; Scott Fahlman (FAHLMAN@CMUC). 
+;;; This code was written as part of the CMU Common Lisp project at
+;;; Carnegie Mellon University, and has been placed in the public domain.
+;;; If you want to use this code or any part of CMU Common Lisp, please contact
+;;; Scott Fahlman or slisp-group@cs.cmu.edu.
+;;;
+(ext:file-comment
+  "$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/tools/worldload.lisp,v 1.19 1991/02/08 13:36:49 ram Exp $")
+;;;
 ;;; **********************************************************************
 ;;;
 ;;; This file loads the parts of the system that aren't cold loaded and saves
-- 
GitLab