From: simonm <unknown>
Date: Thu, 25 Mar 1999 13:01:44 +0000 (+0000)
Subject: [project @ 1999-03-25 13:01:44 by simonm]
X-Git-Tag: Approximately_9120_patches~6354
X-Git-Url: http://git.megacz.com/?a=commitdiff_plain;h=46a9181dbd6a9ef8b327d280607d8777cd622e10;p=ghc-hetmet.git

[project @ 1999-03-25 13:01:44 by simonm]
RET_DYN doesn't have a proper header, just an info pointer.
---

diff --git a/ghc/includes/Closures.h b/ghc/includes/Closures.h
index cb2270a..17bcbf2 100644
--- a/ghc/includes/Closures.h
+++ b/ghc/includes/Closures.h
@@ -1,5 +1,5 @@
 /* ----------------------------------------------------------------------------
- * $Id: Closures.h,v 1.11 1999/03/09 14:24:46 sewardj Exp $
+ * $Id: Closures.h,v 1.12 1999/03/25 13:01:44 simonm Exp $
  *
  * (c) The GHC Team, 1998-1999
  *
@@ -277,7 +277,7 @@ typedef struct _StgDeadWeak {	/* Weak v */
  */
  
 typedef struct {
-  StgHeader      header;
+  const struct _StgInfoTable* info;
   StgWord        liveness;
   StgWord        ret_addr;
   StgWord        payload[0];