Quick Search:

Mode

Context

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

Other Diffs

Ignore

Blank Lines Whitespace: Expand:

Diff

1.2
 
1.3
 
MAIN:ragge:20020326184257
 
trees.c
_>16461646         }
 16471647 
 16481648 # ifdef STDPRTREE
<>1649 -# ifndef ONEPASS
16501649 
<>1651 -prtree(p) register NODE *p; {
 1652 -
 1653 -        register struct symtab *q;
 1654 -        register ty;
 1655 -
 1656 -# ifdef MYPRTREE
 1657 -        MYPRTREE(p);  /* local action can be taken here; then return... */
 1658 -#endif
 1659 -
 1660 -        ty = optype(p->in.op);
 1661 -
 1662 -        printf( "%d\t", p->in.op );
 1663 -
 1664 -        if( ty == LTYPE ) {
 1665 -                printf( CONFMT, p->tn.lval );
 1666 -                printf( "\t" );
 1667 -                }
 1668 -        if( ty != BITYPE ) {
 1669 -                if( p->in.op == NAME || p->in.op == ICON ) printf( "0\t" );
 1670 -                else printf( "%d\t", p->tn.rval );
 1671 -                }
 1672 -
 1673 -        printf( "%o\t", p->in.type );
 1674 -
 1675 -        /* handle special cases */
 1676 -
 1677 -        switch( p->in.op ){
 1678 -
 1679 -        case NAME:
 1680 -        case ICON:
 1681 -                /* print external name */
 1682 -                if( p->tn.rval == NONAME ) printf( "\n" );
 1683 -                else if( p->tn.rval >= 0 ){
 1684 -                        q = &stab[p->tn.rval];
 1685 -                        printf"%s\n", exname(q->sname) );
 1686 -                        }
 1687 -                else { /* label */
 1688 -                        printf( LABFMT, -p->tn.rval );
 1689 -                        }
 1690 -                break;
 1691 -
 1692 -        case STARG:
 1693 -        case STASG:
 1694 -        case STCALL:
 1695 -        case UNARY STCALL:
 1696 -                /* print out size */
 1697 -                /* use lhs size, in order to avoid hassles with the structure `.' operator */
 1698 -
 1699 -                /* note: p->in.left not a field... */
 1700 -                printf( CONFMT, (CONSZ) tsize( STRTY, p->in.left->fn.cdim, p->in.left->fn.csiz ) );
 1701 -                printf( "\t%d\t\n", talign( STRTY, p->in.left->fn.csiz ) );
 1702 -                break;
 1703 -
 1704 -        default:
 1705 -                printf"\n" );
 1706 -                }
 1707 -
 1708 -        if( ty != LTYPE ) prtree( p->in.left );
 1709 -        if( ty == BITYPE ) prtree( p->in.right );
 1710 -
 1711 -        }
 1712 -
 1713 -# else
 1714 -
17151650 void
 17161651 p2tree(NODE *p)
 17171652 {
     
 !
17821717         }
 17831718 
 17841719 # endif
<_1785 -# endif
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-23 02:36 +0100