X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=rts%2FLinker.c;h=657c2c3886abc14bf4089b1944c2f29acf87b8e6;hb=fff1f6194c3c39de53cd645bda9865fb131b1c68;hp=1614a1a78f9e1fd475ecdbb84721c00081de5e68;hpb=723da2ed96068632ede8d1e8514dd02bbe1336ea;p=ghc-hetmet.git

diff --git a/rts/Linker.c b/rts/Linker.c
index 1614a1a..657c2c3 100644
--- a/rts/Linker.c
+++ b/rts/Linker.c
@@ -4976,7 +4976,7 @@ static int ocGetNames_MachO(ObjectCode* oc)
 
     for(i=0;i<segLC->nsects;i++)
     {
-	IF_DEBUG(linker, debugBelch("ocGetNames_MachO: segment %d\n"));
+        IF_DEBUG(linker, debugBelch("ocGetNames_MachO: segment %d\n", i));
         if (sections[i].size == 0)
             continue;