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:20041220190252
 
trees.c
_>16211621 prtdcon(NODE *p)
 16221622 {
 16231623         int o = p->n_op, i;
<>1624 -        int loc;
16251624 
 16261625         if( o == FCON ){
<>1627 -                loc = lastloc;
 1628 -                send_passt(IP_LOCCTR, RDATA);
  1626+                setloc1(RDATA);
16291627                 defalign( p->n_type == DOUBLE ? ALDOUBLE : ALFLOAT );
<>1630 -
 1631 -                dlabel( i = getlab());
  1628+                deflab1(i = getlab());
16321629                 finval(p);
 16331630                 p->n_op = NAME;
 16341631                 p->n_lval = 0;
 16351632                 p->n_sp = tmpalloc(sizeof(struct symtab_hdr));
 16361633                 p->n_sp->sclass = ILABEL;
 16371634                 p->n_sp->soffset = i;
<>1638 -                send_passt(IP_LOCCTR, loc);
16391635         }
 16401636 }
 16411637 
     
 !
22532249                 inline_addarg(ip);
 22542250         else
 22552251                 pass2_compile(ip);
<> 2252+        if (type == IP_EPILOG)
  2253+                send_passt(IP_LOCCTR, PROG);
22562254 }
 22572255 
 22582256 char *
     
 !
23592357         return(q);
 23602358 }
 23612359 
<> 2360+/*
  2361+ * set PROG-seg label.
  2362+ */
23622363 void
<>2363 -xlabel(int seg, int label)
  2364+plabel(int label)
23642365 {
<>2365 -        if (seg >= 0)
 2366 -                send_passt(IP_LOCCTR, seg);
 2367 -        send_passt(IP_DEFLAB);
  2366+        if (lastloc != PROG)
  2367+                send_passt(IP_LOCCTR, PROG);
  2368+        send_passt(IP_DEFLAB, label);
23682369 }
<_2369 -
 2370 -static void
 2371 -xprint(int seg, char *fmt, va_list ap)
 2372 -{
 2373 -        if (seg >= 0)
 2374 -                send_passt(IP_LOCCTR, seg);
 2375 -#ifdef MULTIPASS
 2376 -        printf("> ");
 2377 -#endif
 2378 -        vprintf(fmt, ap);
 2379 -}
 2380 -
 2381 -void
 2382 -cprint(char *fmt, ...)
 2383 -{
 2384 -        va_list ap;
 2385 -
 2386 -        va_start(ap, fmt);
 2387 -        xprint(-1, fmt, ap);
 2388 -        va_end(ap);
 2389 -}
FishEye: Open Source License registered to PCC.
Atlassian FishEye, CVS analysis. (Version:1.6.3 Build:build-336 2008-11-04) - Administration - Page generated 2014-12-21 09:31 +0100