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 105acf3..98c1479 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 113145e..f924a8e 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 8ad6499..97ff9df 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 76bec3e..c99caaa 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 65502a7..544bc76 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 3557827..f1b9169 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 fbb3dbf..2e2c37b 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 3a53f19..16e2877 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 4ff825e..c64864e 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 e7bc9a1..38079b7 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 1b52fd0..eb8b6d7 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 b4272d7..d69b7b5 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 dedfdbe..a66c54b 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 fe32074..119894d 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 8be56fa..0c3ca36 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 a490820..e1b59ff 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 b649e0b..77f095c 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 fc22d0b..cc6f7e7 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 7ffa369..4552439 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 3c9a1b4..f38eba4 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 c4a1421..646f0fc 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 2f625b6..12f0a1c 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 964757b..c01f68b 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 014569e..bd4fa1c 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 c067521..91f13b0 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 c5f53c4..f22cbe5 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 b59abb4..ab6edd0 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 04838e7..ebcebf1 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 42ebbc2..f1e71a1 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 26f2a60..7c7dcae 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 a121917..ab6b199 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 c484863..daf3a9e 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 cd7ff5b..7cd73eb 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 35d0c1c..65ef9f4 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 258ccab..d4d05a0 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 b27c128..ebc5bf4 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 3f9d735..0ed9888 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 6974c29..ff78cb9 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 508f49f..8718ca0 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 3311550..e53d687 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 7b42b4e..dc7beb8 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 7d814ee..2584c68 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 99811c7..d40ab4e 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 e415074..0876e84 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 5e2fd24..96be15f 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 0fb902e..1615f70 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 3a4d0dd..3eaf69a 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 0c90613..16fc096 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 7d2fe71..c314151 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 e435895..bb92b6b 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 2dbb4b3..2634f7a 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 4524fb0..45747ce 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 bd50c98..077dc3f 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 41bd45f..a16d12b 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 4cc976d..d4214d1 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 60a1f9e..ad2df3a 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 633f272..12588dc 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 d079f6e..a0e976e 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 b9f2ff9..95afe0c 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 72047b0..94693f2 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 ed8cdc3..1260f8c 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 581e029..6ab9c84 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 48f9e39..0b273c4 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 4e41974..e55d038 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 7062102..6d9ea44 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 cee39ee..0d8a222 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 b4021b6..9f1414e 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 4105605..f245216 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 061bbdd..9dd0612 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 2b9c0a5..9908e1c 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 775f089..09127d8 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 a504016..7c085d8 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 e17a02b..fcf26d9 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 111ccce..8c3bef6 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 e1e7031..b617581 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 1fd72d7..0bd3b52 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 b92fb09..6a87b1d 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 79793a1..b7cac13 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 ce745f6..e94094b 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 b4a22b9..fc93e01 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 f36e1bf..4326550 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 787b066..9e070fe 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 8fc0fae..d3b5ba6 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 8fe2575..59dc192 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 25c928f..75c276d 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
  *
-- 
1.7.10.4