182 	int IR;  in do_mathemu()  local
260 			IR = 2;  in do_mathemu()
275 				IR = 0;  in do_mathemu()
278 				case 1: if (XR) IR = 1; break;			/* Not Equal */  in do_mathemu()
279 				case 2: if (XR == 1 || XR == 2) IR = 1; break;	/* Less or Greater */  in do_mathemu()
280 				case 3: if (XR & 1) IR = 1; break;		/* Unordered or Less */  in do_mathemu()
281 				case 4: if (XR == 1) IR = 1; break;		/* Less */  in do_mathemu()
282 				case 5: if (XR & 2) IR = 1; break;		/* Unordered or Greater */  in do_mathemu()
283 				case 6: if (XR == 2) IR = 1; break;		/* Greater */  in do_mathemu()
284 				case 7: if (XR == 3) IR = 1; break;		/* Unordered */  in do_mathemu()
287 					IR ^= 1;  in do_mathemu()
296 				IR = 0;  in do_mathemu()
300 				case 1: if (XR & 4) IR = 1; break;		/* Equal */  in do_mathemu()
301 				case 2: if ((XR & 4) || freg) IR = 1; break;	/* Less or Equal */  in do_mathemu()
302 				case 3: if (freg) IR = 1; break;		/* Less */  in do_mathemu()
303 				case 4: if (XR & 5) IR = 1; break;		/* Less or Equal Unsigned */  in do_mathemu()
304 				case 5: if (XR & 1) IR = 1; break;		/* Carry Set */  in do_mathemu()
305 				case 6: if (XR & 8) IR = 1; break;		/* Negative */  in do_mathemu()
306 				case 7: if (XR & 2) IR = 1; break;		/* Overflow Set */  in do_mathemu()
309 					IR ^= 1;  in do_mathemu()
333 				IR = 0;  in do_mathemu()
335 				case 1: if (!XR) IR = 1; break;			/* Register Zero */  in do_mathemu()
336 				case 2: if (XR <= 0) IR = 1; break;		/* Register Less Than or Equal to Zero */  in do_mathemu()
337 				case 3: if (XR < 0) IR = 1; break;		/* Register Less Than Zero */  in do_mathemu()
340 					IR ^= 1;  in do_mathemu()
343 			if (IR == 0) {  in do_mathemu()
349 			} else if (IR == 1) {  in do_mathemu()
451 		case FSTOI: FP_TO_INT_S (IR, SB, 32, 1); break;  in do_mathemu()
452 		case FDTOI: FP_TO_INT_D (IR, DB, 32, 1); break;  in do_mathemu()
453 		case FQTOI: FP_TO_INT_Q (IR, QB, 32, 1); break;  in do_mathemu()
458 		case FITOQ: IR = rs2->s; FP_FROM_INT_Q (QR, IR, 32, int); break;  in do_mathemu()
464 		case FITOS: IR = rs2->s; FP_FROM_INT_S (SR, IR, 32, int); break;  in do_mathemu()
466 		case FITOD: IR = rs2->s; FP_FROM_INT_D (DR, IR, 32, int); break;  in do_mathemu()
497 			case 1: rd->s = IR; break;  in do_mathemu()