From 7f309f1c021e7583f724cce599ce2dd3c439361b Mon Sep 17 00:00:00 2001
From: simonm <unknown>
Date: Fri, 5 Feb 1999 16:03:04 +0000
Subject: [PATCH] [project @ 1999-02-05 16:02:18 by simonm] Copyright police.
---
ghc/includes/Assembler.h | 8 +++-----
ghc/includes/Block.h | 4 +++-
ghc/includes/CCall.h | 5 ++++-
ghc/includes/ClosureMacros.h | 4 +++-
ghc/includes/ClosureTypes.h | 4 +++-
ghc/includes/Closures.h | 4 +++-
ghc/includes/Constants.h | 4 +++-
ghc/includes/Hooks.h | 4 +++-
ghc/includes/InfoMacros.h | 4 +++-
ghc/includes/InfoTables.h | 4 +++-
ghc/includes/MachDeps.h | 3 ++-
ghc/includes/MachRegs.h | 4 +++-
ghc/includes/Prelude.h | 4 +++-
ghc/includes/PrimOps.h | 4 +++-
ghc/includes/Profiling.h | 5 ++++-
ghc/includes/Regs.h | 4 +++-
ghc/includes/Rts.h | 4 +++-
ghc/includes/RtsAPI.h | 4 +++-
ghc/includes/Stable.h | 4 +++-
ghc/includes/Stg.h | 4 +++-
ghc/includes/StgMacros.h | 4 +++-
ghc/includes/StgMiscClosures.h | 4 +++-
ghc/includes/StgStorage.h | 4 +++-
ghc/includes/StgTicky.h | 5 ++++-
ghc/includes/StgTypes.h | 4 +++-
ghc/includes/TSO.h | 4 +++-
ghc/includes/TailCalls.h | 4 +++-
ghc/includes/Updates.h | 4 +++-
ghc/rts/Assembler.c | 8 +++-----
ghc/rts/BlockAlloc.c | 4 +++-
ghc/rts/BlockAlloc.h | 4 +++-
ghc/rts/Bytecodes.h | 8 ++++++++
ghc/rts/DebugProf.c | 4 ++--
ghc/rts/Disassembler.c | 9 ++++-----
ghc/rts/Disassembler.h | 4 +++-
ghc/rts/Evaluator.c | 9 ++++-----
ghc/rts/Evaluator.h | 4 +++-
ghc/rts/ForeignCall.c | 9 ++++-----
ghc/rts/ForeignCall.h | 4 +++-
ghc/rts/GC.c | 6 ++++--
ghc/rts/GC.h | 4 +++-
ghc/rts/HeapStackCheck.hc | 4 +++-
ghc/rts/Itimer.c | 4 ++--
ghc/rts/Itimer.h | 4 ++--
ghc/rts/MBlock.c | 4 +++-
ghc/rts/MBlock.h | 4 +++-
ghc/rts/Main.h | 4 +++-
ghc/rts/PrimOps.hc | 4 +++-
ghc/rts/Printer.c | 4 ++--
ghc/rts/Printer.h | 4 +++-
ghc/rts/ProfRts.h | 4 ++--
ghc/rts/Profiling.c | 4 ++--
ghc/rts/Proftimer.c | 4 ++--
ghc/rts/QueueTemplate.h | 10 +++++++---
ghc/rts/RtsAPI.c | 4 +++-
ghc/rts/RtsFlags.c | 5 ++++-
ghc/rts/RtsFlags.h | 4 +++-
ghc/rts/RtsStartup.c | 4 +++-
ghc/rts/RtsUtils.c | 4 +++-
ghc/rts/RtsUtils.h | 4 +++-
ghc/rts/Sanity.c | 5 +++--
ghc/rts/Sanity.h | 4 +++-
ghc/rts/Schedule.c | 4 +++-
ghc/rts/Schedule.h | 4 ++--
ghc/rts/Signals.c | 4 +++-
ghc/rts/Signals.h | 4 +++-
ghc/rts/Stable.c | 4 ++--
ghc/rts/StablePriv.h | 4 +++-
ghc/rts/Stats.c | 4 +++-
ghc/rts/Stats.h | 4 +++-
ghc/rts/StgCRun.c | 4 +++-
ghc/rts/StgLongLong.c | 4 +++-
ghc/rts/StgMiscClosures.hc | 4 +++-
ghc/rts/StgPrimFloat.c | 4 +++-
ghc/rts/StgRun.h | 4 +++-
ghc/rts/StgStartup.h | 4 +++-
ghc/rts/StgStartup.hc | 4 +++-
ghc/rts/StgStdThunks.hc | 4 +++-
ghc/rts/Storage.c | 4 +++-
ghc/rts/Storage.h | 4 +++-
ghc/rts/StoragePriv.h | 4 +++-
ghc/rts/Ticky.c | 5 +++--
ghc/rts/Updates.hc | 4 +++-
ghc/rts/Weak.c | 4 +++-
ghc/rts/Weak.h | 4 +++-
85 files changed, 262 insertions(+), 118 deletions(-)
diff --git a/ghc/includes/Assembler.h b/ghc/includes/Assembler.h
index 105acf3cf18f..98c14792ea80 100644
--- a/ghc/includes/Assembler.h
+++ b/ghc/includes/Assembler.h
@@ -1,12 +1,10 @@
/* -*- mode: hugs-c; -*- */
/* -----------------------------------------------------------------------------
- * Bytecode assembler
+ * $Id: Assembler.h,v 1.4 1999/02/05 16:02:18 simonm Exp $
*
- * Copyright (c) 1994-1998.
+ * (c) The GHC Team 1994-1998.
*
- * $RCSfile: Assembler.h,v $
- * $Revision: 1.3 $
- * $Date: 1999/01/18 15:23:30 $
+ * Bytecode assembler
*
* NB This is one of the few files shared between Hugs and the runtime system,
* so it is very important that it not conflict with either and that it not
diff --git a/ghc/includes/Block.h b/ghc/includes/Block.h
index 113145e4a493..f924a8e93f2e 100644
--- a/ghc/includes/Block.h
+++ b/ghc/includes/Block.h
@@ -1,5 +1,7 @@
/* -----------------------------------------------------------------------------
- * $Id: Block.h,v 1.3 1999/01/13 17:25:51 simonm Exp $
+ * $Id: Block.h,v 1.4 1999/02/05 16:02:19 simonm Exp $
+ *
+ * (c) The GHC Team, 1998-1999
*
* Block structure for the storage manager
*
diff --git a/ghc/includes/CCall.h b/ghc/includes/CCall.h
index 8ad6499df674..97ff9df6499f 100644
--- a/ghc/includes/CCall.h
+++ b/ghc/includes/CCall.h
@@ -1,7 +1,10 @@
/* -----------------------------------------------------------------------------
- * $Id: CCall.h,v 1.2 1998/12/02 13:20:53 simonm Exp $
+ * $Id: CCall.h,v 1.3 1999/02/05 16:02:19 simonm Exp $
+ *
+ * (c) The GHC Team, 1998-1999
*
* Macros for performing C calls from the STG world.
+ *
* -------------------------------------------------------------------------- */
#ifndef CCALL_H
diff --git a/ghc/includes/ClosureMacros.h b/ghc/includes/ClosureMacros.h
index 76bec3e8e55b..c99caaa02de0 100644
--- a/ghc/includes/ClosureMacros.h
+++ b/ghc/includes/ClosureMacros.h
@@ -1,5 +1,7 @@
/* ----------------------------------------------------------------------------
- * $Id: ClosureMacros.h,v 1.3 1999/01/13 17:25:52 simonm Exp $
+ * $Id: ClosureMacros.h,v 1.4 1999/02/05 16:02:20 simonm Exp $
+ *
+ * (c) The GHC Team, 1998-1999
*
* Macros for building and manipulating closures
*
diff --git a/ghc/includes/ClosureTypes.h b/ghc/includes/ClosureTypes.h
index 65502a73db0d..544bc76647e9 100644
--- a/ghc/includes/ClosureTypes.h
+++ b/ghc/includes/ClosureTypes.h
@@ -1,6 +1,8 @@
/* ----------------------------------------------------------------------------
- * $Id: ClosureTypes.h,v 1.8 1999/02/05 15:25:01 simonm Exp $
+ * $Id: ClosureTypes.h,v 1.9 1999/02/05 16:02:20 simonm Exp $
*
+ * (c) The GHC Team, 1998-1999
+ *
* Closure Type Constants
*
* -------------------------------------------------------------------------- */
diff --git a/ghc/includes/Closures.h b/ghc/includes/Closures.h
index 35578270461f..f1b9169be096 100644
--- a/ghc/includes/Closures.h
+++ b/ghc/includes/Closures.h
@@ -1,5 +1,7 @@
/* ----------------------------------------------------------------------------
- * $Id: Closures.h,v 1.6 1999/02/05 12:41:31 sof Exp $
+ * $Id: Closures.h,v 1.7 1999/02/05 16:02:21 simonm Exp $
+ *
+ * (c) The GHC Team, 1998-1999
*
* Closures
*
diff --git a/ghc/includes/Constants.h b/ghc/includes/Constants.h
index fbb3dbf4ea31..2e2c37bbe276 100644
--- a/ghc/includes/Constants.h
+++ b/ghc/includes/Constants.h
@@ -1,5 +1,7 @@
/* ----------------------------------------------------------------------------
- * $Id: Constants.h,v 1.4 1999/01/26 16:16:20 simonm Exp $
+ * $Id: Constants.h,v 1.5 1999/02/05 16:02:21 simonm Exp $
+ *
+ * (c) The GHC Team, 1998-1999
*
* Constants
*
diff --git a/ghc/includes/Hooks.h b/ghc/includes/Hooks.h
index 3a53f19991af..16e28775b138 100644
--- a/ghc/includes/Hooks.h
+++ b/ghc/includes/Hooks.h
@@ -1,5 +1,7 @@
/* -----------------------------------------------------------------------------
- * $Id: Hooks.h,v 1.2 1998/12/02 13:21:08 simonm Exp $
+ * $Id: Hooks.h,v 1.3 1999/02/05 16:02:22 simonm Exp $
+ *
+ * (c) The GHC Team, 1998-1999
*
* User-overridable RTS hooks.
*
diff --git a/ghc/includes/InfoMacros.h b/ghc/includes/InfoMacros.h
index 4ff825e839e7..c64864e1d239 100644
--- a/ghc/includes/InfoMacros.h
+++ b/ghc/includes/InfoMacros.h
@@ -1,6 +1,8 @@
/* ----------------------------------------------------------------------------
- * $Id: InfoMacros.h,v 1.2 1998/12/02 13:21:09 simonm Exp $
+ * $Id: InfoMacros.h,v 1.3 1999/02/05 16:02:22 simonm Exp $
*
+ * (c) The GHC Team, 1998-1999
+ *
* Macros for building and deconstructing info tables.
*
* -------------------------------------------------------------------------- */
diff --git a/ghc/includes/InfoTables.h b/ghc/includes/InfoTables.h
index e7bc9a1db301..38079b740e3b 100644
--- a/ghc/includes/InfoTables.h
+++ b/ghc/includes/InfoTables.h
@@ -1,6 +1,8 @@
/* ----------------------------------------------------------------------------
- * $Id: InfoTables.h,v 1.9 1999/02/05 15:25:02 simonm Exp $
+ * $Id: InfoTables.h,v 1.10 1999/02/05 16:02:23 simonm Exp $
*
+ * (c) The GHC Team, 1998-1999
+ *
* Info Tables
*
* -------------------------------------------------------------------------- */
diff --git a/ghc/includes/MachDeps.h b/ghc/includes/MachDeps.h
index 1b52fd043a6f..eb8b6d7088d6 100644
--- a/ghc/includes/MachDeps.h
+++ b/ghc/includes/MachDeps.h
@@ -1,7 +1,8 @@
/* -----------------------------------------------------------------------------
- * $Id: MachDeps.h,v 1.2 1998/12/02 13:21:12 simonm Exp $
+ * $Id: MachDeps.h,v 1.3 1999/02/05 16:02:23 simonm Exp $
*
* (c) The GRASP/AQUA Project, Glasgow University, 1998
+ * (c) The GHC Team, 1998-1999
*
* Definitions that characterise machine specific properties of basic
* Stg types provided as unboxed types (mirrors the typedefs in
diff --git a/ghc/includes/MachRegs.h b/ghc/includes/MachRegs.h
index b4272d787995..d69b7b580895 100644
--- a/ghc/includes/MachRegs.h
+++ b/ghc/includes/MachRegs.h
@@ -1,5 +1,7 @@
/* -----------------------------------------------------------------------------
- * $Id: MachRegs.h,v 1.3 1999/01/18 14:31:50 sof Exp $
+ * $Id: MachRegs.h,v 1.4 1999/02/05 16:02:23 simonm Exp $
+ *
+ * (c) The GHC Team, 1998-1999
*
* Registers used in STG code. Might or might not correspond to
* actual machine registers.
diff --git a/ghc/includes/Prelude.h b/ghc/includes/Prelude.h
index dedfdbe605ad..a66c54bdc523 100644
--- a/ghc/includes/Prelude.h
+++ b/ghc/includes/Prelude.h
@@ -1,5 +1,7 @@
/* -----------------------------------------------------------------------------
- * $Id: Prelude.h,v 1.4 1999/01/27 14:51:14 simonpj Exp $
+ * $Id: Prelude.h,v 1.5 1999/02/05 16:02:24 simonm Exp $
+ *
+ * (c) The GHC Team, 1998-1999
*
* Prelude identifiers that we sometimes need to refer to in the RTS.
*
diff --git a/ghc/includes/PrimOps.h b/ghc/includes/PrimOps.h
index fe32074e3050..119894de2467 100644
--- a/ghc/includes/PrimOps.h
+++ b/ghc/includes/PrimOps.h
@@ -1,5 +1,7 @@
/* -----------------------------------------------------------------------------
- * $Id: PrimOps.h,v 1.15 1999/02/05 15:25:03 simonm Exp $
+ * $Id: PrimOps.h,v 1.16 1999/02/05 16:02:25 simonm Exp $
+ *
+ * (c) The GHC Team, 1998-1999
*
* Macros for primitive operations in STG-ish C code.
*
diff --git a/ghc/includes/Profiling.h b/ghc/includes/Profiling.h
index 8be56facd396..0c3ca360756d 100644
--- a/ghc/includes/Profiling.h
+++ b/ghc/includes/Profiling.h
@@ -1,7 +1,10 @@
/* -----------------------------------------------------------------------------
- * $Id: Profiling.h,v 1.2 1998/12/02 13:21:19 simonm Exp $
+ * $Id: Profiling.h,v 1.3 1999/02/05 16:02:26 simonm Exp $
+ *
+ * (c) The GHC Team, 1998-1999
*
* Cost-Centre Stack Profiling Include
+ *
* ---------------------------------------------------------------------------*/
diff --git a/ghc/includes/Regs.h b/ghc/includes/Regs.h
index a4908201384b..e1b59ff19d70 100644
--- a/ghc/includes/Regs.h
+++ b/ghc/includes/Regs.h
@@ -1,5 +1,7 @@
/* -----------------------------------------------------------------------------
- * $Id: Regs.h,v 1.2 1998/12/02 13:21:20 simonm Exp $
+ * $Id: Regs.h,v 1.3 1999/02/05 16:02:26 simonm Exp $
+ *
+ * (c) The GHC Team, 1998-1999
*
* Registers used in STG code. Might or might not correspond to
* actual machine registers.
diff --git a/ghc/includes/Rts.h b/ghc/includes/Rts.h
index b649e0b4d029..77f095cc745f 100644
--- a/ghc/includes/Rts.h
+++ b/ghc/includes/Rts.h
@@ -1,5 +1,7 @@
/* -----------------------------------------------------------------------------
- * $Id: Rts.h,v 1.5 1999/01/26 11:12:57 simonm Exp $
+ * $Id: Rts.h,v 1.6 1999/02/05 16:02:27 simonm Exp $
+ *
+ * (c) The GHC Team, 1998-1999
*
* Top-level include file for the RTS itself
*
diff --git a/ghc/includes/RtsAPI.h b/ghc/includes/RtsAPI.h
index fc22d0bd8ee3..cc6f7e7e32a4 100644
--- a/ghc/includes/RtsAPI.h
+++ b/ghc/includes/RtsAPI.h
@@ -1,5 +1,7 @@
/* ----------------------------------------------------------------------------
- * $Id: RtsAPI.h,v 1.2 1998/12/02 13:21:21 simonm Exp $
+ * $Id: RtsAPI.h,v 1.3 1999/02/05 16:02:27 simonm Exp $
+ *
+ * (c) The GHC Team, 1998-1999
*
* API for invoking Haskell functions via the RTS
*
diff --git a/ghc/includes/Stable.h b/ghc/includes/Stable.h
index 7ffa369d5fdd..4552439e8779 100644
--- a/ghc/includes/Stable.h
+++ b/ghc/includes/Stable.h
@@ -1,5 +1,7 @@
/* -----------------------------------------------------------------------------
- * $Id: Stable.h,v 1.1 1999/01/26 14:04:46 simonm Exp $
+ * $Id: Stable.h,v 1.2 1999/02/05 16:02:28 simonm Exp $
+ *
+ * (c) The GHC Team, 1998-1999
*
* Stable names and stable pointers
*
diff --git a/ghc/includes/Stg.h b/ghc/includes/Stg.h
index 3c9a1b46821f..f38eba401616 100644
--- a/ghc/includes/Stg.h
+++ b/ghc/includes/Stg.h
@@ -1,5 +1,7 @@
/* -----------------------------------------------------------------------------
- * $Id: Stg.h,v 1.5 1999/01/26 11:12:57 simonm Exp $
+ * $Id: Stg.h,v 1.6 1999/02/05 16:02:28 simonm Exp $
+ *
+ * (c) The GHC Team, 1998-1999
*
* Top-level include file for everything STG-ish.
*
diff --git a/ghc/includes/StgMacros.h b/ghc/includes/StgMacros.h
index c4a14210d3e0..646f0fc61468 100644
--- a/ghc/includes/StgMacros.h
+++ b/ghc/includes/StgMacros.h
@@ -1,5 +1,7 @@
/* -----------------------------------------------------------------------------
- * $Id: StgMacros.h,v 1.4 1999/01/23 17:51:27 sof Exp $
+ * $Id: StgMacros.h,v 1.5 1999/02/05 16:02:28 simonm Exp $
+ *
+ * (c) The GHC Team, 1998-1999
*
* Macros used for writing STG-ish C code.
*
diff --git a/ghc/includes/StgMiscClosures.h b/ghc/includes/StgMiscClosures.h
index 2f625b653645..12f0a1c766f4 100644
--- a/ghc/includes/StgMiscClosures.h
+++ b/ghc/includes/StgMiscClosures.h
@@ -1,5 +1,7 @@
/* -----------------------------------------------------------------------------
- * $Id: StgMiscClosures.h,v 1.8 1999/02/05 15:25:03 simonm Exp $
+ * $Id: StgMiscClosures.h,v 1.9 1999/02/05 16:02:29 simonm Exp $
+ *
+ * (c) The GHC Team, 1998-1999
*
* Entry code for various built-in closure types.
*
diff --git a/ghc/includes/StgStorage.h b/ghc/includes/StgStorage.h
index 964757bb45e4..c01f68b9bdff 100644
--- a/ghc/includes/StgStorage.h
+++ b/ghc/includes/StgStorage.h
@@ -1,5 +1,7 @@
/* -----------------------------------------------------------------------------
- * $Id: StgStorage.h,v 1.2 1998/12/02 13:21:41 simonm Exp $
+ * $Id: StgStorage.h,v 1.3 1999/02/05 16:02:29 simonm Exp $
+ *
+ * (c) The GHC Team, 1998-1999
*
* STG Storage Manger Interface
*
diff --git a/ghc/includes/StgTicky.h b/ghc/includes/StgTicky.h
index 014569e0f707..bd4fa1c12964 100644
--- a/ghc/includes/StgTicky.h
+++ b/ghc/includes/StgTicky.h
@@ -1,5 +1,8 @@
/* ----------------------------------------------------------------------------
- * $Id: StgTicky.h,v 1.2 1999/02/02 14:21:28 simonm Exp $
+ * $Id: StgTicky.h,v 1.3 1999/02/05 16:02:30 simonm Exp $
+ *
+ * (c) The AQUA project, Glasgow University, 1994-1997
+ * (c) The GHC Team, 1998-1999
*
* Ticky-ticky profiling macros.
*
diff --git a/ghc/includes/StgTypes.h b/ghc/includes/StgTypes.h
index c0675215573e..91f13b0b88d2 100644
--- a/ghc/includes/StgTypes.h
+++ b/ghc/includes/StgTypes.h
@@ -1,5 +1,7 @@
/* -----------------------------------------------------------------------------
- * $Id: StgTypes.h,v 1.3 1999/01/26 11:12:58 simonm Exp $
+ * $Id: StgTypes.h,v 1.4 1999/02/05 16:02:30 simonm Exp $
+ *
+ * (c) The GHC Team, 1998-1999
*
* Various C datatypes used in the run-time system.
diff --git a/ghc/includes/TSO.h b/ghc/includes/TSO.h
index c5f53c4e97d6..f22cbe57b5bd 100644
--- a/ghc/includes/TSO.h
+++ b/ghc/includes/TSO.h
@@ -1,5 +1,7 @@
/* -----------------------------------------------------------------------------
- * $Id: TSO.h,v 1.3 1999/01/13 17:25:55 simonm Exp $
+ * $Id: TSO.h,v 1.4 1999/02/05 16:02:30 simonm Exp $
+ *
+ * (c) The GHC Team, 1998-1999
*
* The definitions for Thread State Objects.
*
diff --git a/ghc/includes/TailCalls.h b/ghc/includes/TailCalls.h
index b59abb4bc32b..ab6edd061c6c 100644
--- a/ghc/includes/TailCalls.h
+++ b/ghc/includes/TailCalls.h
@@ -1,5 +1,7 @@
/* -----------------------------------------------------------------------------
- * $Id: TailCalls.h,v 1.2 1998/12/02 13:21:43 simonm Exp $
+ * $Id: TailCalls.h,v 1.3 1999/02/05 16:02:31 simonm Exp $
+ *
+ * (c) The GHC Team, 1998-1999
*
* Stuff for implementing proper tail jumps.
*
diff --git a/ghc/includes/Updates.h b/ghc/includes/Updates.h
index 04838e777cfe..ebcebf18c402 100644
--- a/ghc/includes/Updates.h
+++ b/ghc/includes/Updates.h
@@ -1,5 +1,7 @@
/* -----------------------------------------------------------------------------
- * $Id: Updates.h,v 1.6 1999/01/21 10:31:45 simonm Exp $
+ * $Id: Updates.h,v 1.7 1999/02/05 16:02:31 simonm Exp $
+ *
+ * (c) The GHC Team, 1998-1999
*
* Definitions related to updates.
*
diff --git a/ghc/rts/Assembler.c b/ghc/rts/Assembler.c
index 42ebbc2a75b1..f1e71a1589c0 100644
--- a/ghc/rts/Assembler.c
+++ b/ghc/rts/Assembler.c
@@ -1,12 +1,10 @@
/* -*- mode: hugs-c; -*- */
/* --------------------------------------------------------------------------
- * Bytecode assembler
+ * $Id: Assembler.c,v 1.4 1999/02/05 16:02:34 simonm Exp $
*
- * Copyright (c) 1994-1998.
+ * Copyright (c) The GHC Team 1994-1998.
*
- * $RCSfile: Assembler.c,v $
- * $Revision: 1.3 $
- * $Date: 1999/01/27 14:51:16 $
+ * Bytecode assembler
*
* This module provides functions to construct BCOs and other closures
* required by the bytecode compiler.
diff --git a/ghc/rts/BlockAlloc.c b/ghc/rts/BlockAlloc.c
index 26f2a60bc509..7c7dcae24be1 100644
--- a/ghc/rts/BlockAlloc.c
+++ b/ghc/rts/BlockAlloc.c
@@ -1,6 +1,8 @@
/* -----------------------------------------------------------------------------
- * $Id: BlockAlloc.c,v 1.3 1999/01/13 17:25:37 simonm Exp $
+ * $Id: BlockAlloc.c,v 1.4 1999/02/05 16:02:35 simonm Exp $
*
+ * (c) The GHC Team 1998-1999
+ *
* The block allocator and free list manager.
*
* This is the architecture independent part of the block allocator.
diff --git a/ghc/rts/BlockAlloc.h b/ghc/rts/BlockAlloc.h
index a121917c212a..ab6b199740d1 100644
--- a/ghc/rts/BlockAlloc.h
+++ b/ghc/rts/BlockAlloc.h
@@ -1,5 +1,7 @@
/* -----------------------------------------------------------------------------
- * $Id: BlockAlloc.h,v 1.4 1999/02/03 16:32:47 simonm Exp $
+ * $Id: BlockAlloc.h,v 1.5 1999/02/05 16:02:36 simonm Exp $
+ *
+ * (c) The GHC Team, 1998-1999
*
* Block Allocator Interface
*
diff --git a/ghc/rts/Bytecodes.h b/ghc/rts/Bytecodes.h
index c484863c97a9..daf3a9e4d6f3 100644
--- a/ghc/rts/Bytecodes.h
+++ b/ghc/rts/Bytecodes.h
@@ -1,4 +1,12 @@
/* -*- mode: hugs-c; -*- */
+/* -----------------------------------------------------------------------------
+ * $Id: Bytecodes.h,v 1.3 1999/02/05 16:02:36 simonm Exp $
+ *
+ * (c) The GHC Team, 1998-1999
+ *
+ * Bytecode definitions.
+ *
+ * ---------------------------------------------------------------------------*/
/* --------------------------------------------------------------------------
* Instructions
diff --git a/ghc/rts/DebugProf.c b/ghc/rts/DebugProf.c
index cd7ff5b95125..7cd73eb39cbf 100644
--- a/ghc/rts/DebugProf.c
+++ b/ghc/rts/DebugProf.c
@@ -1,7 +1,7 @@
/* -----------------------------------------------------------------------------
- * $Id: DebugProf.c,v 1.5 1999/02/05 15:25:04 simonm Exp $
+ * $Id: DebugProf.c,v 1.6 1999/02/05 16:02:36 simonm Exp $
*
- * (c) The GHC Team 1998
+ * (c) The GHC Team 1998-1999
*
* Simple Heap Profiling
*
diff --git a/ghc/rts/Disassembler.c b/ghc/rts/Disassembler.c
index 35d0c1c2fd78..65ef9f4f4ea2 100644
--- a/ghc/rts/Disassembler.c
+++ b/ghc/rts/Disassembler.c
@@ -1,12 +1,11 @@
/* -*- mode: hugs-c; -*- */
/* -----------------------------------------------------------------------------
- * Bytecode disassembler
+ * $Id: Disassembler.c,v 1.3 1999/02/05 16:02:37 simonm Exp $
+ *
+ * Copyright (c) The GHC Team 1994-1999.
*
- * Copyright (c) 1994-1998.
+ * Bytecode disassembler
*
- * $RCSfile: Disassembler.c,v $
- * $Revision: 1.2 $
- * $Date: 1998/12/02 13:28:15 $
* ---------------------------------------------------------------------------*/
#include "Rts.h"
diff --git a/ghc/rts/Disassembler.h b/ghc/rts/Disassembler.h
index 258ccaba9d05..d4d05a0dc339 100644
--- a/ghc/rts/Disassembler.h
+++ b/ghc/rts/Disassembler.h
@@ -1,5 +1,7 @@
/* -----------------------------------------------------------------------------
- * $Id: Disassembler.h,v 1.2 1998/12/02 13:28:16 simonm Exp $
+ * $Id: Disassembler.h,v 1.3 1999/02/05 16:02:37 simonm Exp $
+ *
+ * (c) The GHC Team, 1998-1999
*
* Prototypes for functions in Disassembler.c
*
diff --git a/ghc/rts/Evaluator.c b/ghc/rts/Evaluator.c
index b27c128fc12f..ebc5bf4a6fb0 100644
--- a/ghc/rts/Evaluator.c
+++ b/ghc/rts/Evaluator.c
@@ -1,12 +1,11 @@
/* -----------------------------------------------------------------------------
- * Bytecode evaluator
+ * $Id: Evaluator.c,v 1.8 1999/02/05 16:02:38 simonm Exp $
+ *
+ * Copyright (c) The GHC Team 1994-1999.
*
- * Copyright (c) 1994-1998.
+ * Bytecode evaluator
*
- * $RCSfile: Evaluator.c,v $
- * $Revision: 1.7 $
- * $Date: 1999/02/05 15:25:05 $
* ---------------------------------------------------------------------------*/
#include "Rts.h"
diff --git a/ghc/rts/Evaluator.h b/ghc/rts/Evaluator.h
index 3f9d73584964..0ed9888ab0fb 100644
--- a/ghc/rts/Evaluator.h
+++ b/ghc/rts/Evaluator.h
@@ -1,5 +1,7 @@
/* -----------------------------------------------------------------------------
- * $Id: Evaluator.h,v 1.3 1999/01/27 14:51:20 simonpj Exp $
+ * $Id: Evaluator.h,v 1.4 1999/02/05 16:02:40 simonm Exp $
+ *
+ * (c) The GHC Team, 1998-1999
*
* Prototypes for functions in Evaluator.c
*
diff --git a/ghc/rts/ForeignCall.c b/ghc/rts/ForeignCall.c
index 6974c29954a4..ff78cb9b4bc5 100644
--- a/ghc/rts/ForeignCall.c
+++ b/ghc/rts/ForeignCall.c
@@ -1,12 +1,11 @@
/* -*- mode: hugs-c; -*- */
/* -----------------------------------------------------------------------------
- * Foreign Function calls
+ * $Id: ForeignCall.c,v 1.3 1999/02/05 16:02:40 simonm Exp $
+ *
+ * (c) The GHC Team 1994-1999.
*
- * Copyright (c) 1994-1998.
+ * Foreign Function calls
*
- * $RCSfile: ForeignCall.c,v $
- * $Revision: 1.2 $
- * $Date: 1998/12/02 13:28:21 $
* ---------------------------------------------------------------------------*/
#include "Rts.h"
diff --git a/ghc/rts/ForeignCall.h b/ghc/rts/ForeignCall.h
index 508f49fb0578..8718ca01f84e 100644
--- a/ghc/rts/ForeignCall.h
+++ b/ghc/rts/ForeignCall.h
@@ -1,5 +1,7 @@
/* -----------------------------------------------------------------------------
- * $Id: ForeignCall.h,v 1.2 1998/12/02 13:28:23 simonm Exp $
+ * $Id: ForeignCall.h,v 1.3 1999/02/05 16:02:41 simonm Exp $
+ *
+ * (c) The GHC Team, 1998-1999
*
* Prototypes for functions in ForeignCall.c
*
diff --git a/ghc/rts/GC.c b/ghc/rts/GC.c
index 3311550567c8..e53d687da622 100644
--- a/ghc/rts/GC.c
+++ b/ghc/rts/GC.c
@@ -1,7 +1,9 @@
/* -----------------------------------------------------------------------------
- * $Id: GC.c,v 1.26 1999/02/05 15:25:07 simonm Exp $
+ * $Id: GC.c,v 1.27 1999/02/05 16:02:41 simonm Exp $
*
- * Two-space garbage collector
+ * (c) The GHC Team 1998-1999
+ *
+ * Generational garbage collector
*
* ---------------------------------------------------------------------------*/
diff --git a/ghc/rts/GC.h b/ghc/rts/GC.h
index 7b42b4e262e9..dc7beb8ec25a 100644
--- a/ghc/rts/GC.h
+++ b/ghc/rts/GC.h
@@ -1,5 +1,7 @@
/* -----------------------------------------------------------------------------
- * $Id: GC.h,v 1.3 1999/01/26 11:12:45 simonm Exp $
+ * $Id: GC.h,v 1.4 1999/02/05 16:02:43 simonm Exp $
+ *
+ * (c) The GHC Team, 1998-1999
*
* Prototypes for functions in GC.c
*
diff --git a/ghc/rts/HeapStackCheck.hc b/ghc/rts/HeapStackCheck.hc
index 7d814eed328e..2584c6853c11 100644
--- a/ghc/rts/HeapStackCheck.hc
+++ b/ghc/rts/HeapStackCheck.hc
@@ -1,5 +1,7 @@
/* -----------------------------------------------------------------------------
- * $Id: HeapStackCheck.hc,v 1.2 1998/12/02 13:28:26 simonm Exp $
+ * $Id: HeapStackCheck.hc,v 1.3 1999/02/05 16:02:43 simonm Exp $
+ *
+ * (c) The GHC Team, 1998-1999
*
* Canned Heap-Check and Stack-Check sequences.
*
diff --git a/ghc/rts/Itimer.c b/ghc/rts/Itimer.c
index 99811c7a0359..d40ab4e7c4e1 100644
--- a/ghc/rts/Itimer.c
+++ b/ghc/rts/Itimer.c
@@ -1,7 +1,7 @@
/* -----------------------------------------------------------------------------
- * $Id: Itimer.c,v 1.2 1998/12/02 13:28:27 simonm Exp $
+ * $Id: Itimer.c,v 1.3 1999/02/05 16:02:44 simonm Exp $
*
- * (c) The GHC Team, 1995-1998
+ * (c) The GHC Team, 1995-1999
*
* Interval timer for profiling and pre-emptive scheduling.
*
diff --git a/ghc/rts/Itimer.h b/ghc/rts/Itimer.h
index e415074d8677..0876e8445353 100644
--- a/ghc/rts/Itimer.h
+++ b/ghc/rts/Itimer.h
@@ -1,7 +1,7 @@
/* -----------------------------------------------------------------------------
- * $Id: Itimer.h,v 1.2 1998/12/02 13:28:28 simonm Exp $
+ * $Id: Itimer.h,v 1.3 1999/02/05 16:02:44 simonm Exp $
*
- * (c) The GHC Team 1998
+ * (c) The GHC Team 1998-1999
*
* Interval timer for profiling and pre-emptive scheduling.
*
diff --git a/ghc/rts/MBlock.c b/ghc/rts/MBlock.c
index 5e2fd2406307..96be15fe1bf2 100644
--- a/ghc/rts/MBlock.c
+++ b/ghc/rts/MBlock.c
@@ -1,5 +1,7 @@
/* -----------------------------------------------------------------------------
- * $Id: MBlock.c,v 1.8 1999/01/26 10:41:20 sof Exp $
+ * $Id: MBlock.c,v 1.9 1999/02/05 16:02:44 simonm Exp $
+ *
+ * (c) The GHC Team 1998-1999
*
* MegaBlock Allocator Interface. This file contains all the dirty
* architecture-dependent hackery required to get a chunk of aligned
diff --git a/ghc/rts/MBlock.h b/ghc/rts/MBlock.h
index 0fb902e7342c..1615f7048cb2 100644
--- a/ghc/rts/MBlock.h
+++ b/ghc/rts/MBlock.h
@@ -1,5 +1,7 @@
/* -----------------------------------------------------------------------------
- * $Id: MBlock.h,v 1.3 1999/01/13 17:25:41 simonm Exp $
+ * $Id: MBlock.h,v 1.4 1999/02/05 16:02:45 simonm Exp $
+ *
+ * (c) The GHC Team, 1998-1999
*
* MegaBlock Allocator interface.
*
diff --git a/ghc/rts/Main.h b/ghc/rts/Main.h
index 3a4d0ddbf567..3eaf69aeb224 100644
--- a/ghc/rts/Main.h
+++ b/ghc/rts/Main.h
@@ -1,5 +1,7 @@
/* -----------------------------------------------------------------------------
- * $Id: Main.h,v 1.2 1998/12/02 13:28:31 simonm Exp $
+ * $Id: Main.h,v 1.3 1999/02/05 16:02:45 simonm Exp $
+ *
+ * (c) The GHC Team, 1998-1999
*
* Prototypes for functions in Main.c
*
diff --git a/ghc/rts/PrimOps.hc b/ghc/rts/PrimOps.hc
index 0c9061340bb9..16fc0962c05f 100644
--- a/ghc/rts/PrimOps.hc
+++ b/ghc/rts/PrimOps.hc
@@ -1,5 +1,7 @@
/* -----------------------------------------------------------------------------
- * $Id: PrimOps.hc,v 1.12 1999/02/05 15:25:09 simonm Exp $
+ * $Id: PrimOps.hc,v 1.13 1999/02/05 16:02:45 simonm Exp $
+ *
+ * (c) The GHC Team, 1998-1999
*
* Primitive functions / data
*
diff --git a/ghc/rts/Printer.c b/ghc/rts/Printer.c
index 7d2fe71a881c..c314151a24c9 100644
--- a/ghc/rts/Printer.c
+++ b/ghc/rts/Printer.c
@@ -1,8 +1,8 @@
/* -*- mode: hugs-c; -*- */
/* -----------------------------------------------------------------------------
- * $Id: Printer.c,v 1.5 1999/02/05 14:44:43 simonm Exp $
+ * $Id: Printer.c,v 1.6 1999/02/05 16:02:46 simonm Exp $
*
- * Copyright (c) 1994-1998.
+ * Copyright (c) 1994-1999.
*
* Heap printer
*
diff --git a/ghc/rts/Printer.h b/ghc/rts/Printer.h
index e43589513f3c..bb92b6ba813f 100644
--- a/ghc/rts/Printer.h
+++ b/ghc/rts/Printer.h
@@ -1,5 +1,7 @@
/* -----------------------------------------------------------------------------
- * $Id: Printer.h,v 1.2 1998/12/02 13:28:34 simonm Exp $
+ * $Id: Printer.h,v 1.3 1999/02/05 16:02:47 simonm Exp $
+ *
+ * (c) The GHC Team, 1998-1999
*
* Prototypes for functions in Printer.c
*
diff --git a/ghc/rts/ProfRts.h b/ghc/rts/ProfRts.h
index 2dbb4b320d3d..2634f7a623e5 100644
--- a/ghc/rts/ProfRts.h
+++ b/ghc/rts/ProfRts.h
@@ -1,7 +1,7 @@
/* -----------------------------------------------------------------------------
- * $Id: ProfRts.h,v 1.2 1998/12/02 13:28:35 simonm Exp $
+ * $Id: ProfRts.h,v 1.3 1999/02/05 16:02:47 simonm Exp $
*
- * (c) The GHC Team, 1998
+ * (c) The GHC Team, 1998-1999
*
* Support for profiling
*
diff --git a/ghc/rts/Profiling.c b/ghc/rts/Profiling.c
index 4524fb0ffa89..45747ce772ac 100644
--- a/ghc/rts/Profiling.c
+++ b/ghc/rts/Profiling.c
@@ -1,7 +1,7 @@
/* -----------------------------------------------------------------------------
- * $Id: Profiling.c,v 1.2 1998/12/02 13:28:35 simonm Exp $
+ * $Id: Profiling.c,v 1.3 1999/02/05 16:02:48 simonm Exp $
*
- * (c) The GHC Team, 1998
+ * (c) The GHC Team, 1998-1999
*
* Support for profiling
*
diff --git a/ghc/rts/Proftimer.c b/ghc/rts/Proftimer.c
index bd50c9835013..077dc3f9f201 100644
--- a/ghc/rts/Proftimer.c
+++ b/ghc/rts/Proftimer.c
@@ -1,7 +1,7 @@
/* -----------------------------------------------------------------------------
- * $Id: Proftimer.c,v 1.2 1998/12/02 13:28:36 simonm Exp $
+ * $Id: Proftimer.c,v 1.3 1999/02/05 16:02:48 simonm Exp $
*
- * (c) The GHC Team, 1998
+ * (c) The GHC Team, 1998-1999
*
* Profiling interval timer
*
diff --git a/ghc/rts/QueueTemplate.h b/ghc/rts/QueueTemplate.h
index 41bd45fd2420..a16d12b1e1a2 100644
--- a/ghc/rts/QueueTemplate.h
+++ b/ghc/rts/QueueTemplate.h
@@ -1,5 +1,9 @@
/* -*- mode: hugs-c; -*- */
-/* --------------------------------------------------------------------------
+/* -----------------------------------------------------------------------------
+ * $Id: QueueTemplate.h,v 1.3 1999/02/05 16:02:48 simonm Exp $
+ *
+ * (c) The GHC Team, 1998
+ *
* Template for generating queues of various types
*
* #define Queue##ChunkSize, Queue and Type before #including this file
@@ -13,8 +17,8 @@
* Copyright (c) 1994-1998.
*
* $RCSfile: QueueTemplate.h,v $
- * $Revision: 1.2 $
- * $Date: 1998/12/02 13:28:37 $
+ * $Revision: 1.3 $
+ * $Date: 1999/02/05 16:02:48 $
*
* ------------------------------------------------------------------------*/
diff --git a/ghc/rts/RtsAPI.c b/ghc/rts/RtsAPI.c
index 4cc976d7b073..d4214d14a872 100644
--- a/ghc/rts/RtsAPI.c
+++ b/ghc/rts/RtsAPI.c
@@ -1,5 +1,7 @@
/* ----------------------------------------------------------------------------
- * $Id: RtsAPI.c,v 1.3 1999/01/27 14:51:21 simonpj Exp $
+ * $Id: RtsAPI.c,v 1.4 1999/02/05 16:02:49 simonm Exp $
+ *
+ * (c) The GHC Team, 1998-1999
*
* API for invoking Haskell functions via the RTS
*
diff --git a/ghc/rts/RtsFlags.c b/ghc/rts/RtsFlags.c
index 60a1f9ef4c47..ad2df3ac4c0b 100644
--- a/ghc/rts/RtsFlags.c
+++ b/ghc/rts/RtsFlags.c
@@ -1,5 +1,8 @@
/* -----------------------------------------------------------------------------
- * $Id: RtsFlags.c,v 1.8 1999/01/27 16:41:16 simonm Exp $
+ * $Id: RtsFlags.c,v 1.9 1999/02/05 16:02:49 simonm Exp $
+ *
+ * (c) The AQUA Project, Glasgow University, 1994-1997
+ * (c) The GHC Team, 1998-1999
*
* Functions for parsing the argument list.
*
diff --git a/ghc/rts/RtsFlags.h b/ghc/rts/RtsFlags.h
index 633f27299475..12588dce6267 100644
--- a/ghc/rts/RtsFlags.h
+++ b/ghc/rts/RtsFlags.h
@@ -1,5 +1,7 @@
/* -----------------------------------------------------------------------------
- * $Id: RtsFlags.h,v 1.8 1999/01/27 16:41:16 simonm Exp $
+ * $Id: RtsFlags.h,v 1.9 1999/02/05 16:02:50 simonm Exp $
+ *
+ * (c) The GHC Team, 1998-1999
*
* Datatypes that holds the command-line flag settings.
*
diff --git a/ghc/rts/RtsStartup.c b/ghc/rts/RtsStartup.c
index d079f6ed8e03..a0e976e54edf 100644
--- a/ghc/rts/RtsStartup.c
+++ b/ghc/rts/RtsStartup.c
@@ -1,5 +1,7 @@
/* -----------------------------------------------------------------------------
- * $Id: RtsStartup.c,v 1.5 1999/01/26 11:12:47 simonm Exp $
+ * $Id: RtsStartup.c,v 1.6 1999/02/05 16:02:50 simonm Exp $
+ *
+ * (c) The GHC Team, 1998-1999
*
* Main function for a standalone Haskell program.
*
diff --git a/ghc/rts/RtsUtils.c b/ghc/rts/RtsUtils.c
index b9f2ff966042..95afe0c26b82 100644
--- a/ghc/rts/RtsUtils.c
+++ b/ghc/rts/RtsUtils.c
@@ -1,5 +1,7 @@
/* -----------------------------------------------------------------------------
- * $Id: RtsUtils.c,v 1.5 1999/01/29 09:30:51 simonm Exp $
+ * $Id: RtsUtils.c,v 1.6 1999/02/05 16:02:51 simonm Exp $
+ *
+ * (c) The GHC Team, 1998-1999
*
* General utility functions used in the RTS.
*
diff --git a/ghc/rts/RtsUtils.h b/ghc/rts/RtsUtils.h
index 72047b0e984b..94693f24eef9 100644
--- a/ghc/rts/RtsUtils.h
+++ b/ghc/rts/RtsUtils.h
@@ -1,5 +1,7 @@
/* -----------------------------------------------------------------------------
- * $Id: RtsUtils.h,v 1.2 1998/12/02 13:28:42 simonm Exp $
+ * $Id: RtsUtils.h,v 1.3 1999/02/05 16:02:51 simonm Exp $
+ *
+ * (c) The GHC Team, 1998-1999
*
* General utility functions used in the RTS.
*
diff --git a/ghc/rts/Sanity.c b/ghc/rts/Sanity.c
index ed8cdc37615e..1260f8ca0bb6 100644
--- a/ghc/rts/Sanity.c
+++ b/ghc/rts/Sanity.c
@@ -1,5 +1,7 @@
/* -----------------------------------------------------------------------------
- * $Id: Sanity.c,v 1.8 1999/02/02 12:37:14 simonm Exp $
+ * $Id: Sanity.c,v 1.9 1999/02/05 16:02:52 simonm Exp $
+ *
+ * (c) The GHC Team, 1998-1999
*
* Sanity checking code for the heap and stack.
*
@@ -310,7 +312,6 @@ checkClosure( StgClosure* p )
}
case ARR_WORDS:
- case MUT_ARR_WORDS:
return arr_words_sizeW(stgCast(StgArrWords*,p));
case MUT_ARR_PTRS:
diff --git a/ghc/rts/Sanity.h b/ghc/rts/Sanity.h
index 581e02938ca3..6ab9c846d94b 100644
--- a/ghc/rts/Sanity.h
+++ b/ghc/rts/Sanity.h
@@ -1,5 +1,7 @@
/* -----------------------------------------------------------------------------
- * $Id: Sanity.h,v 1.3 1999/01/13 17:25:44 simonm Exp $
+ * $Id: Sanity.h,v 1.4 1999/02/05 16:02:52 simonm Exp $
+ *
+ * (c) The GHC Team, 1998-1999
*
* Prototypes for functions in Sanity.c
*
diff --git a/ghc/rts/Schedule.c b/ghc/rts/Schedule.c
index 48f9e39a863a..0b273c403a21 100644
--- a/ghc/rts/Schedule.c
+++ b/ghc/rts/Schedule.c
@@ -1,5 +1,7 @@
/* -----------------------------------------------------------------------------
- * $Id: Schedule.c,v 1.8 1999/02/03 16:32:47 simonm Exp $
+ * $Id: Schedule.c,v 1.9 1999/02/05 16:02:53 simonm Exp $
+ *
+ * (c) The GHC Team, 1998-1999
*
* Scheduler
*
diff --git a/ghc/rts/Schedule.h b/ghc/rts/Schedule.h
index 4e41974e6e4c..e55d038f6e67 100644
--- a/ghc/rts/Schedule.h
+++ b/ghc/rts/Schedule.h
@@ -1,7 +1,7 @@
/* -----------------------------------------------------------------------------
- * $Id: Schedule.h,v 1.2 1998/12/02 13:28:46 simonm Exp $
+ * $Id: Schedule.h,v 1.3 1999/02/05 16:02:53 simonm Exp $
*
- * (c) The GHC Team 1998
+ * (c) The GHC Team 1998-1999
*
* Prototypes for functions in Schedule.c
* (RTS internal scheduler interface)
diff --git a/ghc/rts/Signals.c b/ghc/rts/Signals.c
index 70621025cd2d..6d9ea447e1b9 100644
--- a/ghc/rts/Signals.c
+++ b/ghc/rts/Signals.c
@@ -1,5 +1,7 @@
/* -----------------------------------------------------------------------------
- * $Id: Signals.c,v 1.3 1999/01/26 11:12:49 simonm Exp $
+ * $Id: Signals.c,v 1.4 1999/02/05 16:02:54 simonm Exp $
+ *
+ * (c) The GHC Team, 1998-1999
*
* Signal processing / handling.
*
diff --git a/ghc/rts/Signals.h b/ghc/rts/Signals.h
index cee39eecb8cf..0d8a2221380a 100644
--- a/ghc/rts/Signals.h
+++ b/ghc/rts/Signals.h
@@ -1,5 +1,7 @@
/* -----------------------------------------------------------------------------
- * $Id: Signals.h,v 1.2 1998/12/02 13:28:47 simonm Exp $
+ * $Id: Signals.h,v 1.3 1999/02/05 16:02:55 simonm Exp $
+ *
+ * (c) The GHC Team, 1998-1999
*
* Signal processing / handling.
*
diff --git a/ghc/rts/Stable.c b/ghc/rts/Stable.c
index b4021b69f702..9f1414efd4f4 100644
--- a/ghc/rts/Stable.c
+++ b/ghc/rts/Stable.c
@@ -1,7 +1,7 @@
/* -----------------------------------------------------------------------------
- * $Id: Stable.c,v 1.1 1999/01/27 10:11:27 simonm Exp $
+ * $Id: Stable.c,v 1.2 1999/02/05 16:02:55 simonm Exp $
*
- * (c) The GHC Team 1998-1999
+ * (c) The GHC Team, 1998-1999
*
* Stable names and stable pointers.
*
diff --git a/ghc/rts/StablePriv.h b/ghc/rts/StablePriv.h
index 410560552b24..f245216050de 100644
--- a/ghc/rts/StablePriv.h
+++ b/ghc/rts/StablePriv.h
@@ -1,5 +1,7 @@
/* -----------------------------------------------------------------------------
- * $Id: StablePriv.h,v 1.1 1999/01/26 14:18:38 simonm Exp $
+ * $Id: StablePriv.h,v 1.2 1999/02/05 16:02:56 simonm Exp $
+ *
+ * (c) The GHC Team, 1998-1999
*
* Internal RTS API for stable names and stable ptrs.
*
diff --git a/ghc/rts/Stats.c b/ghc/rts/Stats.c
index 061bbdd6ddad..9dd0612aa092 100644
--- a/ghc/rts/Stats.c
+++ b/ghc/rts/Stats.c
@@ -1,5 +1,7 @@
/* -----------------------------------------------------------------------------
- * $Id: Stats.c,v 1.5 1999/02/03 16:42:18 simonm Exp $
+ * $Id: Stats.c,v 1.6 1999/02/05 16:02:56 simonm Exp $
+ *
+ * (c) The GHC Team, 1998-1999
*
* Statistics and timing-related functions.
*
diff --git a/ghc/rts/Stats.h b/ghc/rts/Stats.h
index 2b9c0a5a5b69..9908e1c73e91 100644
--- a/ghc/rts/Stats.h
+++ b/ghc/rts/Stats.h
@@ -1,5 +1,7 @@
/* -----------------------------------------------------------------------------
- * $Id: Stats.h,v 1.3 1999/01/13 17:25:46 simonm Exp $
+ * $Id: Stats.h,v 1.4 1999/02/05 16:02:57 simonm Exp $
+ *
+ * (c) The GHC Team, 1998-1999
*
* Statistics and timing-related functions.
*
diff --git a/ghc/rts/StgCRun.c b/ghc/rts/StgCRun.c
index 775f08942462..09127d89ee5b 100644
--- a/ghc/rts/StgCRun.c
+++ b/ghc/rts/StgCRun.c
@@ -1,5 +1,7 @@
/* -----------------------------------------------------------------------------
- * $Id: StgCRun.c,v 1.2 1998/12/02 13:28:50 simonm Exp $
+ * $Id: StgCRun.c,v 1.3 1999/02/05 16:02:57 simonm Exp $
+ *
+ * (c) The GHC Team, 1998-1999
*
* STG-to-C glue. Some architectures have this code written in
* straight assembler (see StgRun.S), some in C.
diff --git a/ghc/rts/StgLongLong.c b/ghc/rts/StgLongLong.c
index a504016f0f50..7c085d81d137 100644
--- a/ghc/rts/StgLongLong.c
+++ b/ghc/rts/StgLongLong.c
@@ -1,5 +1,7 @@
/* -----------------------------------------------------------------------------
- * $Id: StgLongLong.c,v 1.2 1998/12/02 13:28:51 simonm Exp $
+ * $Id: StgLongLong.c,v 1.3 1999/02/05 16:02:58 simonm Exp $
+ *
+ * (c) The GHC Team, 1998-1999
*
* Primitive operations over (64-bit) long longs
* (only used on 32-bit platforms.)
diff --git a/ghc/rts/StgMiscClosures.hc b/ghc/rts/StgMiscClosures.hc
index e17a02ba4c54..fcf26d9dc509 100644
--- a/ghc/rts/StgMiscClosures.hc
+++ b/ghc/rts/StgMiscClosures.hc
@@ -1,5 +1,7 @@
/* -----------------------------------------------------------------------------
- * $Id: StgMiscClosures.hc,v 1.12 1999/02/05 15:25:09 simonm Exp $
+ * $Id: StgMiscClosures.hc,v 1.13 1999/02/05 16:02:58 simonm Exp $
+ *
+ * (c) The GHC Team, 1998-1999
*
* Entry code for various built-in closure types.
*
diff --git a/ghc/rts/StgPrimFloat.c b/ghc/rts/StgPrimFloat.c
index 111cccea5efc..8c3bef634d09 100644
--- a/ghc/rts/StgPrimFloat.c
+++ b/ghc/rts/StgPrimFloat.c
@@ -1,5 +1,7 @@
/* -----------------------------------------------------------------------------
- * $Id: StgPrimFloat.c,v 1.2 1998/12/02 13:28:53 simonm Exp $
+ * $Id: StgPrimFloat.c,v 1.3 1999/02/05 16:02:59 simonm Exp $
+ *
+ * (c) The GHC Team, 1998-1999
*
* Miscellaneous support for floating-point primitives
*
diff --git a/ghc/rts/StgRun.h b/ghc/rts/StgRun.h
index e1e70319cf10..b617581f8231 100644
--- a/ghc/rts/StgRun.h
+++ b/ghc/rts/StgRun.h
@@ -1,5 +1,7 @@
/* -----------------------------------------------------------------------------
- * $Id: StgRun.h,v 1.2 1998/12/02 13:28:54 simonm Exp $
+ * $Id: StgRun.h,v 1.3 1999/02/05 16:02:59 simonm Exp $
+ *
+ * (c) The GHC Team, 1998-1999
*
* Tiny assembler 'layer' between the C and STG worlds.
*
diff --git a/ghc/rts/StgStartup.h b/ghc/rts/StgStartup.h
index 1fd72d7e1e80..0bd3b52fdb4b 100644
--- a/ghc/rts/StgStartup.h
+++ b/ghc/rts/StgStartup.h
@@ -1,5 +1,7 @@
/* -----------------------------------------------------------------------------
- * $Id: StgStartup.h,v 1.2 1998/12/02 13:28:54 simonm Exp $
+ * $Id: StgStartup.h,v 1.3 1999/02/05 16:03:00 simonm Exp $
+ *
+ * (c) The GHC Team, 1998-1999
*
* Code for starting, stopping and restarting threads.
*
diff --git a/ghc/rts/StgStartup.hc b/ghc/rts/StgStartup.hc
index b92fb09e77c5..6a87b1d4ae75 100644
--- a/ghc/rts/StgStartup.hc
+++ b/ghc/rts/StgStartup.hc
@@ -1,5 +1,7 @@
/* -----------------------------------------------------------------------------
- * $Id: StgStartup.hc,v 1.2 1998/12/02 13:28:55 simonm Exp $
+ * $Id: StgStartup.hc,v 1.3 1999/02/05 16:03:00 simonm Exp $
+ *
+ * (c) The GHC Team, 1998-1999
*
* Code for starting, stopping and restarting threads.
*
diff --git a/ghc/rts/StgStdThunks.hc b/ghc/rts/StgStdThunks.hc
index 79793a15810e..b7cac13f6adc 100644
--- a/ghc/rts/StgStdThunks.hc
+++ b/ghc/rts/StgStdThunks.hc
@@ -1,5 +1,7 @@
/* -----------------------------------------------------------------------------
- * $Id: StgStdThunks.hc,v 1.2 1998/12/02 13:28:56 simonm Exp $
+ * $Id: StgStdThunks.hc,v 1.3 1999/02/05 16:03:00 simonm Exp $
+ *
+ * (c) The GHC Team, 1998-1999
*
* Canned "Standard Form" Thunks
*
diff --git a/ghc/rts/Storage.c b/ghc/rts/Storage.c
index ce745f605431..e94094b3ca0c 100644
--- a/ghc/rts/Storage.c
+++ b/ghc/rts/Storage.c
@@ -1,5 +1,7 @@
/* -----------------------------------------------------------------------------
- * $Id: Storage.c,v 1.11 1999/02/05 14:48:01 simonm Exp $
+ * $Id: Storage.c,v 1.12 1999/02/05 16:03:01 simonm Exp $
+ *
+ * (c) The GHC Team, 1998-1999
*
* Storage manager front end
*
diff --git a/ghc/rts/Storage.h b/ghc/rts/Storage.h
index b4a22b98f3b9..fc93e0159629 100644
--- a/ghc/rts/Storage.h
+++ b/ghc/rts/Storage.h
@@ -1,5 +1,7 @@
/* -----------------------------------------------------------------------------
- * $Id: Storage.h,v 1.6 1999/02/02 14:21:34 simonm Exp $
+ * $Id: Storage.h,v 1.7 1999/02/05 16:03:01 simonm Exp $
+ *
+ * (c) The GHC Team, 1998-1999
*
* External Storage Manger Interface
*
diff --git a/ghc/rts/StoragePriv.h b/ghc/rts/StoragePriv.h
index f36e1bf35ae3..4326550cb696 100644
--- a/ghc/rts/StoragePriv.h
+++ b/ghc/rts/StoragePriv.h
@@ -1,5 +1,7 @@
/* -----------------------------------------------------------------------------
- * $Id: StoragePriv.h,v 1.7 1999/02/02 14:21:34 simonm Exp $
+ * $Id: StoragePriv.h,v 1.8 1999/02/05 16:03:02 simonm Exp $
+ *
+ * (c) The GHC Team, 1998-1999
*
* Internal Storage Manger Interface
*
diff --git a/ghc/rts/Ticky.c b/ghc/rts/Ticky.c
index 787b066b919a..9e070fe10561 100644
--- a/ghc/rts/Ticky.c
+++ b/ghc/rts/Ticky.c
@@ -1,7 +1,8 @@
/* -----------------------------------------------------------------------------
- * $Id: Ticky.c,v 1.2 1999/02/02 14:21:34 simonm Exp $
+ * $Id: Ticky.c,v 1.3 1999/02/05 16:03:02 simonm Exp $
*
- * (c) The GHC Team, Glasgow University, 1992-1998
+ * (c) The AQUA project, Glasgow University, 1992-1997
+ * (c) The GHC Team, 1998-1999
*
* Ticky-ticky profiling
*-------------------------------------------------------------------------- */
diff --git a/ghc/rts/Updates.hc b/ghc/rts/Updates.hc
index 8fc0fae7eddf..d3b5ba60bc61 100644
--- a/ghc/rts/Updates.hc
+++ b/ghc/rts/Updates.hc
@@ -1,5 +1,7 @@
/* -----------------------------------------------------------------------------
- * $Id: Updates.hc,v 1.8 1999/01/27 14:51:23 simonpj Exp $
+ * $Id: Updates.hc,v 1.9 1999/02/05 16:03:03 simonm Exp $
+ *
+ * (c) The GHC Team, 1998-1999
*
* Code to perform updates.
*
diff --git a/ghc/rts/Weak.c b/ghc/rts/Weak.c
index 8fe2575b0809..59dc19287bd7 100644
--- a/ghc/rts/Weak.c
+++ b/ghc/rts/Weak.c
@@ -1,5 +1,7 @@
/* -----------------------------------------------------------------------------
- * $Id: Weak.c,v 1.6 1999/02/02 14:17:45 simonm Exp $
+ * $Id: Weak.c,v 1.7 1999/02/05 16:03:03 simonm Exp $
+ *
+ * (c) The GHC Team, 1998-1999
*
* Weak pointers / finalisers
*
diff --git a/ghc/rts/Weak.h b/ghc/rts/Weak.h
index 25c928f1900b..75c276d6bafa 100644
--- a/ghc/rts/Weak.h
+++ b/ghc/rts/Weak.h
@@ -1,5 +1,7 @@
/* -----------------------------------------------------------------------------
- * $Id: Weak.h,v 1.2 1998/12/02 13:29:01 simonm Exp $
+ * $Id: Weak.h,v 1.3 1999/02/05 16:03:04 simonm Exp $
+ *
+ * (c) The GHC Team, 1998-1999
*
* Weak pointers / finalisers
*
--
GitLab