/* --------------------------------------------------------------------------
- * $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
*
*
* ------------------------------------------------------------------------*/
-#include "Rts.h"
+#define IN_STG_CODE 0
+#include "Stg.h"
#define OFFSET(s_type, field) ((unsigned int)&(((s_type*)0)->field))
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));
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));
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;