Home
last modified time | relevance | path

Searched refs:cpexpr (Results 1 – 25 of 32) sorted by relevance

12

/original-bsd/usr.bin/f77/pass1.tahoe/
H A Dexec.c514 optbuff (SKEQ,mkexpr(OPASSIGN,cpexpr(dovarp),cpexpr(DOINIT)),
517 puteq (cpexpr(dovarp), cpexpr(DOINIT));
520 q = mkexpr(OPMINUS, cpexpr(CONSTLIMIT), cpexpr(CONSTINIT));
537 q = (expptr) cpexpr(ctlstack->domax);
540 q1 = mkexpr(OPASSIGN, cpexpr(dovarp), DOINIT);
555 puteq (cpexpr(ctlstack->domax), DOLIMIT);
559 mkexpr(OPASSIGN, cpexpr(ctlstack->dostep),
564 puteq (cpexpr(dovarp), q);
570 puteq (cpexpr(ctlstack->dostep), DOINCR);
592 incr = mkexpr(OPPLUSEQ, cpexpr(dovarp), cpexpr(ctlstack->dostep));
[all …]
H A Doptim.c571 buffcat (cpexpr(t),p);
665 lp1 = (Addrp) cpexpr(lp);
667 cp1 = (Addrp) cpexpr(cp);
705 qp = mkexpr(OPCOLON, cpexpr(tp), cpexpr(sp));
706 qp = mkexpr(OPQUEST, mkexpr(op, cpexpr(tp),cpexpr(sp)), qp);
712 mkexpr( OPASSIGN, cpexpr(sp), p0->datap ), cpexpr(newtemp));
718 APPEND (mkexpr (OPASSIGN, cpexpr(sp), cpexpr(qp)) );
769 cpexpr( (expptr) newtemp ),
770 cpexpr( base ) );
803 r = (expptr) cpexpr( base );
[all …]
H A Dio.c389 p = (expptr) cpexpr(p);
471 cpexpr(qe->headblock.vleng);
484 puteq (cpexpr(tp),qe);
560 cpexpr(IOSTP), ICON(0)); in endio()
615 unitp = (Addrp) cpexpr(p); in startrw()
660 recp = (Addrp) cpexpr(p); in startrw()
706 fmtp = (Addrp) cpexpr(p); in startrw()
822 ioset(TYIOINT, XUNIT, cpexpr(p) ); in dofopen()
856 ioset(TYIOINT, XUNIT, cpexpr(p) ); in dofclose()
872 ioset(TYIOINT, XUNIT, cpexpr(p) ); in dofinquire()
[all …]
H A Dputpcc.c685 putx( mkexpr(OPSTAR,cpexpr(base),cpexpr(base)));
692 putassign(cpexpr(t1), cpexpr(base) );
701 putx( mkexpr(OPSTAR, cpexpr(t1), cpexpr(t1)) );
706 putassign(cpexpr(t2), cpexpr(t1));
719 mkexpr(OPSTAR, cpexpr(t1), cpexpr(t1)) ));
739 putassign(cpexpr(t), p);
1167 lp1 = (Addrp) cpexpr(lp);
1169 cp1 = (Addrp) cpexpr(cp);
1546 qp = mkexpr(OPCOLON, cpexpr(tp), cpexpr(sp));
1547 qp = mkexpr(OPQUEST, mkexpr(op, cpexpr(tp),cpexpr(sp)), qp);
[all …]
H A Dtahoe.c939 puteq( fixtype(cpexpr(dp->dims[i].dimsize)),
940 fixtype(cpexpr(dp->dims[i].dimexpr)));
945 puteq( fixtype(cpexpr(dp->dims[i].lbaddr)),
946 fixtype(cpexpr(dp->dims[i].lb)));
948 puteq( fixtype(cpexpr(dp->dims[i].ubaddr)),
949 fixtype(cpexpr(dp->dims[i].ub)));
966 puteq( cpexpr(fixtype(dp->baseoffset)),
967 cpexpr(fixtype(dp->basexpr)));
979 tp = (expptr) cpexpr(q->vleng);
982 cpexpr(dp->baseoffset)) ));
[all …]
H A Dexpr.c331 r = (Addrp) cpexpr(s);
436 tagptr cpexpr(p) in cpexpr() function
507 cpexpr(e->primblock.argsp);
771 cpexpr(lconst)));
780 cpexpr(rconst)));
810 cpexpr(lconst)));
819 cpexpr(rconst)));
1014 cpexpr(np->vleng) :
1016 cpexpr(dp->baseoffset) );
1870 cpexpr(rp));
[all …]
H A Dregalloc.c348 q->stgp = (Addrp) cpexpr(ap);
794 ap = (Addrp) cpexpr(rp->stgp); in alreg()
805 ap = (Addrp) cpexpr(rp->stgp); in alreg()
818 ap = (Addrp) cpexpr(rp->stgp); in alreg()
867 ap = (Addrp) cpexpr(rp->stgp); in alreg()
925 ap = (Addrp) cpexpr(rp->stgp); in alreg()
945 ap = (Addrp) cpexpr(rp->stgp); in alreg()
1644 ap1 = (Addrp) cpexpr(rp->stgp);
2008 ap = (Addrp) cpexpr(rp->stgp);
2031 ap = (Addrp) cpexpr(rp->stgp);
[all …]
H A Dput.c132 putx( fixexpr( mkexpr(OPSTAREQ, cpexpr(a), cpexpr(b)) ));
144 q = (Addrp) cpexpr(p);
174 q = (Addrp) cpexpr(p);
235 q->vleng = (expptr) cpexpr(p->vleng);
H A Dproc.c376 putbranch( cpexpr(typeaddr) ); in epicode()
416 p = (Addrp) cpexpr(retslot);
423 p = (Addrp) cpexpr(retslot);
1065 t = (Addrp) cpexpr(t);
1201 return ((Addrp) cpexpr(q));
1210 return ((Addrp) cpexpr(q));
1423 else p->dims[i].lb= (expptr) cpexpr(dims[i].lb);
1428 else p->dims[i].ub = (expptr) cpexpr(dims[i].ub);
1449 q = mkexpr(OPMINUS, q, cpexpr(dims[i].lb));
1474 cpexpr(p->dims[i].dimsize) );
[all …]
H A Dintr.c746 mkexpr(OPLE, intrconv(type,ICON(0)), cpexpr(t)),
747 mkexpr(OPCOLON, cpexpr(t),
748 mkexpr(OPNEG, cpexpr(t), ENULL) ));
750 t1 = mkexpr(OPCOMMA, mkexpr(OPASSIGN, cpexpr(t),q), t1);
760 q = (expptr) cpexpr(args->datap->headblock.vleng);
H A Doptcse.c766 fixtype(mkexpr(OPASSIGN,cpexpr(tempv), in prunetrees()
770 tree2 = fixtype(mkexpr(OPASSIGN,cpexpr(tempv), in prunetrees()
775 *(p->parent) = fixtype(mkexpr(OPINDIRECT,cpexpr(tempv), NULL)); in prunetrees()
777 *(p->parent) = (expptr) cpexpr(tempv); in prunetrees()
787 mkexpr(OPINDIRECT,cpexpr(tempv), NULL)); in prunetrees()
789 *(dl->parent) = (expptr) cpexpr(tempv); in prunetrees()
H A Dconv.c167 p = (expptr) cpexpr(cp);
286 p = (expptr) cpexpr(cp);
774 p = (expptr) cpexpr(cp);
/original-bsd/usr.bin/f77/pass1.vax/
H A Dexec.c544 optbuff (SKEQ,mkexpr(OPASSIGN,cpexpr(dovarp),cpexpr(DOINIT)),
547 puteq (cpexpr(dovarp), cpexpr(DOINIT));
550 q = mkexpr(OPMINUS, cpexpr(CONSTLIMIT), cpexpr(CONSTINIT));
567 q = (expptr) cpexpr(ctlstack->domax);
570 q1 = mkexpr(OPASSIGN, cpexpr(dovarp), DOINIT);
585 puteq (cpexpr(ctlstack->domax), DOLIMIT);
589 mkexpr(OPASSIGN, cpexpr(ctlstack->dostep),
594 puteq (cpexpr(dovarp), q);
600 puteq (cpexpr(ctlstack->dostep), DOINCR);
622 incr = mkexpr(OPPLUSEQ, cpexpr(dovarp), cpexpr(ctlstack->dostep));
[all …]
H A Doptim.c578 q = (expptr) cpexpr (p->exprblock.vleng);
676 cp1 = (Addrp) cpexpr(cp);
678 lp1 = (Addrp) cpexpr(lp);
717 qp = mkexpr(OPCOLON, cpexpr(tp), cpexpr(sp));
718 qp = mkexpr(OPQUEST, mkexpr(op, cpexpr(tp),cpexpr(sp)), qp);
724 mkexpr( OPASSIGN, cpexpr(sp), p0->datap ), cpexpr(newtemp));
730 APPEND (mkexpr (OPASSIGN, cpexpr(sp), cpexpr(qp)) );
781 cpexpr( (expptr) newtemp ),
782 cpexpr( base ) );
815 r = (expptr) cpexpr( base );
[all …]
H A Dio.c402 p = (expptr) cpexpr(p);
484 cpexpr(qe->headblock.vleng);
497 puteq (cpexpr(tp),qe);
573 cpexpr(IOSTP), ICON(0)); in endio()
628 unitp = (Addrp) cpexpr(p); in startrw()
673 recp = (Addrp) cpexpr(p); in startrw()
719 fmtp = (Addrp) cpexpr(p); in startrw()
796 ioseta(XIUNIT, cpexpr(unitp)); in startrw()
836 ioset(TYIOINT, XUNIT, cpexpr(p) ); in dofopen()
870 ioset(TYIOINT, XUNIT, cpexpr(p) ); in dofclose()
[all …]
H A Dputpcc.c679 putx( mkexpr(OPSTAR,cpexpr(base),cpexpr(base)));
686 putassign(cpexpr(t1), cpexpr(base) );
695 putx( mkexpr(OPSTAR, cpexpr(t1), cpexpr(t1)) );
700 putassign(cpexpr(t2), cpexpr(t1));
713 mkexpr(OPSTAR, cpexpr(t1), cpexpr(t1)) ));
733 putassign(cpexpr(t), p);
1161 cp1 = (Addrp) cpexpr(cp);
1163 lp1 = (Addrp) cpexpr(lp);
1536 qp = mkexpr(OPCOLON, cpexpr(tp), cpexpr(sp));
1537 qp = mkexpr(OPQUEST, mkexpr(op, cpexpr(tp),cpexpr(sp)), qp);
[all …]
H A Dexpr.c389 r = (Addrp) cpexpr(s);
494 tagptr cpexpr(p) in cpexpr() function
566 cpexpr(e->primblock.argsp);
829 cpexpr(lconst)));
838 cpexpr(rconst)));
866 cpexpr(lconst)));
875 cpexpr(rconst)));
1068 cpexpr(np->vleng) :
1070 cpexpr(dp->baseoffset) );
1966 cpexpr(rp));
[all …]
H A Dvax.c965 puteq( fixtype(cpexpr(dp->dims[i].dimsize)),
966 fixtype(cpexpr(dp->dims[i].dimexpr)));
971 puteq( fixtype(cpexpr(dp->dims[i].lbaddr)),
972 fixtype(cpexpr(dp->dims[i].lb)));
974 puteq( fixtype(cpexpr(dp->dims[i].ubaddr)),
975 fixtype(cpexpr(dp->dims[i].ub)));
992 puteq( cpexpr(fixtype(dp->baseoffset)),
993 cpexpr(fixtype(dp->basexpr)));
1005 tp = (expptr) cpexpr(q->vleng);
1008 cpexpr(dp->baseoffset)) ));
[all …]
H A Dregalloc.c379 q->stgp = (Addrp) cpexpr(ap);
851 ap = (Addrp) cpexpr(rp->stgp); in alreg()
862 ap = (Addrp) cpexpr(rp->stgp); in alreg()
875 ap = (Addrp) cpexpr(rp->stgp); in alreg()
924 ap = (Addrp) cpexpr(rp->stgp); in alreg()
982 ap = (Addrp) cpexpr(rp->stgp); in alreg()
1002 ap = (Addrp) cpexpr(rp->stgp); in alreg()
1700 ap1 = (Addrp) cpexpr(rp->stgp);
2064 ap = (Addrp) cpexpr(rp->stgp);
2087 ap = (Addrp) cpexpr(rp->stgp);
[all …]
H A Dput.c132 putx( fixexpr( mkexpr(OPSTAREQ, cpexpr(a), cpexpr(b)) ));
144 q = (Addrp) cpexpr(p);
174 q = (Addrp) cpexpr(p);
235 q->vleng = (expptr) cpexpr(p->vleng);
H A Dproc.c412 putbranch( cpexpr(typeaddr) ); in epicode()
452 p = (Addrp) cpexpr(retslot);
459 p = (Addrp) cpexpr(retslot);
1113 t = (Addrp) cpexpr(t);
1249 return ((Addrp) cpexpr(q));
1258 return ((Addrp) cpexpr(q));
1480 else p->dims[i].lb= (expptr) cpexpr(dims[i].lb);
1485 else p->dims[i].ub = (expptr) cpexpr(dims[i].ub);
1506 q = mkexpr(OPMINUS, q, cpexpr(dims[i].lb));
1531 cpexpr(p->dims[i].dimsize) );
[all …]
H A Dintr.c665 mkexpr(OPLE, intrconv(type,ICON(0)), cpexpr(t)),
666 mkexpr(OPCOLON, cpexpr(t),
667 mkexpr(OPNEG, cpexpr(t), ENULL) ));
669 t1 = mkexpr(OPCOMMA, mkexpr(OPASSIGN, cpexpr(t),q), t1);
679 q = (expptr) cpexpr(args->datap->headblock.vleng);
H A Doptcse.c766 fixtype(mkexpr(OPASSIGN,cpexpr(tempv), in prunetrees()
770 tree2 = fixtype(mkexpr(OPASSIGN,cpexpr(tempv), in prunetrees()
775 *(p->parent) = fixtype(mkexpr(OPINDIRECT,cpexpr(tempv), NULL)); in prunetrees()
777 *(p->parent) = (expptr) cpexpr(tempv); in prunetrees()
787 mkexpr(OPINDIRECT,cpexpr(tempv), NULL)); in prunetrees()
789 *(dl->parent) = (expptr) cpexpr(tempv); in prunetrees()
H A Dconv.c186 p = (expptr) cpexpr(cp);
305 p = (expptr) cpexpr(cp);
793 p = (expptr) cpexpr(cp);
H A Doptloop.c716 *refexpr = (expptr) cpexpr (ep->exprblock.leftp);
721 newslot = optinsert (SKEQ, mkexpr(OPASSIGN,cpexpr(ap),ep), 0, 0, first);

12