X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=ghc%2Frts%2FLinker.c;h=8589a4a35a503adece48e657f92e5c7f10dfed28;hb=534ae3c5199963f8fa461747f86cc34fdfd007bd;hp=105739acb39e547ad0e95bf6a11a5407f6c57694;hpb=916214e4f401d70462654013e83c4b8b08e85a18;p=ghc-hetmet.git diff --git a/ghc/rts/Linker.c b/ghc/rts/Linker.c index 105739a..8589a4a 100644 --- a/ghc/rts/Linker.c +++ b/ghc/rts/Linker.c @@ -1,5 +1,5 @@ /* ----------------------------------------------------------------------------- - * $Id: Linker.c,v 1.43 2001/06/06 14:03:41 sewardj Exp $ + * $Id: Linker.c,v 1.44 2001/06/22 12:35:28 rrt Exp $ * * (c) The GHC Team, 2000 * @@ -1204,7 +1204,7 @@ ocGetNames_PEi386 ( ObjectCode* oc ) COFF_section* sectab_i = (COFF_section*) myindex ( sizeof_COFF_section, sectab, i ); - IF_DEBUG(linker, belchf("section name = %s\n", sectab_i->Name )); + IF_DEBUG(linker, belch("section name = %s\n", sectab_i->Name )); #if 0 /* I'm sure this is the Right Way to do it. However, the