Quick Search:

Mode

Context

Displaying 3 lines of context. None | Less | More | Full

Other Diffs

Ignore

Blank Lines Whitespace: Expand:

Diff

1.91
 
1.92
 
MAIN:ragge:20040513193347
 
reader.c
_>271271         if (ip->type == IP_NODE) {
 272272 #ifdef PCC_DEBUG
 273273                 if (e2debug) {
<>274 -                        printf("pass2 called on:\n");
  274+                        fprintf(stderr, "pass2 called on:\n");
275275                         fwalk(ip->ip_node, e2print, 0);
 276276                 }
 277277 #endif
     
 !
343343         canon(p);  /* creats OREG from * if possible and does sucomp */
 344344 #ifdef PCC_DEBUG
 345345         if (e2debug) {
<>346 -                printf("geninsn called on:\n");
  346+                fprintf(stderr, "geninsn called on:\n");
347347                 fwalk(p, e2print, 0);
 348348         }
 349349 #endif
 350350         do {
 351351                 geninsn(p, cookie); /* Assign instructions for tree */
 352352 #ifdef PCC_DEBUG
 353353                 if (udebug) {
<>354 -                        printf("sucomp called on:\n");
  354+                        fprintf(stderr, "sucomp called on:\n");
355355                         fwalk(p, e2print, 0);
 356356                 }
 357357 #endif
 358358         } while (sucomp(p) < 0);  /* Calculate sub-tree evaluation order */
 359359 #ifdef PCC_DEBUG
 360360         if (udebug) {
<>361 -                printf("genregs called on:\n");
  361+                fprintf(stderr, "genregs called on:\n");
362362                 fwalk(p, e2print, 0);
 363363         }
 364364 #endif
     
 !
369369         genregs(p); /* allocate registers for instructions */
 370370 #ifdef PCC_DEBUG
 371371         if (udebug) {
<>372 -                printf("gencode called on:\n");
  372+                fprintf(stderr, "gencode called on:\n");
373373                 fwalk(p, e2print, 0);
 374374         }
 375375 #endif
     
 !
15851585                 if (shl == 0 && rsl == 0)
 15861586                         continue; /* shape or regs must match */
 15871587 
<> 1588+                if (q->rewrite & RLEFT) {
  1589+                        /* left node must be in a temp register */
  1590+                        if (l->n_op == REG && !istreg(l->n_rval))
  1591+                                shl = 0;
  1592+                }
  1593+
<_15881594 if (f2debug) printf("finduni got shapes %d\n", shl);
 15891595                 if (q->needs & REWRITE)
 15901596                         break;  /* Done here */
FishEye: Open Source License registered to PCC.
Your maintenance has expired. You can renew your license at http://www.atlassian.com/fisheye/renew
Atlassian FishEye, CVS analysis. (Version:1.6.3 Build:build-336 2008-11-04) - Administration - Page generated 2014-09-23 22:24 +0200