X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=ghc%2Fincludes%2FClosures.h;h=93dfb30172491bb2bfe4d8f0a1be3b200580627d;hb=dbef766ce79e37a74468a07a93b15ba1f06fe8f8;hp=0f413b58a1ea1a465a5ac541a22eed03c5a0d8cc;hpb=5680ea4b2035198981739e24ad04cd0e0d133172;p=ghc-hetmet.git

diff --git a/ghc/includes/Closures.h b/ghc/includes/Closures.h
index 0f413b5..93dfb30 100644
--- a/ghc/includes/Closures.h
+++ b/ghc/includes/Closures.h
@@ -1,5 +1,5 @@
 /* ----------------------------------------------------------------------------
- * $Id: Closures.h,v 1.29 2001/11/22 14:25:11 simonmar Exp $
+ * $Id: Closures.h,v 1.30 2001/11/26 16:54:22 simonmar Exp $
  *
  * (c) The GHC Team, 1998-1999
  *
@@ -22,7 +22,7 @@
 typedef struct {
   CostCentreStack *ccs;
   union {
-    RetainerSet *rs;          // Retainer Set
+    struct _RetainerSet *rs;  // Retainer Set
     StgWord ldvw;             // Lag/Drag/Void Word
   } hp;
 } StgProfHeader;