918 	ULong *x, *xa, *xae, *xb, *xbe, *xc, *xc0;  local
940 	for(x = c->x, xa = x + wc; x < xa; x++)
942 	xa = a->x;
943 	xae = xa + wa;
950 			x = xa;
964 			x = xa;
982 			x = xa;
1134 	ULong *xa, *xa0, *xb, *xb0;  local
1155 	xa = xa0 + j;
1159 		if (*--xa != *--xb)
1160 			return *xa < *xb ? -1 : 1;
1161 		if (xa <= xa0)
1178 	ULong *xa, *xae, *xb, *xbe, *xc;  local
1208 	xa = a->x;
1209 	xae = xa + wa;
1217 		y = (*xa & 0xffff) - (*xb & 0xffff) + borrow;
1220 		z = (*xa++ >> 16) - (*xb++ >> 16) + borrow;
1226 	while(xa < xae) {
1227 		y = (*xa & 0xffff) + borrow;
1230 		z = (*xa++ >> 16) + borrow;
1237 		y = *xa++ - *xb++ + borrow;
1243 	while(xa < xae) {
1244 		y = *xa++ + borrow;
1304 	ULong *xa, *xa0, w, y, z;  local
1318 	xa = xa0 + a->wds;
1319 	y = *--xa;
1328 		w = xa > xa0 ? *--xa : 0;
1332 	z = xa > xa0 ? *--xa : 0;
1335 		y = xa > xa0 ? *--xa : 0;
1344 		z = xa > xa0 ? *--xa : 0;
1346 		w = xa > xa0 ? *--xa : 0;
1347 		y = xa > xa0 ? *--xa : 0;
1351 	z = xa > xa0 ? *--xa : 0;
1352 	w = xa > xa0 ? *--xa : 0;
1355 	y = xa > xa0 ? *--xa : 0;