313 	struct tbl *vl;  in do_ppmm()  local
318 	vl = intvar(es, vasn);  in do_ppmm()
319 	oval = vl->val.u;  in do_ppmm()
321 		++vl->val.u;  in do_ppmm()
323 		--vl->val.u;  in do_ppmm()
326 			setint_v(vasn, vl, es->arith);  in do_ppmm()
328 			setint(vasn, vl->val.i);  in do_ppmm()
332 		vl->val.u = oval;  in do_ppmm()
334 	return (vl);  in do_ppmm()
340 	struct tbl *vl, *vr = NULL, *vasn;  in evalexpr()  local
351 			vl = intvar(es, evalexpr(es, P_PRIMARY));  in evalexpr()
354 				vl->val.u = ~vl->val.u;  in evalexpr()
357 				vl->val.u = !vl->val.u;  in evalexpr()
360 				vl->val.u = -vl->val.u;  in evalexpr()
370 			vl = evalexpr(es, MAX_PREC);  in evalexpr()
379 			vl = do_ppmm(es, op, es->val, true);  in evalexpr()
385 			vl = es->val;  in evalexpr()
395 			vl = do_ppmm(es, es->tok, vl, false);  in evalexpr()
399 		return (vl);  in evalexpr()
403 	vl = evalexpr(es, prec - 1);  in evalexpr()
407 		vasn = vl;  in evalexpr()
410 			vl = intvar(es, vl);  in evalexpr()
416 			bool ev = vl->val.u != 0;  in evalexpr()
420 			vl = evalexpr(es, MAX_PREC);  in evalexpr()
431 			vl = ev ? vl : vr;  in evalexpr()
448 			t1 = vl->val.i < 0 ? -vl->val.u : vl->val.u;  in evalexpr()
460 			t1 = vl->val.u;  in evalexpr()
466 			t1 = vl->val.u;  in evalexpr()
470 			t1 = vl->val.u;  in evalexpr()
476 	(mksh_uari_t)(vl->val.u op vr->val.u) :		\  in evalexpr()
477 	(mksh_uari_t)(vl->val.i op vr->val.i)		\  in evalexpr()
489 				res = vl->val.u % vr->val.u;  in evalexpr()
496 				res = vl->val.u / vr->val.u;  in evalexpr()
505 			res = ((vl->val.u ^ vr->val.u) & 0x80000000) ? -t3 : t3;  in evalexpr()
507 			res = ((t1 == vl->val.u ? 0 : 1) ^  in evalexpr()
518 				res = vl->val.u - (res * vr->val.u);  in evalexpr()
545 			res = es->natural || vl->val.i >= 0 ?  in evalexpr()
611 			vl = vr;  in evalexpr()
613 			vl->val.u = res;  in evalexpr()
615 	return (vl);  in evalexpr()