X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=ghc%2Frts%2FLinker.c;h=7b1e4e94d7cfe6b5ab24fa07b00be01fc3e3d1b0;hb=f7db2c30a659aae5fe59ba2be7ab72f8ca64f712;hp=d6024ac86f70b656ae69e59bee979bd3b5d5b8d4;hpb=95ca6bff6fc9918203173b442192d9298ef9757a;p=ghc-hetmet.git

diff --git a/ghc/rts/Linker.c b/ghc/rts/Linker.c
index d6024ac..7b1e4e9 100644
--- a/ghc/rts/Linker.c
+++ b/ghc/rts/Linker.c
@@ -2042,7 +2042,7 @@ ocResolve_PEi386 ( ObjectCode* oc )
                *pP = S - ((UInt32)pP) - 4;
                break;
             default:
-               debugBelch(("%s: unhandled PEi386 relocation type %d",
+               debugBelch("%s: unhandled PEi386 relocation type %d",
 		     oc->fileName, reltab_j->Type);
                return 0;
          }