diff options
| author | Gabor Greif <ggreif@gmail.com> | 2012-01-09 22:00:39 +0100 |
|---|---|---|
| committer | Simon Marlow <marlowsd@gmail.com> | 2012-02-27 14:35:05 +0000 |
| commit | 91cc1399ee35a5ee9845c9cf4226b9a066484344 (patch) | |
| tree | 9e74cf18c750e7d1510f5bda02a6f9008b98a659 | |
| parent | 7a61f477f52a895d854e82b52f3b4e2fee912121 (diff) | |
| download | haskell-91cc1399ee35a5ee9845c9cf4226b9a066484344.tar.gz | |
tidied this up, the macro definitions were causing duplicate semis in the source
| -rw-r--r-- | includes/rts/storage/InfoTables.h | 20 |
1 files changed, 10 insertions, 10 deletions
diff --git a/includes/rts/storage/InfoTables.h b/includes/rts/storage/InfoTables.h index b34b255770..e4397f2ee3 100644 --- a/includes/rts/storage/InfoTables.h +++ b/includes/rts/storage/InfoTables.h @@ -29,9 +29,9 @@ ------------------------------------------------------------------------- */ #if x86_64_TARGET_ARCH -#define OFFSET_FIELD(n) StgHalfInt n; StgHalfWord __pad_##n; +#define OFFSET_FIELD(n) StgHalfInt n; StgHalfWord __pad_##n #else -#define OFFSET_FIELD(n) StgInt n; +#define OFFSET_FIELD(n) StgInt n #endif /* ----------------------------------------------------------------------------- @@ -196,7 +196,7 @@ typedef union { #ifndef TABLES_NEXT_TO_CODE StgLargeBitmap* large_bitmap; /* pointer to large bitmap structure */ #else - OFFSET_FIELD( large_bitmap_offset ); /* offset from info table to large bitmap structure */ + OFFSET_FIELD(large_bitmap_offset); /* offset from info table to large bitmap structure */ #endif StgWord selector_offset; /* used in THUNK_SELECTORs */ @@ -255,12 +255,12 @@ typedef struct StgInfoTable_ { -------------------------------------------------------------------------- */ typedef struct StgFunInfoExtraRev_ { - OFFSET_FIELD ( slow_apply_offset ); /* apply to args on the stack */ + OFFSET_FIELD(slow_apply_offset); /* apply to args on the stack */ union { StgWord bitmap; - OFFSET_FIELD ( bitmap_offset ); /* arg ptr/nonptr bitmap */ + OFFSET_FIELD(bitmap_offset); /* arg ptr/nonptr bitmap */ } b; - OFFSET_FIELD ( srt_offset ); /* pointer to the SRT table */ + OFFSET_FIELD(srt_offset); /* pointer to the SRT table */ StgHalfWord fun_type; /* function type */ StgHalfWord arity; /* function arity */ } StgFunInfoExtraRev; @@ -299,7 +299,7 @@ extern StgWord stg_arg_bitmaps[]; typedef struct { #if defined(TABLES_NEXT_TO_CODE) - OFFSET_FIELD( srt_offset ); /* offset to the SRT table */ + OFFSET_FIELD(srt_offset); /* offset to the SRT table */ StgInfoTable i; #else StgInfoTable i; @@ -321,7 +321,7 @@ typedef struct StgThunkInfoTable_ { StgInfoTable i; #endif #if defined(TABLES_NEXT_TO_CODE) - OFFSET_FIELD( srt_offset ); /* offset to the SRT table */ + OFFSET_FIELD(srt_offset); /* offset to the SRT table */ #else StgSRT *srt; /* pointer to the SRT table */ #endif @@ -340,8 +340,8 @@ typedef struct StgConInfoTable_ { #endif #if defined(TABLES_NEXT_TO_CODE) - OFFSET_FIELD(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 #else char *con_desc; #endif |