X-Git-Url: http://git.megacz.com/?p=ghc-hetmet.git;a=blobdiff_plain;f=includes%2FClosures.h;h=64582ba6b5bd66b772589951f72f993ff7c9bec3;hp=df53ceedd36698b9f892bfa223e86c143ff96c09;hb=c004ec62b41aa2137b5b5e298ca562609b0de92e;hpb=6015a94f9108a502150565577b66c23650796639 diff --git a/includes/Closures.h b/includes/Closures.h index df53cee..64582ba 100644 --- a/includes/Closures.h +++ b/includes/Closures.h @@ -306,8 +306,7 @@ typedef struct { */ typedef struct { const struct _StgInfoTable* info; - StgHalfWord size; - StgHalfWord tag; + StgWord size; StgClosure * fun; StgClosure * payload[FLEXIBLE_ARRAY]; } StgRetFun;