diff options
| author | Ben Gamari <ben@smart-cactus.org> | 2018-05-16 12:15:32 -0400 |
|---|---|---|
| committer | Ben Gamari <ben@smart-cactus.org> | 2018-05-16 12:58:29 -0400 |
| commit | 3310f7f14c0ba34a57fe5a77f47d2a66fe838a43 (patch) | |
| tree | e598c4e798df831c950fe4184077d46f7d79581f | |
| parent | 01bb17fd4dc6d92cf08632bbb62656428db6e7fa (diff) | |
| download | haskell-3310f7f14c0ba34a57fe5a77f47d2a66fe838a43.tar.gz | |
InfoTables: Fix #if uses introduced by D4634
| -rw-r--r-- | includes/rts/storage/InfoTables.h | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/includes/rts/storage/InfoTables.h b/includes/rts/storage/InfoTables.h index 8107510321..137cfe2a1e 100644 --- a/includes/rts/storage/InfoTables.h +++ b/includes/rts/storage/InfoTables.h @@ -335,7 +335,7 @@ typedef struct StgConInfoTable_ { * info must be a Stg[Ret|Thunk]InfoTable* (an info table that has a SRT) */ #if defined(TABLES_NEXT_TO_CODE) -#if x86_64_TARGET_ARCH +#if defined(x86_64_TARGET_ARCH) #define GET_SRT(info) \ ((StgClosure*) (((StgWord) ((info)+1)) + (info)->i.srt)) #else @@ -362,7 +362,7 @@ typedef struct StgConInfoTable_ { * info must be a StgFunInfoTable* */ #if defined(TABLES_NEXT_TO_CODE) -#if x86_64_TARGET_ARCH +#if defined(x86_64_TARGET_ARCH) #define GET_FUN_SRT(info) \ ((StgClosure*) (((StgWord) ((info)+1)) + (info)->i.srt)) #else |