From c1403eb7a5f73843f5bb498aafb2587c2be407e2 Mon Sep 17 00:00:00 2001 From: ram <ram> Date: Wed, 20 Feb 1991 15:17:37 +0000 Subject: [PATCH] New file header with RCS stuff. --- compiler/generic/core.lisp | 12 ++++++++---- compiler/generic/objdef.lisp | 12 ++++++++---- compiler/generic/primtype.lisp | 12 ++++++++---- compiler/generic/utils.lisp | 14 +++++++++----- compiler/generic/vm-fndb.lisp | 14 +++++++++----- compiler/generic/vm-macs.lisp | 14 +++++++++----- compiler/generic/vm-tran.lisp | 14 +++++++++----- compiler/generic/vm-type.lisp | 14 +++++++++----- compiler/generic/vm-typetran.lisp | 14 +++++++++----- compiler/mips/alloc.lisp | 14 +++++++++----- compiler/mips/arith.lisp | 14 +++++++++----- compiler/mips/array.lisp | 14 +++++++++----- compiler/mips/c-call.lisp | 12 ++++++++---- compiler/mips/call.lisp | 14 +++++++++----- compiler/mips/cell.lisp | 14 +++++++++----- compiler/mips/char.lisp | 14 +++++++++----- compiler/mips/debug.lisp | 14 +++++++++----- compiler/mips/float.lisp | 14 +++++++++----- compiler/mips/insts.lisp | 14 +++++++++----- compiler/mips/macros.lisp | 14 +++++++++----- compiler/mips/memory.lisp | 14 +++++++++----- compiler/mips/move.lisp | 14 +++++++++----- compiler/mips/nlx.lisp | 14 +++++++++----- compiler/mips/parms.lisp | 14 +++++++++----- compiler/mips/pred.lisp | 14 +++++++++----- compiler/mips/print.lisp | 14 +++++++++----- compiler/mips/sap.lisp | 14 +++++++++----- compiler/mips/static-fn.lisp | 12 ++++++++---- compiler/mips/subprim.lisp | 14 +++++++++----- compiler/mips/system.lisp | 14 +++++++++----- compiler/mips/type-vops.lisp | 14 +++++++++----- compiler/mips/values.lisp | 14 +++++++++----- compiler/mips/vm.lisp | 12 ++++++++---- 33 files changed, 291 insertions(+), 159 deletions(-) diff --git a/compiler/generic/core.lisp b/compiler/generic/core.lisp index 24cdc6c37..379056ad4 100644 --- a/compiler/generic/core.lisp +++ b/compiler/generic/core.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/generic/core.lisp,v 1.8 1991/02/20 15:17:09 ram Exp $") +;;; ;;; ********************************************************************** ;;; ;;; diff --git a/compiler/generic/objdef.lisp b/compiler/generic/objdef.lisp index 5751484dc..09be8975e 100644 --- a/compiler/generic/objdef.lisp +++ b/compiler/generic/objdef.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/compiler/generic/objdef.lisp,v 1.10 1991/02/20 15:17:20 ram Exp $") +;;; ;;; ********************************************************************** ;;; -;;; $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/compiler/generic/objdef.lisp,v 1.9 1990/12/18 20:43:03 wlott Exp $ +;;; $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/compiler/generic/objdef.lisp,v 1.10 1991/02/20 15:17:20 ram Exp $ ;;; ;;; This file contains the machine independent aspects of the object ;;; representation. diff --git a/compiler/generic/primtype.lisp b/compiler/generic/primtype.lisp index 7cb7040fb..551cdba1a 100644 --- a/compiler/generic/primtype.lisp +++ b/compiler/generic/primtype.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/compiler/generic/primtype.lisp,v 1.5 1991/02/20 15:17:22 ram Exp $") +;;; ;;; ********************************************************************** ;;; -;;; $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/compiler/generic/primtype.lisp,v 1.4 1990/11/16 04:41:11 wlott Exp $ +;;; $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/compiler/generic/primtype.lisp,v 1.5 1991/02/20 15:17:22 ram Exp $ ;;; ;;; This file contains the machine independent aspects of the object ;;; representation and primitive types. diff --git a/compiler/generic/utils.lisp b/compiler/generic/utils.lisp index f79aa30b7..072308e43 100644 --- a/compiler/generic/utils.lisp +++ b/compiler/generic/utils.lisp @@ -1,13 +1,17 @@ ;;; -*- Package: VM; 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/generic/utils.lisp,v 1.2 1991/02/20 15:17:25 ram Exp $") +;;; ;;; ********************************************************************** ;;; -;;; $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/compiler/generic/utils.lisp,v 1.1 1990/11/03 03:17:32 wlott Exp $ +;;; $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/compiler/generic/utils.lisp,v 1.2 1991/02/20 15:17:25 ram Exp $ ;;; ;;; Utility functions needed by the back end to generate code. ;;; diff --git a/compiler/generic/vm-fndb.lisp b/compiler/generic/vm-fndb.lisp index 32e69eb3d..3e39a8dc3 100644 --- a/compiler/generic/vm-fndb.lisp +++ b/compiler/generic/vm-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/generic/vm-fndb.lisp,v 1.34 1991/02/20 15:17:28 ram Exp $") +;;; ;;; ********************************************************************** ;;; -;;; $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/compiler/generic/vm-fndb.lisp,v 1.33 1991/01/08 18:06:44 wlott Exp $ +;;; $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/compiler/generic/vm-fndb.lisp,v 1.34 1991/02/20 15:17:28 ram Exp $ ;;; ;;; This file defines the machine specific function signatures. ;;; diff --git a/compiler/generic/vm-macs.lisp b/compiler/generic/vm-macs.lisp index 1ea3c527a..17581e124 100644 --- a/compiler/generic/vm-macs.lisp +++ b/compiler/generic/vm-macs.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/compiler/generic/vm-macs.lisp,v 1.2 1991/02/20 15:17:30 ram Exp $") +;;; ;;; ********************************************************************** ;;; -;;; $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/compiler/generic/vm-macs.lisp,v 1.1 1991/02/11 17:31:32 ram Exp $ +;;; $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/compiler/generic/vm-macs.lisp,v 1.2 1991/02/20 15:17:30 ram Exp $ ;;; ;;; This file contains some macros and constants that are object-format ;;; specific or are used for defining the object format. diff --git a/compiler/generic/vm-tran.lisp b/compiler/generic/vm-tran.lisp index 035a9b652..f07ab6efb 100644 --- a/compiler/generic/vm-tran.lisp +++ b/compiler/generic/vm-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/generic/vm-tran.lisp,v 1.24 1991/02/20 15:17:32 ram Exp $") +;;; ;;; ********************************************************************** ;;; -;;; $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/compiler/generic/vm-tran.lisp,v 1.23 1991/01/14 01:43:02 wlott Exp $ +;;; $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/compiler/generic/vm-tran.lisp,v 1.24 1991/02/20 15:17:32 ram Exp $ ;;; ;;; This file contains impelemtentation-dependent transforms. ;;; diff --git a/compiler/generic/vm-type.lisp b/compiler/generic/vm-type.lisp index 1bd7365d2..9e99a5b75 100644 --- a/compiler/generic/vm-type.lisp +++ b/compiler/generic/vm-type.lisp @@ -1,13 +1,17 @@ ;;; -*- Package: KERNEL; 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/generic/vm-type.lisp,v 1.25 1991/02/20 15:17:35 ram Exp $") +;;; ;;; ********************************************************************** ;;; -;;; $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/compiler/generic/vm-type.lisp,v 1.24 1990/12/18 20:45:08 wlott Exp $ +;;; $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/compiler/generic/vm-type.lisp,v 1.25 1991/02/20 15:17:35 ram Exp $ ;;; ;;; This file contains implementation-dependent parts of the type support ;;; code. This is stuff which deals with the mapping from types defined in diff --git a/compiler/generic/vm-typetran.lisp b/compiler/generic/vm-typetran.lisp index d15522325..965c40759 100644 --- a/compiler/generic/vm-typetran.lisp +++ b/compiler/generic/vm-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/generic/vm-typetran.lisp,v 1.7 1991/02/20 15:17:37 ram Exp $") +;;; ;;; ********************************************************************** ;;; -;;; $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/compiler/generic/vm-typetran.lisp,v 1.6 1990/06/03 18:58:03 ch Exp $ +;;; $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/compiler/generic/vm-typetran.lisp,v 1.7 1991/02/20 15:17:37 ram Exp $ ;;; ;;; This file contains the implimentation specific type transformation magic. ;;; Basically, the various non-standard predicates that can be used in typep diff --git a/compiler/mips/alloc.lisp b/compiler/mips/alloc.lisp index 27497b6ff..159c82961 100644 --- a/compiler/mips/alloc.lisp +++ b/compiler/mips/alloc.lisp @@ -1,13 +1,17 @@ ;;; -*- 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/compiler/mips/alloc.lisp,v 1.14 1991/02/20 15:14:03 ram Exp $") +;;; ;;; ********************************************************************** ;;; -;;; $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/compiler/mips/alloc.lisp,v 1.13 1990/11/03 03:24:27 wlott Exp $ +;;; $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/compiler/mips/alloc.lisp,v 1.14 1991/02/20 15:14:03 ram Exp $ ;;; ;;; Allocation VOPs for the MIPS port. ;;; diff --git a/compiler/mips/arith.lisp b/compiler/mips/arith.lisp index a13add69a..5a0ad5171 100644 --- a/compiler/mips/arith.lisp +++ b/compiler/mips/arith.lisp @@ -1,13 +1,17 @@ ;;; -*- Package: MIPS; 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/mips/arith.lisp,v 1.43 1991/02/20 15:14:07 ram Exp $") +;;; ;;; ********************************************************************** ;;; -;;; $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/compiler/mips/arith.lisp,v 1.42 1991/02/20 14:43:08 ram Exp $ +;;; $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/compiler/mips/arith.lisp,v 1.43 1991/02/20 15:14:07 ram Exp $ ;;; ;;; This file contains the VM definition arithmetic VOPs for the MIPS. ;;; diff --git a/compiler/mips/array.lisp b/compiler/mips/array.lisp index 19bb6f6b5..b3b720234 100644 --- a/compiler/mips/array.lisp +++ b/compiler/mips/array.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/compiler/mips/array.lisp,v 1.30 1991/02/20 15:14:11 ram Exp $") +;;; ;;; ********************************************************************** ;;; -;;; $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/compiler/mips/array.lisp,v 1.29 1990/11/10 18:43:30 wlott Exp $ +;;; $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/compiler/mips/array.lisp,v 1.30 1991/02/20 15:14:11 ram Exp $ ;;; ;;; This file contains the MIPS definitions for array operations. ;;; diff --git a/compiler/mips/c-call.lisp b/compiler/mips/c-call.lisp index 0f760b54a..4a5837b99 100644 --- a/compiler/mips/c-call.lisp +++ b/compiler/mips/c-call.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/compiler/mips/c-call.lisp,v 1.5 1991/02/20 15:14:15 ram Exp $") +;;; ;;; ********************************************************************** ;;; -;;; $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/compiler/mips/c-call.lisp,v 1.4 1990/11/21 11:12:45 wlott Exp $ +;;; $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/compiler/mips/c-call.lisp,v 1.5 1991/02/20 15:14:15 ram Exp $ ;;; ;;; This file contains the VOPs and other necessary machine specific support ;;; routines for call-out to C. diff --git a/compiler/mips/call.lisp b/compiler/mips/call.lisp index a2a3605cb..124337345 100644 --- a/compiler/mips/call.lisp +++ b/compiler/mips/call.lisp @@ -1,13 +1,17 @@ ;;; -*- Package: MIPS; 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/mips/call.lisp,v 1.37 1991/02/20 15:14:17 ram Exp $") +;;; ;;; ********************************************************************** ;;; -;;; $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/compiler/mips/call.lisp,v 1.36 1991/02/04 18:38:38 ram Exp $ +;;; $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/compiler/mips/call.lisp,v 1.37 1991/02/20 15:14:17 ram Exp $ ;;; ;;; This file contains the VM definition of function call for the MIPS. ;;; diff --git a/compiler/mips/cell.lisp b/compiler/mips/cell.lisp index 622882576..4fffabaef 100644 --- a/compiler/mips/cell.lisp +++ b/compiler/mips/cell.lisp @@ -1,13 +1,17 @@ ;;; -*- Package: MIPS; 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/mips/cell.lisp,v 1.52 1991/02/20 15:14:23 ram Exp $") +;;; ;;; ********************************************************************** ;;; -;;; $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/compiler/mips/cell.lisp,v 1.51 1990/12/18 20:48:11 wlott Exp $ +;;; $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/compiler/mips/cell.lisp,v 1.52 1991/02/20 15:14:23 ram Exp $ ;;; ;;; This file contains the VM definition of various primitive memory access ;;; VOPs for the MIPS. diff --git a/compiler/mips/char.lisp b/compiler/mips/char.lisp index 39f1a4c5b..77bae7101 100644 --- a/compiler/mips/char.lisp +++ b/compiler/mips/char.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/mips/char.lisp,v 1.12 1991/02/20 15:14:30 ram Exp $") +;;; ;;; ********************************************************************** ;;; -;;; $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/compiler/mips/char.lisp,v 1.11 1991/02/14 20:46:11 ram Exp $ +;;; $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/compiler/mips/char.lisp,v 1.12 1991/02/20 15:14:30 ram Exp $ ;;; ;;; This file contains the RT VM definition of character operations. ;;; diff --git a/compiler/mips/debug.lisp b/compiler/mips/debug.lisp index 201983c6e..b39df42ec 100644 --- a/compiler/mips/debug.lisp +++ b/compiler/mips/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/mips/debug.lisp,v 1.8 1991/02/20 15:14:32 ram Exp $") +;;; ;;; ********************************************************************** ;;; -;;; $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/compiler/mips/debug.lisp,v 1.7 1991/02/11 17:32:13 ram Exp $ +;;; $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/compiler/mips/debug.lisp,v 1.8 1991/02/20 15:14:32 ram Exp $ ;;; ;;; Compiler support for the new whizzy debugger. ;;; diff --git a/compiler/mips/float.lisp b/compiler/mips/float.lisp index 3372e590f..a0d6b5ad9 100644 --- a/compiler/mips/float.lisp +++ b/compiler/mips/float.lisp @@ -1,13 +1,17 @@ ;;; -*- Package: MIPS; 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/mips/float.lisp,v 1.12 1991/02/20 15:14:35 ram Exp $") +;;; ;;; ********************************************************************** ;;; -;;; $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/compiler/mips/float.lisp,v 1.11 1990/12/12 00:11:43 ram Exp $ +;;; $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/compiler/mips/float.lisp,v 1.12 1991/02/20 15:14:35 ram Exp $ ;;; ;;; This file contains floating point support for the MIPS. ;;; diff --git a/compiler/mips/insts.lisp b/compiler/mips/insts.lisp index 0af45afb1..9b9bb3810 100644 --- a/compiler/mips/insts.lisp +++ b/compiler/mips/insts.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/compiler/mips/insts.lisp,v 1.30 1991/02/20 15:14:41 ram Exp $") +;;; ;;; ********************************************************************** ;;; -;;; $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/compiler/mips/insts.lisp,v 1.29 1991/02/20 14:49:52 ram Exp $ +;;; $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/compiler/mips/insts.lisp,v 1.30 1991/02/20 15:14:41 ram Exp $ ;;; ;;; Description of the MIPS architecture. ;;; diff --git a/compiler/mips/macros.lisp b/compiler/mips/macros.lisp index 93ac5f193..22cff192c 100644 --- a/compiler/mips/macros.lisp +++ b/compiler/mips/macros.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/mips/macros.lisp,v 1.44 1991/02/20 15:14:45 ram Exp $") +;;; ;;; ********************************************************************** ;;; -;;; $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/compiler/mips/macros.lisp,v 1.43 1991/02/11 17:32:43 ram Exp $ +;;; $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/compiler/mips/macros.lisp,v 1.44 1991/02/20 15:14:45 ram Exp $ ;;; ;;; This file contains various useful macros for generating MIPS code. ;;; diff --git a/compiler/mips/memory.lisp b/compiler/mips/memory.lisp index 87727d339..7550c9a2b 100644 --- a/compiler/mips/memory.lisp +++ b/compiler/mips/memory.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/mips/memory.lisp,v 1.12 1991/02/20 15:14:39 ram Exp $") +;;; ;;; ********************************************************************** ;;; -;;; $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/compiler/mips/memory.lisp,v 1.11 1990/11/03 03:25:32 wlott Exp $ +;;; $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/compiler/mips/memory.lisp,v 1.12 1991/02/20 15:14:39 ram Exp $ ;;; ;;; This file contains the MIPS definitions of some general purpose memory ;;; reference VOPs inherited by basic memory reference operations. diff --git a/compiler/mips/move.lisp b/compiler/mips/move.lisp index 110d7fdf7..1c03738f3 100644 --- a/compiler/mips/move.lisp +++ b/compiler/mips/move.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/mips/move.lisp,v 1.28 1991/02/20 15:14:50 ram Exp $") +;;; ;;; ********************************************************************** ;;; -;;; $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/compiler/mips/move.lisp,v 1.27 1991/02/14 20:46:51 ram Exp $ +;;; $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/compiler/mips/move.lisp,v 1.28 1991/02/20 15:14:50 ram Exp $ ;;; ;;; This file contains the MIPS VM definition of operand loading/saving and ;;; the Move VOP. diff --git a/compiler/mips/nlx.lisp b/compiler/mips/nlx.lisp index 76762d8a4..60da26c35 100644 --- a/compiler/mips/nlx.lisp +++ b/compiler/mips/nlx.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/compiler/mips/nlx.lisp,v 1.14 1991/02/20 15:14:53 ram Exp $") +;;; ;;; ********************************************************************** ;;; -;;; $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/compiler/mips/nlx.lisp,v 1.13 1990/11/03 03:21:47 wlott Exp $ +;;; $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/compiler/mips/nlx.lisp,v 1.14 1991/02/20 15:14:53 ram Exp $ ;;; ;;; This file contains the definitions of VOPs used for non-local exit ;;; (throw, lexical exit, etc.) diff --git a/compiler/mips/parms.lisp b/compiler/mips/parms.lisp index ad3bd2cf6..fe95a999c 100644 --- a/compiler/mips/parms.lisp +++ b/compiler/mips/parms.lisp @@ -1,13 +1,17 @@ ;;; -*- Package: MIPS; 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/mips/parms.lisp,v 1.89 1991/02/20 15:14:56 ram Exp $") +;;; ;;; ********************************************************************** ;;; -;;; $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/compiler/mips/parms.lisp,v 1.88 1991/02/11 17:33:08 ram Exp $ +;;; $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/compiler/mips/parms.lisp,v 1.89 1991/02/20 15:14:56 ram Exp $ ;;; ;;; This file contains some parameterizations of various VM ;;; attributes for the MIPS. This file is separate from other stuff so diff --git a/compiler/mips/pred.lisp b/compiler/mips/pred.lisp index 8e7134405..8e5fd56c4 100644 --- a/compiler/mips/pred.lisp +++ b/compiler/mips/pred.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/mips/pred.lisp,v 1.6 1991/02/20 15:15:00 ram Exp $") +;;; ;;; ********************************************************************** ;;; -;;; $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/compiler/mips/pred.lisp,v 1.5 1990/11/03 03:25:41 wlott Exp $ +;;; $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/compiler/mips/pred.lisp,v 1.6 1991/02/20 15:15:00 ram Exp $ ;;; ;;; This file contains the VM definition of predicate VOPs for the MIPS. ;;; diff --git a/compiler/mips/print.lisp b/compiler/mips/print.lisp index 5fa4f08a2..0c285ee32 100644 --- a/compiler/mips/print.lisp +++ b/compiler/mips/print.lisp @@ -1,13 +1,17 @@ ;;; -*- 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/compiler/mips/print.lisp,v 1.7 1991/02/20 15:15:05 ram Exp $") +;;; ;;; ********************************************************************** ;;; -;;; $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/compiler/mips/print.lisp,v 1.6 1990/11/03 03:25:43 wlott Exp $ +;;; $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/compiler/mips/print.lisp,v 1.7 1991/02/20 15:15:05 ram Exp $ ;;; ;;; This file contains temporary printing utilities and similar noise. ;;; diff --git a/compiler/mips/sap.lisp b/compiler/mips/sap.lisp index 185b21c9d..d6dda58ef 100644 --- a/compiler/mips/sap.lisp +++ b/compiler/mips/sap.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/mips/sap.lisp,v 1.18 1991/02/20 15:15:08 ram Exp $") +;;; ;;; ********************************************************************** ;;; -;;; $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/compiler/mips/sap.lisp,v 1.17 1990/11/03 03:25:46 wlott Exp $ +;;; $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/compiler/mips/sap.lisp,v 1.18 1991/02/20 15:15:08 ram Exp $ ;;; ;;; This file contains the MIPS VM definition of SAP operations. ;;; diff --git a/compiler/mips/static-fn.lisp b/compiler/mips/static-fn.lisp index b135a4384..0038e20e0 100644 --- a/compiler/mips/static-fn.lisp +++ b/compiler/mips/static-fn.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/compiler/mips/static-fn.lisp,v 1.14 1991/02/20 15:15:11 ram Exp $") +;;; ;;; ********************************************************************** ;;; -;;; $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/compiler/mips/static-fn.lisp,v 1.13 1990/11/03 03:25:52 wlott Exp $ +;;; $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/compiler/mips/static-fn.lisp,v 1.14 1991/02/20 15:15:11 ram Exp $ ;;; ;;; This file contains the VOPs and macro magic necessary to call static ;;; functions. diff --git a/compiler/mips/subprim.lisp b/compiler/mips/subprim.lisp index 342c5fe4a..1494b18d2 100644 --- a/compiler/mips/subprim.lisp +++ b/compiler/mips/subprim.lisp @@ -1,13 +1,17 @@ ;;; -*- Package: MIPS; 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/mips/subprim.lisp,v 1.20 1991/02/20 15:15:14 ram Exp $") +;;; ;;; ********************************************************************** ;;; -;;; $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/compiler/mips/subprim.lisp,v 1.19 1990/11/03 18:13:51 wlott Exp $ +;;; $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/compiler/mips/subprim.lisp,v 1.20 1991/02/20 15:15:14 ram Exp $ ;;; ;;; Linkage information for standard static functions, and random vops. ;;; diff --git a/compiler/mips/system.lisp b/compiler/mips/system.lisp index 8d3e48e67..8980cb470 100644 --- a/compiler/mips/system.lisp +++ b/compiler/mips/system.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/compiler/mips/system.lisp,v 1.40 1991/02/20 15:15:16 ram Exp $") +;;; ;;; ********************************************************************** ;;; -;;; $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/compiler/mips/system.lisp,v 1.39 1990/12/18 20:49:24 wlott Exp $ +;;; $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/compiler/mips/system.lisp,v 1.40 1991/02/20 15:15:16 ram Exp $ ;;; ;;; MIPS VM definitions of various system hacking operations. ;;; diff --git a/compiler/mips/type-vops.lisp b/compiler/mips/type-vops.lisp index 8bc8ecec6..2aa128844 100644 --- a/compiler/mips/type-vops.lisp +++ b/compiler/mips/type-vops.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/mips/type-vops.lisp,v 1.26 1991/02/20 15:15:19 ram Exp $") +;;; ;;; ********************************************************************** ;;; -;;; $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/compiler/mips/type-vops.lisp,v 1.25 1990/12/18 21:23:33 wlott Exp $ +;;; $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/compiler/mips/type-vops.lisp,v 1.26 1991/02/20 15:15:19 ram Exp $ ;;; ;;; This file contains the VM definition of type testing and checking VOPs ;;; for the RT. diff --git a/compiler/mips/values.lisp b/compiler/mips/values.lisp index a82166223..4c14ec45c 100644 --- a/compiler/mips/values.lisp +++ b/compiler/mips/values.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/mips/values.lisp,v 1.12 1991/02/20 15:15:29 ram Exp $") +;;; ;;; ********************************************************************** ;;; -;;; $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/compiler/mips/values.lisp,v 1.11 1990/11/03 03:26:01 wlott Exp $ +;;; $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/compiler/mips/values.lisp,v 1.12 1991/02/20 15:15:29 ram Exp $ ;;; ;;; This file contains the implementation of unknown-values VOPs. ;;; diff --git a/compiler/mips/vm.lisp b/compiler/mips/vm.lisp index 3bc00488f..263d6ff4a 100644 --- a/compiler/mips/vm.lisp +++ b/compiler/mips/vm.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/compiler/mips/vm.lisp,v 1.43 1991/02/20 15:15:34 ram Exp $") +;;; ;;; ********************************************************************** ;;; -;;; $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/compiler/mips/vm.lisp,v 1.42 1991/02/11 17:33:32 ram Exp $ +;;; $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/compiler/mips/vm.lisp,v 1.43 1991/02/20 15:15:34 ram Exp $ ;;; ;;; This file contains the VM definition for the MIPS R2000 and the new ;;; object format. -- GitLab