Quick Search:

Mode

Context

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

Other Diffs

Ignore

Blank Lines Whitespace: Expand:

Diff

1.121
 
1.122
 
MAIN:ragge:20050306154033
 
reader.c
_>391391 
 392392         rcount();
 393393         nodepole = p;
<>394 -        canon(p);  /* creats OREG from * if possible and does sucomp */
  394+        canon(p);  /* creats OREG from * if possible */
395395 #ifdef PCC_DEBUG
 396396         if (e2debug) {
 397397                 fprintf(stderr, "geninsn called on:\n");
 398398                 fwalk(p, e2print, 0);
 399399         }
 400400 #endif
<> 401+
  402+if (xnewreg == 0) {
401403         do {
 402404                 geninsn(p, cookie); /* Assign instructions for tree */
 403405 #ifdef PCC_DEBUG
     
 !
407409                 }
 408410 #endif
 409411         } while (sucomp(p) < 0);  /* Calculate sub-tree evaluation order */
<> 412+} else {
  413+        geninsn(p, cookie);     /* Assign instructions for tree */
410414 #ifdef PCC_DEBUG
<> 415+                if (udebug) {
  416+                        fprintf(stderr, "nsucomp called on:\n");
  417+                        fwalk(p, e2print, 0);
  418+                }
  419+#endif
  420+        nsucomp(p);             /* Calculate evaluation order */
  421+}
  422+
  423+#ifdef PCC_DEBUG
411424         if (udebug) {
 412425                 fprintf(stderr, "genregs called on:\n");
 413426                 fwalk(p, e2print, 0);
 414427         }
 415428 #endif
<> 429+if (xnewreg == 0) {
416430         /*
 417431          * When here it is known that the tree can be evaluated.
 418432          * Assign registers for all instructions.
 419433          */
 420434         genregs(p); /* allocate registers for instructions */
 421435         mygenregs(p);
<> 436+} else {
  437+        ngenregs(p);
  438+}
  439+
422440 #ifdef PCC_DEBUG
 423441         if (udebug) {
 424442                 fprintf(stderr, "gencode called on:\n");
     
 !
890908         else {
 891909                 if( p->n_rall & MUSTDO ) fprintf(stderr, "MUSTDO " );
 892910                 else fprintf(stderr, "PREF " );
<>893 -                fprintf(stderr, "%s", rnames[p->n_rall&~MUSTDO]);
  911+                if ((p->n_rall&~MUSTDO) > 8) /* XXX */
  912+                fprintf(stderr, "(%d)", (p->n_rall&~MUSTDO));
  913+                else fprintf(stderr, "%s", rnames[p->n_rall&~MUSTDO]);
<_894914                 }
 895915         fprintf(stderr, ", SU= %d(%s,%s,%s,%s)\n",
 896916             TBLIDX(p->n_su),
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-08-27 22:59 +0200