diff options
| author | Edward Z. Yang <ezyang@mit.edu> | 2013-09-04 17:43:35 -0700 |
|---|---|---|
| committer | Edward Z. Yang <ezyang@mit.edu> | 2013-09-04 17:43:35 -0700 |
| commit | 24b791f9618e263d0a972be0ea4883d8f582d0fe (patch) | |
| tree | a6bc2ba53c013e912d1bf96de77e8db0d531c74e | |
| parent | 0451d85d58363f8ce7ce552c19a00f9d535e6fed (diff) | |
| download | haskell-24b791f9618e263d0a972be0ea4883d8f582d0fe.tar.gz | |
Ignore drectve sections, partially fixing #7056
Signed-off-by: Edward Z. Yang <ezyang@mit.edu>
| -rw-r--r-- | rts/Linker.c | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/rts/Linker.c b/rts/Linker.c index c8451b0425..ab5a5574e4 100644 --- a/rts/Linker.c +++ b/rts/Linker.c @@ -3835,6 +3835,8 @@ ocGetNames_PEi386 ( ObjectCode* oc ) /* ignore unknown section that appeared in gcc 3.4.5(?) */ && 0!= strcmp(".reloc", (char*)secname) && 0 != strcmp(".rdata$zzz", (char*)secname) + /* ignore linker directive sections */ + && 0 != strcmp(".drectve", (char*)secname) ) { errorBelch("Unknown PEi386 section name `%s' (while processing: %" PATH_FMT")", secname, oc->fileName); stgFree(secname); |