/* ----------------------------------------------------------------------------
- * $Id: InfoTables.h,v 1.23 2001/10/03 13:57:42 simonmar Exp $
+ * $Id: InfoTables.h,v 1.25 2002/01/29 16:50:08 simonmar Exp $
*
* (c) The GHC Team, 1998-1999
*
#endif /* 0 */
-typedef struct {
- /* empty */
-} StgParInfo;
-
-
/*
Copied from ghc-0.29; ToDo: check this code -- HWL
typedef StgClosure* StgSRT[];
+/*
+ * The entry code pointer must be the first word of an info table.
+ * See the comment in ghc/rts/Storage.h (Plan C) for details.
+ */
typedef struct _StgInfoTable {
+#ifndef TABLES_NEXT_TO_CODE
+ StgFunPtr entry;
+#endif
StgSRT *srt; /* pointer to the SRT table */
#if defined(PAR) || defined(GRAN)
struct _StgInfoTable *rbh_infoptr;
#ifdef TABLES_NEXT_TO_CODE
StgCode code[FLEXIBLE_ARRAY];
#else
- StgFunPtr entry;
StgFunPtr vector[FLEXIBLE_ARRAY];
#endif
} StgInfoTable;