From: sof <unknown>
Date: Fri, 29 Apr 2005 21:52:38 +0000 (+0000)
Subject: [project @ 2005-04-29 21:52:38 by sof]
X-Git-Tag: Initial_conversion_from_CVS_complete~631
X-Git-Url: http://git.megacz.com/?p=ghc-hetmet.git;a=commitdiff_plain;h=d64e3d900038611b79c8e5223a4d93b071b8b679

[project @ 2005-04-29 21:52:38 by sof]
gcc-mingw-3.4.x seems to have renamed .rodata to .rdata; look for either
---

diff --git a/ghc/rts/Linker.c b/ghc/rts/Linker.c
index 3e42c0d..5d887f4 100644
--- a/ghc/rts/Linker.c
+++ b/ghc/rts/Linker.c
@@ -1963,6 +1963,7 @@ ocGetNames_PEi386 ( ObjectCode* oc )
 #     endif
 
       if (0==strcmp(".text",sectab_i->Name) ||
+          0==strcmp(".rdata",sectab_i->Name)||
           0==strcmp(".rodata",sectab_i->Name))
          kind = SECTIONKIND_CODE_OR_RODATA;
       if (0==strcmp(".data",sectab_i->Name) ||