diff options
| author | Simon Marlow <marlowsd@gmail.com> | 2008-08-04 10:57:40 +0000 |
|---|---|---|
| committer | Simon Marlow <marlowsd@gmail.com> | 2008-08-04 10:57:40 +0000 |
| commit | dee01d206954e0a2085d434d0c568bf4a4399686 (patch) | |
| tree | da818ec3f071d08dfcd96a8baafa2d2241266331 /rts | |
| parent | c2d0219ac359355d60d6ffac381e4051d79ad729 (diff) | |
| download | haskell-dee01d206954e0a2085d434d0c568bf4a4399686.tar.gz | |
FIX BUILD on Windows
Diffstat (limited to 'rts')
| -rw-r--r-- | rts/Linker.c | 4 |
1 files changed, 0 insertions, 4 deletions
diff --git a/rts/Linker.c b/rts/Linker.c index 0d56912bf8..7f94856c3c 100644 --- a/rts/Linker.c +++ b/rts/Linker.c @@ -2534,13 +2534,9 @@ ocResolve_PEi386 ( ObjectCode* oc ) + sym->Value); } else { copyName ( sym->Name, strtab, symbol, 1000-1 ); - S = (UInt32) lookupLocalSymbol( oc, symbol ); - if ((void*)S != NULL) goto foundit; S = (UInt32) lookupSymbol( symbol ); if ((void*)S != NULL) goto foundit; zapTrailingAtSign ( symbol ); - S = (UInt32) lookupLocalSymbol( oc, symbol ); - if ((void*)S != NULL) goto foundit; S = (UInt32) lookupSymbol( symbol ); if ((void*)S != NULL) goto foundit; /* Newline first because the interactive linker has printed "linking..." */ |