X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;ds=sidebyside;f=ghc%2Fincludes%2FmkDerivedConstants.c;h=4f47a109bd21252644b6e7ae221c59d9780f5080;hb=1a03162e0239a336d297383107a68d06814e8924;hp=fc0e59198d8984dc8b1bff65f27252e1e150190b;hpb=b4623557bb3c8bec7232e4e68a8be8cf28fbbda6;p=ghc-hetmet.git

diff --git a/ghc/includes/mkDerivedConstants.c b/ghc/includes/mkDerivedConstants.c
index fc0e591..4f47a10 100644
--- a/ghc/includes/mkDerivedConstants.c
+++ b/ghc/includes/mkDerivedConstants.c
@@ -1,5 +1,5 @@
 /* --------------------------------------------------------------------------
- * $Id: mkDerivedConstants.c,v 1.1 2001/10/03 13:57:42 simonmar Exp $
+ * $Id: mkDerivedConstants.c,v 1.4 2002/12/11 15:36:40 simonmar Exp $
  *
  * (c) The GHC Team, 1992-1998
  *
@@ -7,7 +7,8 @@
  *
  * ------------------------------------------------------------------------*/
 
-#include "Rts.h"
+#define IN_STG_CODE 0
+#include "Stg.h"
 
 #define OFFSET(s_type, field) ((unsigned int)&(((s_type*)0)->field))
 
@@ -19,8 +20,6 @@ main(int argc, char *argv[])
     printf("#define STD_HDR_SIZE   %d\n", sizeofW(StgHeader));
     printf("#define PROF_HDR_SIZE  %d\n", sizeofW(StgProfHeader));
     printf("#define GRAN_HDR_SIZE  %d\n", sizeofW(StgGranHeader));
-    printf("#define PAR_HDR_SIZE   %d\n", sizeofW(StgParHeader));
-    printf("#define TICKY_HDR_SIZE %d\n", sizeofW(StgTickyHeader));
 
     printf("#define ARR_WORDS_HDR_SIZE  %d\n", 
 	   sizeofW(StgArrWords) - sizeofW(StgHeader));
@@ -29,9 +28,9 @@ main(int argc, char *argv[])
 	   sizeofW(StgMutArrPtrs) - sizeofW(StgHeader));
 
     printf("#define STD_ITBL_SIZE   %d\n", sizeofW(StgInfoTable));
+    printf("#define RET_ITBL_SIZE   %d\n", sizeofW(StgRetInfoTable) - sizeofW(StgInfoTable));
     printf("#define PROF_ITBL_SIZE  %d\n", sizeofW(StgProfInfo));
     printf("#define GRAN_ITBL_SIZE  %d\n", 0);
-    printf("#define PAR_ITBL_SIZE   %d\n", sizeofW(StgParInfo));
     printf("#define TICKY_ITBL_SIZE %d\n", sizeofW(StgTickyInfo));
 
     printf("#define STD_UF_SIZE   %d\n", sizeofW(StgUpdateFrame));
@@ -43,18 +42,9 @@ main(int argc, char *argv[])
     printf("#define UF_RET     %d\n",
 	   OFFSET(StgUpdateFrame,header.info));
 
-    printf("#define UF_SU      %d\n",  
-	   OFFSET(StgUpdateFrame,link) / sizeof(W_));
-
     printf("#define UF_UPDATEE %d\n",
 	   OFFSET(StgUpdateFrame,updatee) / sizeof(W_));
 
-    printf("#define STD_SEQ_FRAME_SIZE   %d\n", sizeofW(StgSeqFrame));
-    printf("#define GRAN_SEQ_FRAME_SIZE   %d\n",  
-	   sizeofW(StgSeqFrame) + sizeofW(StgGranHeader));
-    printf("#define PROF_SEQ_FRAME_SIZE   %d\n",  
-	   sizeofW(StgSeqFrame) + sizeofW(StgProfHeader));
-
     printf("#define BLOCK_SIZE   %d\n", BLOCK_SIZE);
     printf("#define MBLOCK_SIZE   %d\n", MBLOCK_SIZE);  
     return 0;