From f9360468f8ac2c0b6627b97e65aaf543013ec539 Mon Sep 17 00:00:00 2001 From: "Guillermo J. Rozas" Date: Thu, 22 Jan 1987 14:17:17 +0000 Subject: [PATCH] Add RCS headers and update copyright notices. --- v7/src/microcode/array.c | 45 +++++++++++++++++--- v7/src/microcode/array.h | 34 ++++++++++++++- v7/src/microcode/bignum.c | 11 ++--- v7/src/microcode/bignum.h | 7 ++-- v7/src/microcode/bintopsb.c | 75 +++++++++++++++------------------ v7/src/microcode/bkpt.c | 75 +++++++++++++++------------------ v7/src/microcode/bkpt.h | 75 +++++++++++++++------------------ v7/src/microcode/boot.c | 4 +- v7/src/microcode/breakup.c | 34 +++++++++++++++ v7/src/microcode/findprim.c | 75 +++++++++++++++------------------ v7/src/microcode/ppband.c | 82 +++++++++++++++++-------------------- v7/src/microcode/psbtobin.c | 75 +++++++++++++++------------------ v7/src/microcode/wsize.c | 34 +++++++++++++++ v8/src/microcode/bintopsb.c | 75 +++++++++++++++------------------ v8/src/microcode/ppband.c | 82 +++++++++++++++++-------------------- v8/src/microcode/psbtobin.c | 75 +++++++++++++++------------------ 16 files changed, 457 insertions(+), 401 deletions(-) diff --git a/v7/src/microcode/array.c b/v7/src/microcode/array.c index bcbe404d2..ec3464906 100644 --- a/v7/src/microcode/array.c +++ b/v7/src/microcode/array.c @@ -1,9 +1,36 @@ -/* -*- C -*- */ -#include "scheme.h" -#include "primitive.h" -#include "flonum.h" -#include "array.h" -#include +/* -*-C-*- + +Copyright (c) 1987 Massachusetts Institute of Technology + +This material was developed by the Scheme project at the Massachusetts +Institute of Technology, Department of Electrical Engineering and +Computer Science. Permission to copy this software, to redistribute +it, and to use it for any purpose is granted, subject to the following +restrictions and understandings. + +1. Any copy made of this software must include this copyright notice +in full. + +2. Users of this software agree to make their best efforts (a) to +return to the MIT Scheme project any improvements or extensions that +they make, so that these may be included in future releases; and (b) +to inform MIT of noteworthy uses of this software. + +3. All materials developed as a consequence of the use of this +software shall duly acknowledge such use, in accordance with the usual +standards of acknowledging credit in academic research. + +4. MIT has made no warrantee or representation that the operation of +this software will be error-free, and MIT is under no obligation to +provide any services, by way of maintenance, update, or otherwise. + +5. In conjunction with products arising from the use of this material, +there shall be no use of the name of the Massachusetts Institute of +Technology nor of any adaptation thereof in any advertising, +promotional, or sales literature without prior written consent from +MIT in each case. */ + +/* $Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v7/src/microcode/Attic/array.c,v 9.21 1987/01/22 14:14:32 jinx Rel $ */ /* CONTAINS: */ /* Scheme_Array constructors, and selectors */ @@ -12,6 +39,12 @@ /* See array.h for definition using NM_VECTOR, */ /* and for many useful EXTERN */ /* ARRAY = SEQUENCE OF REALS */ + +#include "scheme.h" +#include "primitive.h" +#include "flonum.h" +#include "array.h" +#include /* first a useful procedure */ diff --git a/v7/src/microcode/array.h b/v7/src/microcode/array.h index 30dd44a3e..b58ecaf00 100644 --- a/v7/src/microcode/array.h +++ b/v7/src/microcode/array.h @@ -1,5 +1,37 @@ -/* -*- C -*- */ +/* -*-C-*- +Copyright (c) 1987 Massachusetts Institute of Technology + +This material was developed by the Scheme project at the Massachusetts +Institute of Technology, Department of Electrical Engineering and +Computer Science. Permission to copy this software, to redistribute +it, and to use it for any purpose is granted, subject to the following +restrictions and understandings. + +1. Any copy made of this software must include this copyright notice +in full. + +2. Users of this software agree to make their best efforts (a) to +return to the MIT Scheme project any improvements or extensions that +they make, so that these may be included in future releases; and (b) +to inform MIT of noteworthy uses of this software. + +3. All materials developed as a consequence of the use of this +software shall duly acknowledge such use, in accordance with the usual +standards of acknowledging credit in academic research. + +4. MIT has made no warrantee or representation that the operation of +this software will be error-free, and MIT is under no obligation to +provide any services, by way of maintenance, update, or otherwise. + +5. In conjunction with products arising from the use of this material, +there shall be no use of the name of the Massachusetts Institute of +Technology nor of any adaptation thereof in any advertising, +promotional, or sales literature without prior written consent from +MIT in each case. */ + +/* $Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v7/src/microcode/Attic/array.h,v 9.21 1987/01/22 14:14:45 jinx Exp $ */ + /* The following two macros determine what kind of arrays we deal with. Use float to save space for image-processing */ diff --git a/v7/src/microcode/bignum.c b/v7/src/microcode/bignum.c index 9b49c5c5c..3a94c91f1 100644 --- a/v7/src/microcode/bignum.c +++ b/v7/src/microcode/bignum.c @@ -1,6 +1,6 @@ /* -*-C-*- -Copyright (c) 1986 Massachusetts Institute of Technology +Copyright (c) 1987 Massachusetts Institute of Technology This material was developed by the Scheme project at the Massachusetts Institute of Technology, Department of Electrical Engineering and @@ -30,17 +30,18 @@ Technology nor of any adaptation thereof in any advertising, promotional, or sales literature without prior written consent from MIT in each case. */ -/* $Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v7/src/microcode/bignum.c,v 9.20 1987/01/21 20:14:34 jinx Exp $ - -This file contains the procedures for handling BIGNUM Arithmetic. */ +/* $Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v7/src/microcode/bignum.c,v 9.21 1987/01/22 14:16:05 jinx Exp $ + This file contains the procedures for handling BIGNUM Arithmetic. +*/ + #include "scheme.h" #include #include "primitive.h" #include "bignum.h" #include "flonum.h" #include "zones.h" - + /* Bignum Comparison Primitives */ /* big_compare() will return either of three cases, determining whether diff --git a/v7/src/microcode/bignum.h b/v7/src/microcode/bignum.h index ce54299a5..a029bc4ac 100644 --- a/v7/src/microcode/bignum.h +++ b/v7/src/microcode/bignum.h @@ -1,6 +1,6 @@ /* -*-C-*- -Copyright (c) 1986 Massachusetts Institute of Technology +Copyright (c) 1987 Massachusetts Institute of Technology This material was developed by the Scheme project at the Massachusetts Institute of Technology, Department of Electrical Engineering and @@ -30,9 +30,10 @@ Technology nor of any adaptation thereof in any advertising, promotional, or sales literature without prior written consent from MIT in each case. */ -/* $Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v7/src/microcode/bignum.h,v 9.20 1987/01/21 20:14:50 jinx Exp $ +/* $Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v7/src/microcode/bignum.h,v 9.21 1987/01/22 14:16:18 jinx Exp $ -Head file for bignums. This is shared by bignum.c and generic.c. */ + Head file for bignums. This is shared by bignum.c and generic.c. +*/ #ifdef ENABLE_DEBUGGING_TOOLS #define Debug_Test(Res) \ diff --git a/v7/src/microcode/bintopsb.c b/v7/src/microcode/bintopsb.c index 1ce0dd57a..b55657873 100644 --- a/v7/src/microcode/bintopsb.c +++ b/v7/src/microcode/bintopsb.c @@ -1,45 +1,36 @@ -/* Emacs, -*-C-*-an't you guess? */ - -/**************************************************************** -* * -* Copyright (c) 1986 * -* Massachusetts Institute of Technology * -* * -* This material was developed by the Scheme project at the * -* Massachusetts Institute of Technology, Department of * -* Electrical Engineering and Computer Science. Permission to * -* copy this software, to redistribute it, and to use it for any * -* purpose is granted, subject to the following restrictions and * -* understandings. * -* * -* 1. Any copy made of this software must include this copyright * -* notice in full. * -* * -* 2. Users of this software agree to make their best efforts (a)* -* to return to the MIT Scheme project any improvements or * -* extensions that they make, so that these may be included in * -* future releases; and (b) to inform MIT of noteworthy uses of * -* this software. * -* * -* 3. All materials developed as a consequence of the use of * -* this software shall duly acknowledge such use, in accordance * -* with the usual standards of acknowledging credit in academic * -* research. * -* * -* 4. MIT has made no warrantee or representation that the * -* operation of this software will be error-free, and MIT is * -* under no obligation to provide any services, by way of * -* maintenance, update, or otherwise. * -* * -* 5. In conjunction with products arising from the use of this * -* material, there shall be no use of the name of the * -* Massachusetts Institute of Technology nor of any adaptation * -* thereof in any advertising, promotional, or sales literature * -* without prior written consent from MIT in each case. * -* * -****************************************************************/ - -/* File: BINTOPSB.C +/* -*-C-*- + +Copyright (c) 1987 Massachusetts Institute of Technology + +This material was developed by the Scheme project at the Massachusetts +Institute of Technology, Department of Electrical Engineering and +Computer Science. Permission to copy this software, to redistribute +it, and to use it for any purpose is granted, subject to the following +restrictions and understandings. + +1. Any copy made of this software must include this copyright notice +in full. + +2. Users of this software agree to make their best efforts (a) to +return to the MIT Scheme project any improvements or extensions that +they make, so that these may be included in future releases; and (b) +to inform MIT of noteworthy uses of this software. + +3. All materials developed as a consequence of the use of this +software shall duly acknowledge such use, in accordance with the usual +standards of acknowledging credit in academic research. + +4. MIT has made no warrantee or representation that the operation of +this software will be error-free, and MIT is under no obligation to +provide any services, by way of maintenance, update, or otherwise. + +5. In conjunction with products arising from the use of this material, +there shall be no use of the name of the Massachusetts Institute of +Technology nor of any adaptation thereof in any advertising, +promotional, or sales literature without prior written consent from +MIT in each case. */ + +/* $Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v7/src/microcode/Attic/bintopsb.c,v 9.21 1987/01/22 14:10:46 jinx Exp $ * * This File contains the code to translate internal format binary * files to portable format. diff --git a/v7/src/microcode/bkpt.c b/v7/src/microcode/bkpt.c index 4084a6d22..30b1a6a7c 100644 --- a/v7/src/microcode/bkpt.c +++ b/v7/src/microcode/bkpt.c @@ -1,45 +1,36 @@ -/* Emacs -*-C-*-an't tell the language */ - -/**************************************************************** -* * -* Copyright (c) 1986 * -* Massachusetts Institute of Technology * -* * -* This material was developed by the Scheme project at the * -* Massachusetts Institute of Technology, Department of * -* Electrical Engineering and Computer Science. Permission to * -* copy this software, to redistribute it, and to use it for any * -* purpose is granted, subject to the following restrictions and * -* understandings. * -* * -* 1. Any copy made of this software must include this copyright * -* notice in full. * -* * -* 2. Users of this software agree to make their best efforts (a)* -* to return to the MIT Scheme project any improvements or * -* extensions that they make, so that these may be included in * -* future releases; and (b) to inform MIT of noteworthy uses of * -* this software. * -* * -* 3. All materials developed as a consequence of the use of * -* this software shall duly acknowledge such use, in accordance * -* with the usual standards of acknowledging credit in academic * -* research. * -* * -* 4. MIT has made no warrantee or representation that the * -* operation of this software will be error-free, and MIT is * -* under no obligation to provide any services, by way of * -* maintenance, update, or otherwise. * -* * -* 5. In conjunction with products arising from the use of this * -* material, there shall be no use of the name of the * -* Massachusetts Institute of Technology nor of any adaptation * -* thereof in any advertising, promotional, or sales literature * -* without prior written consent from MIT in each case. * -* * -****************************************************************/ - -/* File: BKPT.C +/* -*-C-*- + +Copyright (c) 1987 Massachusetts Institute of Technology + +This material was developed by the Scheme project at the Massachusetts +Institute of Technology, Department of Electrical Engineering and +Computer Science. Permission to copy this software, to redistribute +it, and to use it for any purpose is granted, subject to the following +restrictions and understandings. + +1. Any copy made of this software must include this copyright notice +in full. + +2. Users of this software agree to make their best efforts (a) to +return to the MIT Scheme project any improvements or extensions that +they make, so that these may be included in future releases; and (b) +to inform MIT of noteworthy uses of this software. + +3. All materials developed as a consequence of the use of this +software shall duly acknowledge such use, in accordance with the usual +standards of acknowledging credit in academic research. + +4. MIT has made no warrantee or representation that the operation of +this software will be error-free, and MIT is under no obligation to +provide any services, by way of maintenance, update, or otherwise. + +5. In conjunction with products arising from the use of this material, +there shall be no use of the name of the Massachusetts Institute of +Technology nor of any adaptation thereof in any advertising, +promotional, or sales literature without prior written consent from +MIT in each case. */ + +/* $Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v7/src/microcode/bkpt.c,v 9.21 1987/01/22 14:16:33 jinx Rel $ * * This file contains breakpoint utilities. * Disabled when not debugging the interpreter. diff --git a/v7/src/microcode/bkpt.h b/v7/src/microcode/bkpt.h index 426da658d..4880fa1b3 100644 --- a/v7/src/microcode/bkpt.h +++ b/v7/src/microcode/bkpt.h @@ -1,45 +1,36 @@ -/* Emacs -*-C-*-an't tell the language */ - -/**************************************************************** -* * -* Copyright (c) 1986 * -* Massachusetts Institute of Technology * -* * -* This material was developed by the Scheme project at the * -* Massachusetts Institute of Technology, Department of * -* Electrical Engineering and Computer Science. Permission to * -* copy this software, to redistribute it, and to use it for any * -* purpose is granted, subject to the following restrictions and * -* understandings. * -* * -* 1. Any copy made of this software must include this copyright * -* notice in full. * -* * -* 2. Users of this software agree to make their best efforts (a)* -* to return to the MIT Scheme project any improvements or * -* extensions that they make, so that these may be included in * -* future releases; and (b) to inform MIT of noteworthy uses of * -* this software. * -* * -* 3. All materials developed as a consequence of the use of * -* this software shall duly acknowledge such use, in accordance * -* with the usual standards of acknowledging credit in academic * -* research. * -* * -* 4. MIT has made no warrantee or representation that the * -* operation of this software will be error-free, and MIT is * -* under no obligation to provide any services, by way of * -* maintenance, update, or otherwise. * -* * -* 5. In conjunction with products arising from the use of this * -* material, there shall be no use of the name of the * -* Massachusetts Institute of Technology nor of any adaptation * -* thereof in any advertising, promotional, or sales literature * -* without prior written consent from MIT in each case. * -* * -****************************************************************/ - -/* File: BKPT.H +/* -*-C-*- + +Copyright (c) 1987 Massachusetts Institute of Technology + +This material was developed by the Scheme project at the Massachusetts +Institute of Technology, Department of Electrical Engineering and +Computer Science. Permission to copy this software, to redistribute +it, and to use it for any purpose is granted, subject to the following +restrictions and understandings. + +1. Any copy made of this software must include this copyright notice +in full. + +2. Users of this software agree to make their best efforts (a) to +return to the MIT Scheme project any improvements or extensions that +they make, so that these may be included in future releases; and (b) +to inform MIT of noteworthy uses of this software. + +3. All materials developed as a consequence of the use of this +software shall duly acknowledge such use, in accordance with the usual +standards of acknowledging credit in academic research. + +4. MIT has made no warrantee or representation that the operation of +this software will be error-free, and MIT is under no obligation to +provide any services, by way of maintenance, update, or otherwise. + +5. In conjunction with products arising from the use of this material, +there shall be no use of the name of the Massachusetts Institute of +Technology nor of any adaptation thereof in any advertising, +promotional, or sales literature without prior written consent from +MIT in each case. */ + +/* $Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v7/src/microcode/bkpt.h,v 9.21 1987/01/22 14:16:39 jinx Exp $ * * This file contains breakpoint utilities. * Disabled when not debugging the interpreter. diff --git a/v7/src/microcode/boot.c b/v7/src/microcode/boot.c index e153b406a..b71ddd0c5 100644 --- a/v7/src/microcode/boot.c +++ b/v7/src/microcode/boot.c @@ -1,6 +1,6 @@ /* -*-C-*- -Copyright (c) 1986 Massachusetts Institute of Technology +Copyright (c) 1987 Massachusetts Institute of Technology This material was developed by the Scheme project at the Massachusetts Institute of Technology, Department of Electrical Engineering and @@ -30,7 +30,7 @@ Technology nor of any adaptation thereof in any advertising, promotional, or sales literature without prior written consent from MIT in each case. */ -/* File: boot.c +/* $Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v7/src/microcode/boot.c,v 9.21 1987/01/22 14:17:17 jinx Exp $ * * This file contains the code to support startup of * the SCHEME interpreter. diff --git a/v7/src/microcode/breakup.c b/v7/src/microcode/breakup.c index c49e7f403..2a6019c65 100644 --- a/v7/src/microcode/breakup.c +++ b/v7/src/microcode/breakup.c @@ -1,3 +1,37 @@ +/* -*-C-*- + +Copyright (c) 1987 Massachusetts Institute of Technology + +This material was developed by the Scheme project at the Massachusetts +Institute of Technology, Department of Electrical Engineering and +Computer Science. Permission to copy this software, to redistribute +it, and to use it for any purpose is granted, subject to the following +restrictions and understandings. + +1. Any copy made of this software must include this copyright notice +in full. + +2. Users of this software agree to make their best efforts (a) to +return to the MIT Scheme project any improvements or extensions that +they make, so that these may be included in future releases; and (b) +to inform MIT of noteworthy uses of this software. + +3. All materials developed as a consequence of the use of this +software shall duly acknowledge such use, in accordance with the usual +standards of acknowledging credit in academic research. + +4. MIT has made no warrantee or representation that the operation of +this software will be error-free, and MIT is under no obligation to +provide any services, by way of maintenance, update, or otherwise. + +5. In conjunction with products arising from the use of this material, +there shall be no use of the name of the Massachusetts Institute of +Technology nor of any adaptation thereof in any advertising, +promotional, or sales literature without prior written consent from +MIT in each case. */ + +/* $Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v7/src/microcode/Attic/breakup.c,v 9.21 1987/01/22 14:11:34 jinx Rel $ */ + #include #ifndef isdigit diff --git a/v7/src/microcode/findprim.c b/v7/src/microcode/findprim.c index 2d8295faf..e629ce013 100644 --- a/v7/src/microcode/findprim.c +++ b/v7/src/microcode/findprim.c @@ -1,45 +1,36 @@ -/* Emacs, please use -*-C-*- mode */ - -/**************************************************************** -* * -* Copyright (c) 1985 * -* Massachusetts Institute of Technology * -* * -* This material was developed by the Scheme project at the * -* Massachusetts Institute of Technology, Department of * -* Electrical Engineering and Computer Science. Permission to * -* copy this software, to redistribute it, and to use it for any * -* purpose is granted, subject to the following restrictions and * -* understandings. * -* * -* 1. Any copy made of this software must include this copyright * -* notice in full. * -* * -* 2. Users of this software agree to make their best efforts (a)* -* to return to the MIT Scheme project any improvements or * -* extensions that they make, so that these may be included in * -* future releases; and (b) to inform MIT of noteworthy uses of * -* this software. * -* * -* 3. All materials developed as a consequence of the use of * -* this software shall duly acknowledge such use, in accordance * -* with the usual standards of acknowledging credit in academic * -* research. * -* * -* 4. MIT has made no warrantee or representation that the * -* operation of this software will be error-free, and MIT is * -* under no obligation to provide any services, by way of * -* maintenance, update, or otherwise. * -* * -* 5. In conjunction with products arising from the use of this * -* material, there shall be no use of the name of the * -* Massachusetts Institute of Technology nor of any adaptation * -* thereof in any advertising, promotional, or sales literature * -* without prior written consent from MIT in each case. * -* * -****************************************************************/ - -/* File: Findprim.c +/* -*-C-*- + +Copyright (c) 1987 Massachusetts Institute of Technology + +This material was developed by the Scheme project at the Massachusetts +Institute of Technology, Department of Electrical Engineering and +Computer Science. Permission to copy this software, to redistribute +it, and to use it for any purpose is granted, subject to the following +restrictions and understandings. + +1. Any copy made of this software must include this copyright notice +in full. + +2. Users of this software agree to make their best efforts (a) to +return to the MIT Scheme project any improvements or extensions that +they make, so that these may be included in future releases; and (b) +to inform MIT of noteworthy uses of this software. + +3. All materials developed as a consequence of the use of this +software shall duly acknowledge such use, in accordance with the usual +standards of acknowledging credit in academic research. + +4. MIT has made no warrantee or representation that the operation of +this software will be error-free, and MIT is under no obligation to +provide any services, by way of maintenance, update, or otherwise. + +5. In conjunction with products arising from the use of this material, +there shall be no use of the name of the Massachusetts Institute of +Technology nor of any adaptation thereof in any advertising, +promotional, or sales literature without prior written consent from +MIT in each case. */ + +/* $Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v7/src/microcode/findprim.c,v 9.21 1987/01/22 14:11:56 jinx Exp $ * * Preprocessor to find and declare user defined primitives. * diff --git a/v7/src/microcode/ppband.c b/v7/src/microcode/ppband.c index 47e92be0b..d4b76da9b 100644 --- a/v7/src/microcode/ppband.c +++ b/v7/src/microcode/ppband.c @@ -1,48 +1,40 @@ -/* Hey EMACS, this is -*- C -*- code! */ - -/**************************************************************** -* * -* Copyright (c) 1985 * -* Massachusetts Institute of Technology * -* * -* This material was developed by the Scheme project at the * -* Massachusetts Institute of Technology, Department of * -* Electrical Engineering and Computer Science. Permission to * -* copy this software, to redistribute it, and to use it for any * -* purpose is granted, subject to the following restrictions and * -* understandings. * -* * -* 1. Any copy made of this software must include this copyright * -* notice in full. * -* * -* 2. Users of this software agree to make their best efforts (a)* -* to return to the MIT Scheme project any improvements or * -* extensions that they make, so that these may be included in * -* future releases; and (b) to inform MIT of noteworthy uses of * -* this software. * -* * -* 3. All materials developed as a consequence of the use of * -* this software shall duly acknowledge such use, in accordance * -* with the usual standards of acknowledging credit in academic * -* research. * -* * -* 4. MIT has made no warrantee or representation that the * -* operation of this software will be error-free, and MIT is * -* under no obligation to provide any services, by way of * -* maintenance, update, or otherwise. * -* * -* 5. In conjunction with products arising from the use of this * -* material, there shall be no use of the name of the * -* Massachusetts Institute of Technology nor of any adaptation * -* thereof in any advertising, promotional, or sales literature * -* without prior written consent from MIT in each case. * -* * -****************************************************************/ - -/* File: PP-BAND.C - dumps Scheme FASL in user-readable form - */ +/* -*-C-*- + +Copyright (c) 1987 Massachusetts Institute of Technology + +This material was developed by the Scheme project at the Massachusetts +Institute of Technology, Department of Electrical Engineering and +Computer Science. Permission to copy this software, to redistribute +it, and to use it for any purpose is granted, subject to the following +restrictions and understandings. + +1. Any copy made of this software must include this copyright notice +in full. + +2. Users of this software agree to make their best efforts (a) to +return to the MIT Scheme project any improvements or extensions that +they make, so that these may be included in future releases; and (b) +to inform MIT of noteworthy uses of this software. + +3. All materials developed as a consequence of the use of this +software shall duly acknowledge such use, in accordance with the usual +standards of acknowledging credit in academic research. +4. MIT has made no warrantee or representation that the operation of +this software will be error-free, and MIT is under no obligation to +provide any services, by way of maintenance, update, or otherwise. + +5. In conjunction with products arising from the use of this material, +there shall be no use of the name of the Massachusetts Institute of +Technology nor of any adaptation thereof in any advertising, +promotional, or sales literature without prior written consent from +MIT in each case. */ + +/* $Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v7/src/microcode/Attic/ppband.c,v 9.21 1987/01/22 14:13:35 jinx Exp $ + * + * Dumps Scheme FASL in user-readable form . + */ + #include "scheme.h" /* These are needed by load.c */ @@ -56,7 +48,7 @@ static Pointer *Memory_Base; #include "load.c" #include "gctype.c" - + #ifdef Heap_In_Low_Memory #ifdef spectrum #define File_To_Pointer(P) ((((long) (P))&ADDRESS_MASK) / sizeof(Pointer)) diff --git a/v7/src/microcode/psbtobin.c b/v7/src/microcode/psbtobin.c index 3dfb67733..b18c92756 100644 --- a/v7/src/microcode/psbtobin.c +++ b/v7/src/microcode/psbtobin.c @@ -1,45 +1,36 @@ -/* Emacs, -*-C-*-an't you guess? */ - -/**************************************************************** -* * -* Copyright (c) 1986 * -* Massachusetts Institute of Technology * -* * -* This material was developed by the Scheme project at the * -* Massachusetts Institute of Technology, Department of * -* Electrical Engineering and Computer Science. Permission to * -* copy this software, to redistribute it, and to use it for any * -* purpose is granted, subject to the following restrictions and * -* understandings. * -* * -* 1. Any copy made of this software must include this copyright * -* notice in full. * -* * -* 2. Users of this software agree to make their best efforts (a)* -* to return to the MIT Scheme project any improvements or * -* extensions that they make, so that these may be included in * -* future releases; and (b) to inform MIT of noteworthy uses of * -* this software. * -* * -* 3. All materials developed as a consequence of the use of * -* this software shall duly acknowledge such use, in accordance * -* with the usual standards of acknowledging credit in academic * -* research. * -* * -* 4. MIT has made no warrantee or representation that the * -* operation of this software will be error-free, and MIT is * -* under no obligation to provide any services, by way of * -* maintenance, update, or otherwise. * -* * -* 5. In conjunction with products arising from the use of this * -* material, there shall be no use of the name of the * -* Massachusetts Institute of Technology nor of any adaptation * -* thereof in any advertising, promotional, or sales literature * -* without prior written consent from MIT in each case. * -* * -****************************************************************/ - -/* File: TO_INTERNAL.C +/* -*-C-*- + +Copyright (c) 1987 Massachusetts Institute of Technology + +This material was developed by the Scheme project at the Massachusetts +Institute of Technology, Department of Electrical Engineering and +Computer Science. Permission to copy this software, to redistribute +it, and to use it for any purpose is granted, subject to the following +restrictions and understandings. + +1. Any copy made of this software must include this copyright notice +in full. + +2. Users of this software agree to make their best efforts (a) to +return to the MIT Scheme project any improvements or extensions that +they make, so that these may be included in future releases; and (b) +to inform MIT of noteworthy uses of this software. + +3. All materials developed as a consequence of the use of this +software shall duly acknowledge such use, in accordance with the usual +standards of acknowledging credit in academic research. + +4. MIT has made no warrantee or representation that the operation of +this software will be error-free, and MIT is under no obligation to +provide any services, by way of maintenance, update, or otherwise. + +5. In conjunction with products arising from the use of this material, +there shall be no use of the name of the Massachusetts Institute of +Technology nor of any adaptation thereof in any advertising, +promotional, or sales literature without prior written consent from +MIT in each case. */ + +/* $Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v7/src/microcode/Attic/psbtobin.c,v 9.21 1987/01/22 14:13:43 jinx Exp $ * * This File contains the code to translate portable format binary * files to internal format. diff --git a/v7/src/microcode/wsize.c b/v7/src/microcode/wsize.c index d4be9f27c..4ea52a605 100644 --- a/v7/src/microcode/wsize.c +++ b/v7/src/microcode/wsize.c @@ -1,3 +1,37 @@ +/* -*-C-*- + +Copyright (c) 1987 Massachusetts Institute of Technology + +This material was developed by the Scheme project at the Massachusetts +Institute of Technology, Department of Electrical Engineering and +Computer Science. Permission to copy this software, to redistribute +it, and to use it for any purpose is granted, subject to the following +restrictions and understandings. + +1. Any copy made of this software must include this copyright notice +in full. + +2. Users of this software agree to make their best efforts (a) to +return to the MIT Scheme project any improvements or extensions that +they make, so that these may be included in future releases; and (b) +to inform MIT of noteworthy uses of this software. + +3. All materials developed as a consequence of the use of this +software shall duly acknowledge such use, in accordance with the usual +standards of acknowledging credit in academic research. + +4. MIT has made no warrantee or representation that the operation of +this software will be error-free, and MIT is under no obligation to +provide any services, by way of maintenance, update, or otherwise. + +5. In conjunction with products arising from the use of this material, +there shall be no use of the name of the Massachusetts Institute of +Technology nor of any adaptation thereof in any advertising, +promotional, or sales literature without prior written consent from +MIT in each case. */ + +/* $Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v7/src/microcode/Attic/wsize.c,v 9.21 1987/01/22 14:14:27 jinx Exp $ */ + #include #include #include diff --git a/v8/src/microcode/bintopsb.c b/v8/src/microcode/bintopsb.c index 1ce0dd57a..11cbcba0a 100644 --- a/v8/src/microcode/bintopsb.c +++ b/v8/src/microcode/bintopsb.c @@ -1,45 +1,36 @@ -/* Emacs, -*-C-*-an't you guess? */ - -/**************************************************************** -* * -* Copyright (c) 1986 * -* Massachusetts Institute of Technology * -* * -* This material was developed by the Scheme project at the * -* Massachusetts Institute of Technology, Department of * -* Electrical Engineering and Computer Science. Permission to * -* copy this software, to redistribute it, and to use it for any * -* purpose is granted, subject to the following restrictions and * -* understandings. * -* * -* 1. Any copy made of this software must include this copyright * -* notice in full. * -* * -* 2. Users of this software agree to make their best efforts (a)* -* to return to the MIT Scheme project any improvements or * -* extensions that they make, so that these may be included in * -* future releases; and (b) to inform MIT of noteworthy uses of * -* this software. * -* * -* 3. All materials developed as a consequence of the use of * -* this software shall duly acknowledge such use, in accordance * -* with the usual standards of acknowledging credit in academic * -* research. * -* * -* 4. MIT has made no warrantee or representation that the * -* operation of this software will be error-free, and MIT is * -* under no obligation to provide any services, by way of * -* maintenance, update, or otherwise. * -* * -* 5. In conjunction with products arising from the use of this * -* material, there shall be no use of the name of the * -* Massachusetts Institute of Technology nor of any adaptation * -* thereof in any advertising, promotional, or sales literature * -* without prior written consent from MIT in each case. * -* * -****************************************************************/ - -/* File: BINTOPSB.C +/* -*-C-*- + +Copyright (c) 1987 Massachusetts Institute of Technology + +This material was developed by the Scheme project at the Massachusetts +Institute of Technology, Department of Electrical Engineering and +Computer Science. Permission to copy this software, to redistribute +it, and to use it for any purpose is granted, subject to the following +restrictions and understandings. + +1. Any copy made of this software must include this copyright notice +in full. + +2. Users of this software agree to make their best efforts (a) to +return to the MIT Scheme project any improvements or extensions that +they make, so that these may be included in future releases; and (b) +to inform MIT of noteworthy uses of this software. + +3. All materials developed as a consequence of the use of this +software shall duly acknowledge such use, in accordance with the usual +standards of acknowledging credit in academic research. + +4. MIT has made no warrantee or representation that the operation of +this software will be error-free, and MIT is under no obligation to +provide any services, by way of maintenance, update, or otherwise. + +5. In conjunction with products arising from the use of this material, +there shall be no use of the name of the Massachusetts Institute of +Technology nor of any adaptation thereof in any advertising, +promotional, or sales literature without prior written consent from +MIT in each case. */ + +/* $Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v8/src/microcode/bintopsb.c,v 9.21 1987/01/22 14:10:46 jinx Exp $ * * This File contains the code to translate internal format binary * files to portable format. diff --git a/v8/src/microcode/ppband.c b/v8/src/microcode/ppband.c index 47e92be0b..e7e584ef3 100644 --- a/v8/src/microcode/ppband.c +++ b/v8/src/microcode/ppband.c @@ -1,48 +1,40 @@ -/* Hey EMACS, this is -*- C -*- code! */ - -/**************************************************************** -* * -* Copyright (c) 1985 * -* Massachusetts Institute of Technology * -* * -* This material was developed by the Scheme project at the * -* Massachusetts Institute of Technology, Department of * -* Electrical Engineering and Computer Science. Permission to * -* copy this software, to redistribute it, and to use it for any * -* purpose is granted, subject to the following restrictions and * -* understandings. * -* * -* 1. Any copy made of this software must include this copyright * -* notice in full. * -* * -* 2. Users of this software agree to make their best efforts (a)* -* to return to the MIT Scheme project any improvements or * -* extensions that they make, so that these may be included in * -* future releases; and (b) to inform MIT of noteworthy uses of * -* this software. * -* * -* 3. All materials developed as a consequence of the use of * -* this software shall duly acknowledge such use, in accordance * -* with the usual standards of acknowledging credit in academic * -* research. * -* * -* 4. MIT has made no warrantee or representation that the * -* operation of this software will be error-free, and MIT is * -* under no obligation to provide any services, by way of * -* maintenance, update, or otherwise. * -* * -* 5. In conjunction with products arising from the use of this * -* material, there shall be no use of the name of the * -* Massachusetts Institute of Technology nor of any adaptation * -* thereof in any advertising, promotional, or sales literature * -* without prior written consent from MIT in each case. * -* * -****************************************************************/ - -/* File: PP-BAND.C - dumps Scheme FASL in user-readable form - */ +/* -*-C-*- + +Copyright (c) 1987 Massachusetts Institute of Technology + +This material was developed by the Scheme project at the Massachusetts +Institute of Technology, Department of Electrical Engineering and +Computer Science. Permission to copy this software, to redistribute +it, and to use it for any purpose is granted, subject to the following +restrictions and understandings. + +1. Any copy made of this software must include this copyright notice +in full. + +2. Users of this software agree to make their best efforts (a) to +return to the MIT Scheme project any improvements or extensions that +they make, so that these may be included in future releases; and (b) +to inform MIT of noteworthy uses of this software. + +3. All materials developed as a consequence of the use of this +software shall duly acknowledge such use, in accordance with the usual +standards of acknowledging credit in academic research. +4. MIT has made no warrantee or representation that the operation of +this software will be error-free, and MIT is under no obligation to +provide any services, by way of maintenance, update, or otherwise. + +5. In conjunction with products arising from the use of this material, +there shall be no use of the name of the Massachusetts Institute of +Technology nor of any adaptation thereof in any advertising, +promotional, or sales literature without prior written consent from +MIT in each case. */ + +/* $Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v8/src/microcode/ppband.c,v 9.21 1987/01/22 14:13:35 jinx Exp $ + * + * Dumps Scheme FASL in user-readable form . + */ + #include "scheme.h" /* These are needed by load.c */ @@ -56,7 +48,7 @@ static Pointer *Memory_Base; #include "load.c" #include "gctype.c" - + #ifdef Heap_In_Low_Memory #ifdef spectrum #define File_To_Pointer(P) ((((long) (P))&ADDRESS_MASK) / sizeof(Pointer)) diff --git a/v8/src/microcode/psbtobin.c b/v8/src/microcode/psbtobin.c index 3dfb67733..050d15bd2 100644 --- a/v8/src/microcode/psbtobin.c +++ b/v8/src/microcode/psbtobin.c @@ -1,45 +1,36 @@ -/* Emacs, -*-C-*-an't you guess? */ - -/**************************************************************** -* * -* Copyright (c) 1986 * -* Massachusetts Institute of Technology * -* * -* This material was developed by the Scheme project at the * -* Massachusetts Institute of Technology, Department of * -* Electrical Engineering and Computer Science. Permission to * -* copy this software, to redistribute it, and to use it for any * -* purpose is granted, subject to the following restrictions and * -* understandings. * -* * -* 1. Any copy made of this software must include this copyright * -* notice in full. * -* * -* 2. Users of this software agree to make their best efforts (a)* -* to return to the MIT Scheme project any improvements or * -* extensions that they make, so that these may be included in * -* future releases; and (b) to inform MIT of noteworthy uses of * -* this software. * -* * -* 3. All materials developed as a consequence of the use of * -* this software shall duly acknowledge such use, in accordance * -* with the usual standards of acknowledging credit in academic * -* research. * -* * -* 4. MIT has made no warrantee or representation that the * -* operation of this software will be error-free, and MIT is * -* under no obligation to provide any services, by way of * -* maintenance, update, or otherwise. * -* * -* 5. In conjunction with products arising from the use of this * -* material, there shall be no use of the name of the * -* Massachusetts Institute of Technology nor of any adaptation * -* thereof in any advertising, promotional, or sales literature * -* without prior written consent from MIT in each case. * -* * -****************************************************************/ - -/* File: TO_INTERNAL.C +/* -*-C-*- + +Copyright (c) 1987 Massachusetts Institute of Technology + +This material was developed by the Scheme project at the Massachusetts +Institute of Technology, Department of Electrical Engineering and +Computer Science. Permission to copy this software, to redistribute +it, and to use it for any purpose is granted, subject to the following +restrictions and understandings. + +1. Any copy made of this software must include this copyright notice +in full. + +2. Users of this software agree to make their best efforts (a) to +return to the MIT Scheme project any improvements or extensions that +they make, so that these may be included in future releases; and (b) +to inform MIT of noteworthy uses of this software. + +3. All materials developed as a consequence of the use of this +software shall duly acknowledge such use, in accordance with the usual +standards of acknowledging credit in academic research. + +4. MIT has made no warrantee or representation that the operation of +this software will be error-free, and MIT is under no obligation to +provide any services, by way of maintenance, update, or otherwise. + +5. In conjunction with products arising from the use of this material, +there shall be no use of the name of the Massachusetts Institute of +Technology nor of any adaptation thereof in any advertising, +promotional, or sales literature without prior written consent from +MIT in each case. */ + +/* $Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v8/src/microcode/psbtobin.c,v 9.21 1987/01/22 14:13:43 jinx Exp $ * * This File contains the code to translate portable format binary * files to internal format. -- 2.25.1