Mercurial > hg > CbC > old > device
comparison mc-inline.c @ 532:cecf5103679e
cond fix
author | kono |
---|---|
date | Fri, 30 Dec 2005 13:36:17 +0900 |
parents | 19f5882997f5 |
children | 80b5058f0535 |
comparison
equal
deleted
inserted
replaced
531:19f5882997f5 | 532:cecf5103679e |
---|---|
922 case LADD: case LSUB: case LBAND: case LEOR: case LBOR: case LCMP: | 922 case LADD: case LSUB: case LBAND: case LEOR: case LBOR: case LCMP: |
923 #endif | 923 #endif |
924 return pbinop(car(e1),e2,caddr(e1)); | 924 return pbinop(car(e1),e2,caddr(e1)); |
925 case LCOND: case DCOND: case FCOND: case COND: case UCOND: case LUCOND: | 925 case LCOND: case DCOND: case FCOND: case COND: case UCOND: case LUCOND: |
926 e3 = pexpr(e2); | 926 e3 = pexpr(e2); |
927 if (car(e3)==CONST) return pexpr(cadr(e3)?caddr(e1):cadddr(e1)); | 927 if (car(e3)==CONST) return |
928 return list4(car(e1),e3,pexpr(cadr(e1)),pexpr(cadr(e2))); | 928 caddr(e1)? pexpr(cadr(e3)?caddr(e1):cadddr(e1)) : |
929 pexpr(cadr(e3)?e3:cadddr(e1)); // GNU extension h?:g | |
930 return list4(car(e1),e3,pexpr(caddr(e1)),pexpr(cadddr(e1))); | |
929 case STASS: | 931 case STASS: |
930 return psassign(e1); | 932 return psassign(e1); |
931 case ASS: case CASS: case SASS: | 933 case ASS: case CASS: case SASS: |
932 return passign(e1); | 934 return passign(e1); |
933 case SASSOP: case SUASSOP: | 935 case SASSOP: case SUASSOP: |