comparison mc-codegen.c @ 151:81032a1b8a5d

MIPS continue
author kono
date Mon, 14 Jul 2003 14:40:35 +0900
parents cb7aa0089681
children 3edd10355434
comparison
equal deleted inserted replaced
150:f8271009a314 151:81032a1b8a5d
1120 return; 1120 return;
1121 } 1121 }
1122 switch(car(e2)) { 1122 switch(car(e2)) {
1123 case GVAR: 1123 case GVAR:
1124 g_expr(e4); 1124 g_expr(e4);
1125 creg = d?use_double(creg):use_float(creg);
1125 code_dassign_gvar(e2,creg,d); 1126 code_dassign_gvar(e2,creg,d);
1126 return; 1127 return;
1127 case LVAR: 1128 case LVAR:
1128 g_expr(e4); 1129 g_expr(e4);
1130 creg = d?use_double(creg):use_float(creg);
1129 code_dassign_lvar(cadr(e2),creg,d); 1131 code_dassign_lvar(cadr(e2),creg,d);
1130 return; 1132 return;
1131 case DREGISTER: 1133 case DREGISTER:
1132 case FREGISTER: 1134 case FREGISTER:
1133 g_expr(e4); 1135 g_expr(e4);
1314 case DMUL: case DDIV: case DADD: case DSUB: case DCMP: case DCMPGE: 1316 case DMUL: case DDIV: case DADD: case DSUB: case DCMP: case DCMPGE:
1315 case FMUL: case FDIV: case FADD: case FSUB: case FCMP: case FCMPGE: 1317 case FMUL: case FDIV: case FADD: case FSUB: case FCMP: case FCMPGE:
1316 case SASS: case ASS: case CASS: case FASS: case DASS: case LASS: 1318 case SASS: case ASS: case CASS: case FASS: case DASS: case LASS:
1317 case ASSOP: case CASSOP: case DASSOP: case FASSOP: case COMMA: 1319 case ASSOP: case CASSOP: case DASSOP: case FASSOP: case COMMA:
1318 case EQ: case NEQ: 1320 case EQ: case NEQ:
1321 case LAND: case LOR:
1319 case DOP+EQ: case DOP+NEQ: 1322 case DOP+EQ: case DOP+NEQ:
1320 case FOP+EQ: case FOP+NEQ: 1323 case FOP+EQ: case FOP+NEQ:
1321 case LT: case ULT: case LE: case ULE: 1324 case LT: case ULT: case LE: case ULE:
1322 case GT: case UGT: case GE: case UGE: 1325 case GT: case UGT: case GE: case UGE:
1323 case DOP+LT: case DOP+LE: case DOP+GT: case DOP+GE: 1326 case DOP+LT: case DOP+LE: case DOP+GT: case DOP+GE: