X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=includes%2FInfoTables.h;h=77171f1bc0a13cd32ec35e2e81e2937c14663881;hb=8c440cff43c20c3b79cd80e7f65fadd95328ff43;hp=ea01abf2d8983ac11102325bdbdb995338bffca1;hpb=7d6dffe542bdad5707a929ae7ac25813c586766d;p=ghc-hetmet.git diff --git a/includes/InfoTables.h b/includes/InfoTables.h index ea01abf..77171f1 100644 --- a/includes/InfoTables.h +++ b/includes/InfoTables.h @@ -353,7 +353,6 @@ typedef struct { #else StgInfoTable i; StgSRT *srt; /* pointer to the SRT table */ - StgFunPtr vector[FLEXIBLE_ARRAY]; #endif } StgRetInfoTable; @@ -389,7 +388,8 @@ typedef struct _StgConInfoTable { StgInfoTable i; #endif -char *con_desc; /* the name of the data constructor as: Package:Module.Name */ + OFFSET_FIELD(con_desc) // the name of the data constructor + // as: Package:Module.Name #if defined(TABLES_NEXT_TO_CODE) StgInfoTable i;