diff options
| author | wolfgang.thaller@gmx.net <unknown> | 2006-10-22 16:06:50 +0000 |
|---|---|---|
| committer | wolfgang.thaller@gmx.net <unknown> | 2006-10-22 16:06:50 +0000 |
| commit | 91d2dae62cc0249671f00db03e9be330a0a586a0 (patch) | |
| tree | 0c997321e40e228ab6b5943e7354bf700e8fd4c2 /utils/genapply | |
| parent | 4f6f4a294f00d559b4f024255d11eb1da9bfe036 (diff) | |
| download | haskell-91d2dae62cc0249671f00db03e9be330a0a586a0.tar.gz | |
Support RelocatableReadOnlyData section type in CmmParse, and use it where needed in AutoApply
This is needed for position-independent code on Mac OS X
(both i386 and powerpc), when compiling the RTS with -fasm.
Diffstat (limited to 'utils/genapply')
| -rw-r--r-- | utils/genapply/GenApply.hs | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/utils/genapply/GenApply.hs b/utils/genapply/GenApply.hs index 68277030ac..39d8506c25 100644 --- a/utils/genapply/GenApply.hs +++ b/utils/genapply/GenApply.hs @@ -732,7 +732,7 @@ genStackFns regstatus args genStackApplyArray types = vcat [ - text "section \"rodata\" {", + text "section \"relrodata\" {", text "stg_ap_stack_entries:", text "W_ 0; W_ 0; W_ 0;", -- ARG_GEN, ARG_GEN_BIG, ARG_BCO vcat (map arr_ent types), @@ -743,7 +743,7 @@ genStackApplyArray types = genStackSaveArray types = vcat [ - text "section \"rodata\" {", + text "section \"relrodata\" {", text "stg_stack_save_entries:", text "W_ 0; W_ 0; W_ 0;", -- ARG_GEN, ARG_GEN_BIG, ARG_BCO vcat (map arr_ent types), |