From: wolfgang <unknown>
Date: Wed, 18 May 2005 03:54:47 +0000 (+0000)
Subject: [project @ 2005-05-18 03:54:47 by wolfgang]
X-Git-Tag: Initial_conversion_from_CVS_complete~523
X-Git-Url: http://git.megacz.com/?a=commitdiff_plain;h=e5d225f5102baaf8b433ee3e3d8ca21e085d2534;p=ghc-hetmet.git

[project @ 2005-05-18 03:54:47 by wolfgang]
Make the Windows version of the Linker ignore constructors rather than abort
(just as it does on other platforms)
---

diff --git a/ghc/rts/Linker.c b/ghc/rts/Linker.c
index f7821fd..1d3a602 100644
--- a/ghc/rts/Linker.c
+++ b/ghc/rts/Linker.c
@@ -1982,6 +1982,8 @@ ocGetNames_PEi386 ( ObjectCode* oc )
              information. */
           && 0 != strcmp(".stab", sectab_i->Name)
           && 0 != strcmp(".stabstr", sectab_i->Name)
+          /* ignore constructor section for now */
+          && 0 != strcmp(".ctors", sectab_i->Name)
          ) {
          errorBelch("Unknown PEi386 section name `%s' (while processing: %s)", sectab_i->Name, oc->fileName);
          return 0;