diff options
| author | Ian Lynagh <igloo@earth.li> | 2008-03-25 23:30:34 +0000 |
|---|---|---|
| committer | Ian Lynagh <igloo@earth.li> | 2008-03-25 23:30:34 +0000 |
| commit | ed9b6b23e6f647871acb47916f8c247a2f192a1c (patch) | |
| tree | 7340796de786dcab26183d292d1fe39c9fad4bc3 /includes | |
| parent | 09d7584db4aa581570aa1edcf7ca8b73adf8e027 (diff) | |
| download | haskell-ed9b6b23e6f647871acb47916f8c247a2f192a1c.tar.gz | |
Fix warnings in main/Constants
Diffstat (limited to 'includes')
| -rw-r--r-- | includes/mkDerivedConstants.c | 10 |
1 files changed, 6 insertions, 4 deletions
diff --git a/includes/mkDerivedConstants.c b/includes/mkDerivedConstants.c index 2fe99b6ba5..56296ec4f1 100644 --- a/includes/mkDerivedConstants.c +++ b/includes/mkDerivedConstants.c @@ -40,8 +40,9 @@ #endif #if defined(GEN_HASKELL) -#define def_offset(str, offset) \ - printf("oFFSET_" str " = %" SIZET_FMT "::Int\n", offset); +#define def_offset(str, offset) \ + printf("oFFSET_" str " :: Int\n"); \ + printf("oFFSET_" str " = %" SIZET_FMT "\n", offset); #else #define def_offset(str, offset) \ printf("#define OFFSET_" str " %" SIZET_FMT "\n", offset); @@ -87,8 +88,9 @@ struct_field_macro(str) #if defined(GEN_HASKELL) -#define def_size(str, size) \ - printf("sIZEOF_" str " = %d::Int\n", size); +#define def_size(str, size) \ + printf("sIZEOF_" str " :: Int\n"); \ + printf("sIZEOF_" str " = %d\n", size); #else #define def_size(str, size) \ printf("#define SIZEOF_" str " %d\n", size); |