From: johanknol Date: Sat, 8 Mar 2003 19:49:51 +0000 (+0000) Subject: This makes the dump files more readable X-Git-Url: https://git.gag.com/?a=commitdiff_plain;h=017f41af54f2c9aeb55f31e237eb58762b6ea2ff;p=fw%2Fsdcc This makes the dump files more readable git-svn-id: https://sdcc.svn.sourceforge.net/svnroot/sdcc/trunk/sdcc@2349 4a8a32a2-be11-0410-ad9d-d568d2c75423 --- diff --git a/src/SDCCBBlock.c b/src/SDCCBBlock.c index 51b2cd69..fe26978a 100644 --- a/src/SDCCBBlock.c +++ b/src/SDCCBBlock.c @@ -177,6 +177,7 @@ dumpEbbsToFileExt (int id, eBBlock ** ebbs, int count) { FILE *of; int i; + eBBlock *bb; if (id) { of=createDumpFile(id); @@ -193,6 +194,35 @@ dumpEbbsToFileExt (int id, eBBlock ** ebbs, int count) ebbs[i]->depth, ebbs[i]->noPath, ebbs[i]->isLastInLoop); + + if (!optimize.label4) { + // this only makes sense with --nolabelopt + fprintf (of, "\nsuccessors: "); + for (bb=setFirstItem(ebbs[i]->succList); + bb; + bb=setNextItem(ebbs[i]->succList)) { + fprintf (of, "%s ", bb->entryLabel->name); + } + fprintf (of, "\npredecessors: "); + for (bb=setFirstItem(ebbs[i]->predList); + bb; + bb=setNextItem(ebbs[i]->predList)) { + fprintf (of, "%s ", bb->entryLabel->name); + } +#if 0 // jwk: TODO: this can't be true + { + int d; + fprintf (of, "\ndominators ???: "); + for (d=0; ddomVect->size; d++) { + if (bitVectBitValue(ebbs[d]->domVect, d)) { + fprintf (of, "%s ", ebbs[d]->entryLabel->name); + } + } + } +#endif + fprintf (of, "\n"); + } + fprintf (of, "\ndefines bitVector :"); bitVectDebugOn (ebbs[i]->defSet, of); fprintf (of, "\nlocal defines bitVector :"); diff --git a/src/SDCCicode.c b/src/SDCCicode.c index 3a24fbd4..9c37fe0a 100644 --- a/src/SDCCicode.c +++ b/src/SDCCicode.c @@ -500,7 +500,7 @@ printiCChain (iCode * icChain, FILE * of) { if ((icTab = getTableEntry (loop->op))) { - fprintf (of, "%s(%d:%d:%d:%d:%d)\t", + fprintf (of, "%s(l%d:s%d:k%d:d%d:s%d)\t", loop->filename, loop->lineno, loop->seq, loop->key, loop->depth, loop->supportRtn);