[commit: ghc] master: Check for staticclosures section in Windows linker. (2fc0c6c)

[git at git.haskell.org]

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

On branch  : master
Link       : http://ghc.haskell.org/trac/ghc/changeset/2fc0c6cf594731f343b4f8a5b3ecf9e72db4c3c0/ghc

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

commit 2fc0c6cf594731f343b4f8a5b3ecf9e72db4c3c0
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>


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

2fc0c6cf594731f343b4f8a5b3ecf9e72db4c3c0
 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))