184 	int IR;  in do_mathemu()  local
262 			IR = 2;  in do_mathemu()
277 				IR = 0;  in do_mathemu()
280 				case 1: if (XR) IR = 1; break;			/* Not Equal */  in do_mathemu()
281 				case 2: if (XR == 1 || XR == 2) IR = 1; break;	/* Less or Greater */  in do_mathemu()
282 				case 3: if (XR & 1) IR = 1; break;		/* Unordered or Less */  in do_mathemu()
283 				case 4: if (XR == 1) IR = 1; break;		/* Less */  in do_mathemu()
284 				case 5: if (XR & 2) IR = 1; break;		/* Unordered or Greater */  in do_mathemu()
285 				case 6: if (XR == 2) IR = 1; break;		/* Greater */  in do_mathemu()
286 				case 7: if (XR == 3) IR = 1; break;		/* Unordered */  in do_mathemu()
289 					IR ^= 1;  in do_mathemu()
298 				IR = 0;  in do_mathemu()
302 				case 1: if (XR & 4) IR = 1; break;		/* Equal */  in do_mathemu()
303 				case 2: if ((XR & 4) || freg) IR = 1; break;	/* Less or Equal */  in do_mathemu()
304 				case 3: if (freg) IR = 1; break;		/* Less */  in do_mathemu()
305 				case 4: if (XR & 5) IR = 1; break;		/* Less or Equal Unsigned */  in do_mathemu()
306 				case 5: if (XR & 1) IR = 1; break;		/* Carry Set */  in do_mathemu()
307 				case 6: if (XR & 8) IR = 1; break;		/* Negative */  in do_mathemu()
308 				case 7: if (XR & 2) IR = 1; break;		/* Overflow Set */  in do_mathemu()
311 					IR ^= 1;  in do_mathemu()
335 				IR = 0;  in do_mathemu()
337 				case 1: if (!XR) IR = 1; break;			/* Register Zero */  in do_mathemu()
338 				case 2: if (XR <= 0) IR = 1; break;		/* Register Less Than or Equal to Zero */  in do_mathemu()
339 				case 3: if (XR < 0) IR = 1; break;		/* Register Less Than Zero */  in do_mathemu()
342 					IR ^= 1;  in do_mathemu()
345 			if (IR == 0) {  in do_mathemu()
351 			} else if (IR == 1) {  in do_mathemu()
461 		case FSTOI: FP_TO_INT_S (IR, SB, 32, 1); break;  in do_mathemu()
462 		case FDTOI: FP_TO_INT_D (IR, DB, 32, 1); break;  in do_mathemu()
463 		case FQTOI: FP_TO_INT_Q (IR, QB, 32, 1); break;  in do_mathemu()
468 		case FITOQ: IR = rs2->s; FP_FROM_INT_Q (QR, IR, 32, int); break;  in do_mathemu()
474 		case FITOS: IR = rs2->s; FP_FROM_INT_S (SR, IR, 32, int); break;  in do_mathemu()
476 		case FITOD: IR = rs2->s; FP_FROM_INT_D (DR, IR, 32, int); break;  in do_mathemu()
507 			case 1: rd->s = IR; break;  in do_mathemu()