diff options
| author | Simon Marlow <marlowsd@gmail.com> | 2011-08-22 13:56:17 +0100 |
|---|---|---|
| committer | Simon Marlow <marlowsd@gmail.com> | 2011-08-25 11:12:30 +0100 |
| commit | 5b167f5edad7d3268de20452da7af05c38972f7c (patch) | |
| tree | 36a14e64b510ede91e4e334f3e44d865321adcde /includes/rts/storage/InfoTables.h | |
| parent | 3108accd634a521b25471df19f063c2061d6d3ee (diff) | |
| download | haskell-5b167f5edad7d3268de20452da7af05c38972f7c.tar.gz | |
Snapshot of codegen refactoring to share with simonpj
Diffstat (limited to 'includes/rts/storage/InfoTables.h')
| -rw-r--r-- | includes/rts/storage/InfoTables.h | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/includes/rts/storage/InfoTables.h b/includes/rts/storage/InfoTables.h index cbfb0327c2..4b0c40bbce 100644 --- a/includes/rts/storage/InfoTables.h +++ b/includes/rts/storage/InfoTables.h @@ -214,7 +214,7 @@ typedef union { */ typedef struct StgInfoTable_ { -#ifndef TABLES_NEXT_TO_CODE +#if !defined(TABLES_NEXT_TO_CODE) StgFunPtr entry; /* pointer to the entry code */ #endif @@ -344,11 +344,11 @@ typedef struct StgConInfoTable_ { StgInfoTable i; #endif -#ifndef TABLES_NEXT_TO_CODE - char *con_desc; -#else +#if defined(TABLES_NEXT_TO_CODE) OFFSET_FIELD(con_desc) // the name of the data constructor // as: Package:Module.Name +#else + char *con_desc; #endif #if defined(TABLES_NEXT_TO_CODE) |