[commit: ghc] wip/new-flatten-skolems-Aug14: Check for staticclosures section in Windows linker. (9b5d230)

[git at git.haskell.org]

Repository : ssh://git@git.haskell.org/ghc

On branch  : wip/new-flatten-skolems-Aug14
Link       : http://ghc.haskell.org/trac/ghc/changeset/9b5d230275afea084c35aa50bc010e259d50eb7c/ghc

>---------------------------------------------------------------

commit 9b5d230275afea084c35aa50bc010e259d50eb7c
Author: Edward Z. Yang <ezyang at cs.stanford.edu>
Date:   Fri Oct 3 14:12:51 2014 -0700

    Check for staticclosures section in Windows linker.
    
    Signed-off-by: Edward Z. Yang <ezyang at cs.stanford.edu>


>---------------------------------------------------------------

9b5d230275afea084c35aa50bc010e259d50eb7c
 rts/Linker.c | 1 +
 1 file changed, 1 insertion(+)

diff --git a/rts/Linker.c b/rts/Linker.c
index 9897557..97b64ea 100644
--- a/rts/Linker.c
+++ b/rts/Linker.c
@@ -4163,6 +4163,7 @@ ocGetNames_PEi386 ( ObjectCode* oc )
           0==strcmp(".rodata",(char*)secname))
          kind = SECTIONKIND_CODE_OR_RODATA;
       if (0==strcmp(".data",(char*)secname) ||
+          0==strcmp(".staticclosures",(char*)secname) ||
           0==strcmp(".bss",(char*)secname))
          kind = SECTIONKIND_RWDATA;
       if (0==strcmp(".ctors", (char*)secname))