From da6761e0160f7dbfdeb1619a5b51009d40ecf6b6 Mon Sep 17 00:00:00 2001 From: ram <ram> Date: Wed, 20 Feb 1991 15:00:22 +0000 Subject: [PATCH] New file header with RCS stuff. --- compiler/aliencomp.lisp | 13 ++++++++----- compiler/alloc.lisp | 12 ++++++++---- compiler/array-tran.lisp | 14 +++++++++----- compiler/backend.lisp | 12 ++++++++---- compiler/bit-util.lisp | 12 ++++++++---- compiler/checkgen.lisp | 12 ++++++++---- compiler/codegen.lisp | 12 ++++++++---- compiler/constraint.lisp | 12 ++++++++---- compiler/control.lisp | 12 ++++++++---- compiler/copyprop.lisp | 12 ++++++++---- compiler/ctype.lisp | 12 ++++++++---- compiler/debug-dump.lisp | 12 ++++++++---- compiler/debug.lisp | 14 +++++++++----- compiler/dfo.lisp | 12 ++++++++---- compiler/dump.lisp | 14 +++++++++----- compiler/dyncount.lisp | 12 ++++++++---- compiler/entry.lisp | 12 ++++++++---- compiler/envanal.lisp | 12 ++++++++---- compiler/eval-comp.lisp | 12 ++++++++---- compiler/eval.lisp | 14 +++++++++----- compiler/float-tran.lisp | 14 +++++++++----- compiler/fndb.lisp | 14 +++++++++----- compiler/globaldb.lisp | 14 +++++++++----- compiler/gtn.lisp | 12 ++++++++---- compiler/ir1final.lisp | 12 ++++++++---- compiler/ir1opt.lisp | 12 ++++++++---- compiler/ir1tran.lisp | 12 ++++++++---- compiler/ir1util.lisp | 12 ++++++++---- compiler/ir2tran.lisp | 14 +++++++++----- compiler/knownfun.lisp | 12 ++++++++---- compiler/life.lisp | 12 ++++++++---- compiler/locall.lisp | 12 ++++++++---- compiler/ltn.lisp | 12 ++++++++---- compiler/macros.lisp | 12 ++++++++---- compiler/main.lisp | 12 ++++++++---- compiler/node.lisp | 12 ++++++++---- compiler/pack.lisp | 12 ++++++++---- compiler/proclaim.lisp | 12 ++++++++---- compiler/pseudo-vops.lisp | 12 ++++++++---- compiler/represent.lisp | 12 ++++++++---- compiler/seqtran.lisp | 14 +++++++++----- compiler/srctran.lisp | 14 +++++++++----- compiler/sset.lisp | 12 ++++++++---- compiler/stack.lisp | 12 ++++++++---- compiler/statcount.lisp | 14 +++++++++----- compiler/tn.lisp | 12 ++++++++---- compiler/typetran.lisp | 14 +++++++++----- compiler/vmdef.lisp | 12 ++++++++---- compiler/vop.lisp | 12 ++++++++---- 49 files changed, 404 insertions(+), 209 deletions(-) diff --git a/compiler/aliencomp.lisp b/compiler/aliencomp.lisp index a0417ed46..dc594b0e5 100644 --- a/compiler/aliencomp.lisp +++ b/compiler/aliencomp.lisp @@ -1,11 +1,14 @@ ;;; -*- Log: C.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. -;;; 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/compiler/aliencomp.lisp,v 1.11 1991/02/20 14:56:21 ram Exp $") +;;; ;;; ********************************************************************** ;;; ;;; This file contains transforms and other stuff used to compile Alien diff --git a/compiler/alloc.lisp b/compiler/alloc.lisp index a76937cb6..bb9915ed8 100644 --- a/compiler/alloc.lisp +++ b/compiler/alloc.lisp @@ -1,10 +1,14 @@ ;;; -*- Package: C; 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/compiler/alloc.lisp,v 1.8 1991/02/20 14:56:27 ram Exp $") +;;; ;;; ********************************************************************** ;;; ;;; Some storage allocation hacks for the compiler. diff --git a/compiler/array-tran.lisp b/compiler/array-tran.lisp index 3af77f3a4..af55bb161 100644 --- a/compiler/array-tran.lisp +++ b/compiler/array-tran.lisp @@ -1,13 +1,17 @@ ;;; -*- Package: C; 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/compiler/array-tran.lisp,v 1.9 1991/02/20 14:56:29 ram Exp $") +;;; ;;; ********************************************************************** ;;; -;;; $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/compiler/array-tran.lisp,v 1.8 1991/01/14 10:52:45 ram Exp $ +;;; $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/compiler/array-tran.lisp,v 1.9 1991/02/20 14:56:29 ram Exp $ ;;; ;;; This file contains array specific optimizers and transforms. ;;; diff --git a/compiler/backend.lisp b/compiler/backend.lisp index cdd24f0de..07587cbca 100644 --- a/compiler/backend.lisp +++ b/compiler/backend.lisp @@ -1,10 +1,14 @@ ;;; -*- Package: C; 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/compiler/backend.lisp,v 1.13 1991/02/20 14:56:39 ram Exp $") +;;; ;;; ********************************************************************** ;;; ;;; This file isolates all the backend specific data so that we can compile diff --git a/compiler/bit-util.lisp b/compiler/bit-util.lisp index 09d4bd83a..1536c9715 100644 --- a/compiler/bit-util.lisp +++ b/compiler/bit-util.lisp @@ -1,10 +1,14 @@ ;;; -*- Package: C; 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/compiler/bit-util.lisp,v 1.4 1991/02/20 14:56:42 ram Exp $") +;;; ;;; ********************************************************************** ;;; ;;; Bit-vector hacking utilities, potentially implementation-dependent for diff --git a/compiler/checkgen.lisp b/compiler/checkgen.lisp index b006629fa..53617634c 100644 --- a/compiler/checkgen.lisp +++ b/compiler/checkgen.lisp @@ -1,10 +1,14 @@ ;;; -*- Package: C; 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/compiler/checkgen.lisp,v 1.17 1991/02/20 14:56:43 ram Exp $") +;;; ;;; ********************************************************************** ;;; ;;; This file implements type check generation. This is a phase that runs diff --git a/compiler/codegen.lisp b/compiler/codegen.lisp index 620266d93..cc4e8e6fa 100644 --- a/compiler/codegen.lisp +++ b/compiler/codegen.lisp @@ -1,10 +1,14 @@ ;;; -*- Package: C; 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/compiler/codegen.lisp,v 1.12 1991/02/20 14:56:45 ram Exp $") +;;; ;;; ********************************************************************** ;;; ;;; The implementation-independent parts of the code generator. We use diff --git a/compiler/constraint.lisp b/compiler/constraint.lisp index 506433347..ef66a55b0 100644 --- a/compiler/constraint.lisp +++ b/compiler/constraint.lisp @@ -1,10 +1,14 @@ ;;; -*- Package: C; 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/compiler/constraint.lisp,v 1.10 1991/02/20 14:56:51 ram Exp $") +;;; ;;; ********************************************************************** ;;; ;;; This file implements the constraint propagation phase of the compiler, diff --git a/compiler/control.lisp b/compiler/control.lisp index 354dda652..12a15fb3f 100644 --- a/compiler/control.lisp +++ b/compiler/control.lisp @@ -1,10 +1,14 @@ ;;; -*- Package: C; 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/compiler/control.lisp,v 1.5 1991/02/20 14:56:54 ram Exp $") +;;; ;;; ********************************************************************** ;;; ;;; The control analysis pass in the compiler. This pass determines the diff --git a/compiler/copyprop.lisp b/compiler/copyprop.lisp index 19d9b2ca6..fa7d27055 100644 --- a/compiler/copyprop.lisp +++ b/compiler/copyprop.lisp @@ -1,10 +1,14 @@ ;;; -*- Package: C; 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/compiler/copyprop.lisp,v 1.6 1991/02/20 14:56:55 ram Exp $") +;;; ;;; ********************************************************************** ;;; ;;; This file implements the copy propagation phase of the compiler, diff --git a/compiler/ctype.lisp b/compiler/ctype.lisp index 292884588..87f497ff8 100644 --- a/compiler/ctype.lisp +++ b/compiler/ctype.lisp @@ -1,10 +1,14 @@ ;;; -*- Package: C; 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/compiler/ctype.lisp,v 1.16 1991/02/20 14:56:57 ram Exp $") +;;; ;;; ********************************************************************** ;;; ;;; This file contains code which knows about both the type representation diff --git a/compiler/debug-dump.lisp b/compiler/debug-dump.lisp index 5ad007303..3e4a6abe7 100644 --- a/compiler/debug-dump.lisp +++ b/compiler/debug-dump.lisp @@ -1,10 +1,14 @@ ;;; -*- Package: C; 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/compiler/debug-dump.lisp,v 1.21 1991/02/20 14:57:00 ram Exp $") +;;; ;;; ********************************************************************** ;;; ;;; This file contains stuff that creates debugger information from the diff --git a/compiler/debug.lisp b/compiler/debug.lisp index 9081885e3..9c23696ab 100644 --- a/compiler/debug.lisp +++ b/compiler/debug.lisp @@ -1,13 +1,17 @@ ;;; -*- Package: C; 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/compiler/debug.lisp,v 1.14 1991/02/20 14:57:04 ram Exp $") +;;; ;;; ********************************************************************** ;;; -;;; $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/compiler/debug.lisp,v 1.13 1990/08/24 18:35:02 wlott Exp $ +;;; $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/compiler/debug.lisp,v 1.14 1991/02/20 14:57:04 ram Exp $ ;;; ;;; Utilities for debugging the compiler. Currently contains only stuff for ;;; checking the consistency of the IR1. diff --git a/compiler/dfo.lisp b/compiler/dfo.lisp index 48946b2e6..b2330d411 100644 --- a/compiler/dfo.lisp +++ b/compiler/dfo.lisp @@ -1,10 +1,14 @@ ;;; -*- Package: C; 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/compiler/dfo.lisp,v 1.10 1991/02/20 14:57:08 ram Exp $") +;;; ;;; ********************************************************************** ;;; ;;; This file contains the code that finds the initial components and DFO, diff --git a/compiler/dump.lisp b/compiler/dump.lisp index 17fa5d1c9..728fa4e62 100644 --- a/compiler/dump.lisp +++ b/compiler/dump.lisp @@ -1,13 +1,17 @@ ;;; -*- Package: C; 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/compiler/dump.lisp,v 1.32 1991/02/20 14:57:10 ram Exp $") +;;; ;;; ********************************************************************** ;;; -;;; $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/compiler/dump.lisp,v 1.31 1991/02/11 16:16:33 ram Exp $ +;;; $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/compiler/dump.lisp,v 1.32 1991/02/20 14:57:10 ram Exp $ ;;; ;;; This file contains stuff that knows about dumping FASL files. ;;; diff --git a/compiler/dyncount.lisp b/compiler/dyncount.lisp index c22853cb9..35b6da329 100644 --- a/compiler/dyncount.lisp +++ b/compiler/dyncount.lisp @@ -1,10 +1,14 @@ ;;; -*- Package: C; 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/compiler/dyncount.lisp,v 1.3 1991/02/20 14:57:14 ram Exp $") +;;; ;;; ********************************************************************** ;;; ;;; This file contains support for collecting dynamic vop statistics. diff --git a/compiler/entry.lisp b/compiler/entry.lisp index 44fc6cbe4..bafde3409 100644 --- a/compiler/entry.lisp +++ b/compiler/entry.lisp @@ -1,10 +1,14 @@ ;;; -*- Package: C; 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/compiler/entry.lisp,v 1.8 1991/02/20 14:57:16 ram Exp $") +;;; ;;; ********************************************************************** ;;; ;;; Code in this file handles VM-independent details of run-time diff --git a/compiler/envanal.lisp b/compiler/envanal.lisp index 8d71fef18..307e6f390 100644 --- a/compiler/envanal.lisp +++ b/compiler/envanal.lisp @@ -1,10 +1,14 @@ ;;; -*- Package: C; 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/compiler/envanal.lisp,v 1.12 1991/02/20 14:57:17 ram Exp $") +;;; ;;; ********************************************************************** ;;; ;;; The environment analysis phase for the compiler. This phase annotates diff --git a/compiler/eval-comp.lisp b/compiler/eval-comp.lisp index 72e5cf644..0bb1c3661 100644 --- a/compiler/eval-comp.lisp +++ b/compiler/eval-comp.lisp @@ -1,10 +1,14 @@ ;;; -*- Package: C; 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/compiler/eval-comp.lisp,v 1.17 1991/02/20 14:57:19 ram Exp $") +;;; ;;; ********************************************************************** ;;; ;;; This file represents the current state of on-going development on compiler diff --git a/compiler/eval.lisp b/compiler/eval.lisp index aee5953b3..ad07b0c05 100644 --- a/compiler/eval.lisp +++ b/compiler/eval.lisp @@ -1,13 +1,17 @@ ;;; -*- Package: eval; 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/compiler/eval.lisp,v 1.16 1991/02/20 14:57:25 ram Exp $") +;;; ;;; ********************************************************************** ;;; -;;; $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/compiler/eval.lisp,v 1.15 1990/11/23 18:13:32 wlott Exp $ +;;; $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/compiler/eval.lisp,v 1.16 1991/02/20 14:57:25 ram Exp $ ;;; ;;; This file contains the interpreter. We first convert to the compiler's ;;; IR1 and interpret that. diff --git a/compiler/float-tran.lisp b/compiler/float-tran.lisp index 27ac8c663..ccdf1e568 100644 --- a/compiler/float-tran.lisp +++ b/compiler/float-tran.lisp @@ -1,13 +1,17 @@ ;;; -*- Mode: Lisp; Package: C; 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/compiler/float-tran.lisp,v 1.11 1991/02/20 14:57:29 ram Exp $") +;;; ;;; ********************************************************************** ;;; -;;; $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/compiler/float-tran.lisp,v 1.10 1991/01/02 19:13:58 ram Exp $ +;;; $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/compiler/float-tran.lisp,v 1.11 1991/02/20 14:57:29 ram Exp $ ;;; ;;; This file contains floating-point specific transforms, and may be somewhat ;;; implementation dependent in its assumptions of what the formats are. diff --git a/compiler/fndb.lisp b/compiler/fndb.lisp index 8d9002aae..707c05609 100644 --- a/compiler/fndb.lisp +++ b/compiler/fndb.lisp @@ -1,13 +1,17 @@ ;;; -*- Package: C; 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/compiler/fndb.lisp,v 1.18 1991/02/20 14:57:31 ram Exp $") +;;; ;;; ********************************************************************** ;;; -;;; $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/compiler/fndb.lisp,v 1.17 1991/02/14 20:43:41 ram Exp $ +;;; $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/compiler/fndb.lisp,v 1.18 1991/02/20 14:57:31 ram Exp $ ;;; ;;; This file defines all the standard functions to be known functions. ;;; Each function has type and side-effect information, and may also have IR1 diff --git a/compiler/globaldb.lisp b/compiler/globaldb.lisp index 5c4b06ce3..6ea753d29 100644 --- a/compiler/globaldb.lisp +++ b/compiler/globaldb.lisp @@ -1,13 +1,17 @@ ;;; -*- Package: C; 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/compiler/globaldb.lisp,v 1.18 1991/02/20 14:57:37 ram Exp $") +;;; ;;; ********************************************************************** ;;; -;;; $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/compiler/globaldb.lisp,v 1.17 1991/01/30 01:23:35 ram Exp $ +;;; $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/compiler/globaldb.lisp,v 1.18 1991/02/20 14:57:37 ram Exp $ ;;; ;;; This file provides a functional interface to global information about ;;; named things in the system. Information is considered to be global if it diff --git a/compiler/gtn.lisp b/compiler/gtn.lisp index f800ff684..ab3c7ba04 100644 --- a/compiler/gtn.lisp +++ b/compiler/gtn.lisp @@ -1,10 +1,14 @@ ;;; -*- Package: C; 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/compiler/gtn.lisp,v 1.10 1991/02/20 14:57:46 ram Exp $") +;;; ;;; ********************************************************************** ;;; ;;; This file contains the GTN pass in the compiler. GTN allocates the TNs diff --git a/compiler/ir1final.lisp b/compiler/ir1final.lisp index 1dbe66f76..9dda94c72 100644 --- a/compiler/ir1final.lisp +++ b/compiler/ir1final.lisp @@ -1,10 +1,14 @@ ;;; -*- Package: C; 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/compiler/ir1final.lisp,v 1.9 1991/02/20 14:57:48 ram Exp $") +;;; ;;; ********************************************************************** ;;; ;;; This file implements the IR1 finalize phase, which checks for various diff --git a/compiler/ir1opt.lisp b/compiler/ir1opt.lisp index 3de7dbe3f..2db37e59e 100644 --- a/compiler/ir1opt.lisp +++ b/compiler/ir1opt.lisp @@ -1,10 +1,14 @@ ;;; -*- Package: C; 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/compiler/ir1opt.lisp,v 1.24 1991/02/20 14:57:49 ram Exp $") +;;; ;;; ********************************************************************** ;;; ;;; This file implements the IR1 optimization phase of the compiler. IR1 diff --git a/compiler/ir1tran.lisp b/compiler/ir1tran.lisp index e397097a3..e3da0f853 100644 --- a/compiler/ir1tran.lisp +++ b/compiler/ir1tran.lisp @@ -1,10 +1,14 @@ ;;; -*- Package: C; 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/compiler/ir1tran.lisp,v 1.36 1991/02/20 14:57:53 ram Exp $") +;;; ;;; ********************************************************************** ;;; ;;; This file contains code which does the translation from Lisp code to the diff --git a/compiler/ir1util.lisp b/compiler/ir1util.lisp index 0cf495bb2..b22d7a551 100644 --- a/compiler/ir1util.lisp +++ b/compiler/ir1util.lisp @@ -1,10 +1,14 @@ ;;; -*- Package: C; 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/compiler/ir1util.lisp,v 1.30 1991/02/20 14:58:06 ram Exp $") +;;; ;;; ********************************************************************** ;;; ;;; This file contains random utilities used for manipulating the IR1 diff --git a/compiler/ir2tran.lisp b/compiler/ir2tran.lisp index 5efcc7ecc..eb60143a6 100644 --- a/compiler/ir2tran.lisp +++ b/compiler/ir2tran.lisp @@ -1,13 +1,17 @@ ;;; -*- Package: C; 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/compiler/ir2tran.lisp,v 1.28 1991/02/20 14:58:11 ram Exp $") +;;; ;;; ********************************************************************** ;;; -;;; $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/compiler/ir2tran.lisp,v 1.27 1990/12/28 16:52:31 ram Exp $ +;;; $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/compiler/ir2tran.lisp,v 1.28 1991/02/20 14:58:11 ram Exp $ ;;; ;;; This file contains the virtual machine independent parts of the code ;;; which does the actual translation of nodes to VOPs. diff --git a/compiler/knownfun.lisp b/compiler/knownfun.lisp index 3467aff7e..8940a7569 100644 --- a/compiler/knownfun.lisp +++ b/compiler/knownfun.lisp @@ -1,10 +1,14 @@ ;;; -*- Package: C; 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/compiler/knownfun.lisp,v 1.7 1991/02/20 14:58:18 ram Exp $") +;;; ;;; ********************************************************************** ;;; ;;; This file contains stuff for maintaining a database of special diff --git a/compiler/life.lisp b/compiler/life.lisp index 0fe5d88d4..83fd89045 100644 --- a/compiler/life.lisp +++ b/compiler/life.lisp @@ -1,10 +1,14 @@ ;;; -*- Package: C; 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/compiler/life.lisp,v 1.19 1991/02/20 14:58:23 ram Exp $") +;;; ;;; ********************************************************************** ;;; ;;; This file contains the lifetime analysis phase in the compiler. diff --git a/compiler/locall.lisp b/compiler/locall.lisp index 427e39330..cc33c41d8 100644 --- a/compiler/locall.lisp +++ b/compiler/locall.lisp @@ -1,10 +1,14 @@ ;;; -*- Package: C; 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/compiler/locall.lisp,v 1.15 1991/02/20 14:58:29 ram Exp $") +;;; ;;; ********************************************************************** ;;; ;;; This file implements local call analysis. A local call is a function diff --git a/compiler/ltn.lisp b/compiler/ltn.lisp index 13d2572eb..18bdd9140 100644 --- a/compiler/ltn.lisp +++ b/compiler/ltn.lisp @@ -1,10 +1,14 @@ ;;; -*- Package: C; 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/compiler/ltn.lisp,v 1.21 1991/02/20 14:58:34 ram Exp $") +;;; ;;; ********************************************************************** ;;; ;;; This file contains the LTN pass in the compiler. LTN allocates diff --git a/compiler/macros.lisp b/compiler/macros.lisp index 5e4102b56..c0c5ffd1a 100644 --- a/compiler/macros.lisp +++ b/compiler/macros.lisp @@ -1,10 +1,14 @@ ;;; -*- Package: C; 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/compiler/macros.lisp,v 1.23 1991/02/20 14:58:39 ram Exp $") +;;; ;;; ********************************************************************** ;;; ;;; Random types and macros used in writing the compiler. diff --git a/compiler/main.lisp b/compiler/main.lisp index 90cde7a70..e49d849b2 100644 --- a/compiler/main.lisp +++ b/compiler/main.lisp @@ -1,10 +1,14 @@ ;;; -*- Package: C; 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/compiler/main.lisp,v 1.30 1991/02/20 14:58:42 ram Exp $") +;;; ;;; ********************************************************************** ;;; ;;; This file contains the top-level interfaces to the compiler. diff --git a/compiler/node.lisp b/compiler/node.lisp index dce9d75ff..1d3257c63 100644 --- a/compiler/node.lisp +++ b/compiler/node.lisp @@ -1,10 +1,14 @@ ;;; -*- Package: C; 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/compiler/node.lisp,v 1.15 1991/02/20 14:58:47 ram Exp $") +;;; ;;; ********************************************************************** ;;; ;;; Structures for the first intermediate representation in the compiler, diff --git a/compiler/pack.lisp b/compiler/pack.lisp index 0c2f0231c..9809f1977 100644 --- a/compiler/pack.lisp +++ b/compiler/pack.lisp @@ -1,10 +1,14 @@ ;;; -*- Package: C; 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/compiler/pack.lisp,v 1.29 1991/02/20 14:58:51 ram Exp $") +;;; ;;; ********************************************************************** ;;; ;;; This file contains the implementation independent code for Pack phase in diff --git a/compiler/proclaim.lisp b/compiler/proclaim.lisp index 33352f3d8..bcc4546f7 100644 --- a/compiler/proclaim.lisp +++ b/compiler/proclaim.lisp @@ -1,10 +1,14 @@ ;;; -*- Package: C; 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/compiler/proclaim.lisp,v 1.15 1991/02/20 14:59:27 ram Exp $") +;;; ;;; ********************************************************************** ;;; ;;; This file contains load-time support for declaration processing. It is diff --git a/compiler/pseudo-vops.lisp b/compiler/pseudo-vops.lisp index 023a064b9..8d9266423 100644 --- a/compiler/pseudo-vops.lisp +++ b/compiler/pseudo-vops.lisp @@ -1,10 +1,14 @@ ;;; -*- Package: C; 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/compiler/pseudo-vops.lisp,v 1.5 1991/02/20 14:59:31 ram Exp $") +;;; ;;; ********************************************************************** ;;; ;;; This file contains definitions of VOPs used as internal markers by the diff --git a/compiler/represent.lisp b/compiler/represent.lisp index 79c2b8c43..639c15bac 100644 --- a/compiler/represent.lisp +++ b/compiler/represent.lisp @@ -1,10 +1,14 @@ ;;; -*- Package: C; 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/compiler/represent.lisp,v 1.22 1991/02/20 14:59:32 ram Exp $") +;;; ;;; ********************************************************************** ;;; ;;; This file contains the implementation independent code for the diff --git a/compiler/seqtran.lisp b/compiler/seqtran.lisp index 78231bf54..257c248bd 100644 --- a/compiler/seqtran.lisp +++ b/compiler/seqtran.lisp @@ -1,13 +1,17 @@ ;;; -*- Package: C; 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/compiler/seqtran.lisp,v 1.11 1991/02/20 14:59:36 ram Exp $") +;;; ;;; ********************************************************************** ;;; -;;; $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/compiler/seqtran.lisp,v 1.10 1990/10/09 14:21:38 ram Exp $ +;;; $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/compiler/seqtran.lisp,v 1.11 1991/02/20 14:59:36 ram Exp $ ;;; ;;; This file contains optimizers for list and sequence functions. ;;; diff --git a/compiler/srctran.lisp b/compiler/srctran.lisp index dd8d6e7f1..417214ef5 100644 --- a/compiler/srctran.lisp +++ b/compiler/srctran.lisp @@ -1,13 +1,17 @@ ;;; -*- Package: C; 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/compiler/srctran.lisp,v 1.27 1991/02/20 14:59:43 ram Exp $") +;;; ;;; ********************************************************************** ;;; -;;; $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/compiler/srctran.lisp,v 1.26 1991/01/30 23:21:37 ram Exp $ +;;; $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/compiler/srctran.lisp,v 1.27 1991/02/20 14:59:43 ram Exp $ ;;; ;;; This file contains macro-like source transformations which convert ;;; uses of certain functions into the canonical form desired within the diff --git a/compiler/sset.lisp b/compiler/sset.lisp index a79d3c8f2..fb9bc00d2 100644 --- a/compiler/sset.lisp +++ b/compiler/sset.lisp @@ -1,10 +1,14 @@ ;;; -*- Package: C; 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/compiler/sset.lisp,v 1.4 1991/02/20 14:59:48 ram Exp $") +;;; ;;; ********************************************************************** ;;; ;;; A sparse set abstraction, implemented as a sorted linked list. We don't diff --git a/compiler/stack.lisp b/compiler/stack.lisp index edd10adce..e220be595 100644 --- a/compiler/stack.lisp +++ b/compiler/stack.lisp @@ -1,10 +1,14 @@ ;;; -*- Package: C; 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/compiler/stack.lisp,v 1.4 1991/02/20 14:59:49 ram Exp $") +;;; ;;; ********************************************************************** ;;; ;;; The stack analysis phase in the compiler. We do a graph walk to diff --git a/compiler/statcount.lisp b/compiler/statcount.lisp index 41e4664ab..7c7d8fe94 100644 --- a/compiler/statcount.lisp +++ b/compiler/statcount.lisp @@ -1,13 +1,17 @@ ;;; -*- Package: C; 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/compiler/statcount.lisp,v 1.2 1991/02/20 14:59:51 ram Exp $") +;;; ;;; ********************************************************************** ;;; -;;; $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/compiler/statcount.lisp,v 1.1 1990/12/11 15:23:59 wlott Exp $ +;;; $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/compiler/statcount.lisp,v 1.2 1991/02/20 14:59:51 ram Exp $ ;;; ;;; Functions and utilities for collecting statistics on static vop usages. ;;; diff --git a/compiler/tn.lisp b/compiler/tn.lisp index bea420de1..fdfeb267b 100644 --- a/compiler/tn.lisp +++ b/compiler/tn.lisp @@ -1,10 +1,14 @@ ;;; -*- Package: C; 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/compiler/tn.lisp,v 1.12 1991/02/20 14:59:52 ram Exp $") +;;; ;;; ********************************************************************** ;;; ;;; This file contains utilities used for creating and manipulating TNs, and diff --git a/compiler/typetran.lisp b/compiler/typetran.lisp index e94906c5a..edbd9b92b 100644 --- a/compiler/typetran.lisp +++ b/compiler/typetran.lisp @@ -1,13 +1,17 @@ ;;; -*- Package: C; 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/compiler/typetran.lisp,v 1.10 1991/02/20 15:00:12 ram Exp $") +;;; ;;; ********************************************************************** ;;; -;;; $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/compiler/typetran.lisp,v 1.9 1991/01/03 15:02:09 ram Exp $ +;;; $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/compiler/typetran.lisp,v 1.10 1991/02/20 15:00:12 ram Exp $ ;;; ;;; This file contains stuff that implements the portable IR1 semantics of ;;; type tests. The main thing we do is convert complex type tests into diff --git a/compiler/vmdef.lisp b/compiler/vmdef.lisp index ed6b1d40c..b714dd31b 100644 --- a/compiler/vmdef.lisp +++ b/compiler/vmdef.lisp @@ -1,10 +1,14 @@ ;;; -*- Package: C; 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/compiler/vmdef.lisp,v 1.36 1991/02/20 15:00:14 ram Exp $") +;;; ;;; ********************************************************************** ;;; ;;; This file contains implementation-independent facilities used for diff --git a/compiler/vop.lisp b/compiler/vop.lisp index 68f810b96..3ee4c8ed7 100644 --- a/compiler/vop.lisp +++ b/compiler/vop.lisp @@ -1,10 +1,14 @@ ;;; -*- Package: C; 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/compiler/vop.lisp,v 1.27 1991/02/20 15:00:22 ram Exp $") +;;; ;;; ********************************************************************** ;;; ;;; Structures for the second (virtual machine) intermediate representation -- GitLab