Commit 612755bd authored by sof's avatar sof

[project @ 1999-02-05 12:41:31 by sof]

don't include structs that are known to be empty within StgInfoTable and
StgHeader. Shouldn't be a problem - but egcs-1.1.1 doesn't handle them
correctly.
parent fd3ceb3c
/* ----------------------------------------------------------------------------
* $Id: Closures.h,v 1.5 1999/01/26 11:12:55 simonm Exp $
* $Id: Closures.h,v 1.6 1999/02/05 12:41:31 sof Exp $
*
* Closures
*
......@@ -91,9 +91,15 @@ typedef struct {
typedef struct {
const struct _StgInfoTable* info;
#ifdef PROFILING
StgProfHeader prof;
#endif
#ifdef GRAN
StgGranHeader par;
#endif
#ifdef TICKY
StgTickyHeader ticky;
#endif
} StgHeader;
#define FIXED_HS (sizeof(StgHeader))
......
/* ----------------------------------------------------------------------------
* $Id: InfoTables.h,v 1.7 1999/01/26 16:16:21 simonm Exp $
* $Id: InfoTables.h,v 1.8 1999/02/05 12:41:32 sof Exp $
*
* Info Tables
*
......@@ -300,9 +300,15 @@ typedef StgClosure* StgSRT[];
typedef struct _StgInfoTable {
StgSRT *srt; /* pointer to the SRT table */
#ifdef PAR
StgParInfo par;
#endif
#ifdef PROFILING
StgProfInfo prof;
#endif
#ifdef DEBUG_CLOSURE
StgDebugInfo debug;
#endif
StgClosureInfo layout; /* closure layout info (pointer-sized) */
#if SIZEOF_VOID_P == 8
StgNat16 flags; /* } */
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment