diff options
-rw-r--r-- | lisc/copy.c | 9 |
1 files changed, 7 insertions, 2 deletions
diff --git a/lisc/copy.c b/lisc/copy.c index c04f36a..0e62ed7 100644 --- a/lisc/copy.c +++ b/lisc/copy.c @@ -144,12 +144,17 @@ copy(Fn *fn) } if (debug['C']) { fprintf(stderr, "\n> Copy information:"); - for (t=Tmp0; t<fn->ntmp; t++) - if (!req(cp[t], TMP(t))) { + for (t=Tmp0; t<fn->ntmp; t++) { + if (req(cp[t], R)) { + fprintf(stderr, "\n%10s not seen!", + fn->tmp[t].name); + } + else if (!req(cp[t], TMP(t))) { fprintf(stderr, "\n%10s copy of ", fn->tmp[t].name); printref(cp[t], fn, stderr); } + } fprintf(stderr, "\n\n> After copy elimination:\n"); printfn(fn, stderr); } |