diff options
| author | Simon Marlow <simonmar@microsoft.com> | 2007-02-27 13:46:09 +0000 |
|---|---|---|
| committer | Simon Marlow <simonmar@microsoft.com> | 2007-02-27 13:46:09 +0000 |
| commit | b067bdc33ce1a0bb01957b0bcfbb1c516dba53a4 (patch) | |
| tree | ca8c9a739185c3714fa795c1924b5bd781c21bbd /includes | |
| parent | f38310c9d33a263a610005996f32f3d7d2e25c44 (diff) | |
| download | haskell-b067bdc33ce1a0bb01957b0bcfbb1c516dba53a4.tar.gz | |
Remove the itbls field of BCO, put itbls in with the literals
This is a simplification & minor optimisation for GHCi
Diffstat (limited to 'includes')
| -rw-r--r-- | includes/Closures.h | 1 | ||||
| -rw-r--r-- | includes/mkDerivedConstants.c | 1 |
2 files changed, 0 insertions, 2 deletions
diff --git a/includes/Closures.h b/includes/Closures.h index d5458f4451..64582ba6b5 100644 --- a/includes/Closures.h +++ b/includes/Closures.h @@ -232,7 +232,6 @@ typedef struct { StgArrWords *instrs; /* a pointer to an ArrWords */ StgArrWords *literals; /* a pointer to an ArrWords */ StgMutArrPtrs *ptrs; /* a pointer to a MutArrPtrs */ - StgArrWords *itbls; /* a pointer to an ArrWords */ StgHalfWord arity; /* arity of this BCO */ StgHalfWord size; /* size of this BCO (in words) */ StgWord bitmap[FLEXIBLE_ARRAY]; /* an StgLargeBitmap */ diff --git a/includes/mkDerivedConstants.c b/includes/mkDerivedConstants.c index 8e3ac2b619..c797941a96 100644 --- a/includes/mkDerivedConstants.c +++ b/includes/mkDerivedConstants.c @@ -369,7 +369,6 @@ main(int argc, char *argv[]) closure_field(StgBCO, instrs); closure_field(StgBCO, literals); closure_field(StgBCO, ptrs); - closure_field(StgBCO, itbls); closure_field(StgBCO, arity); closure_field(StgBCO, size); closure_payload(StgBCO, bitmap); |