241: inex = STRTOG_Inexlo;
242: rshift(b, bdif);
243: if (carry) {
254: lostbits = b->x[0] & 1;
255: rshift(b, 1);
256: e++;
281: carry = b->x[k1>>kshift] & (1 << (k1 & kmask));
282: rshift(b, k);
283: *irv = STRTOG_Denormal;
707: if ((j = rvbits - nbits) > 0) {
708: rshift(rvb, j);
709: rvbits = nbits;
739: else
740: rshift(rvb, -j);
741: }
813: else if (bb2 < 0)
814: rshift(bb, -bb2);
815: if (bd5 > 0) {
995: if (abe < 0)
996: rshift(ab, -abe);
997: else if (abe > 0) {
1041: else {
1042: rshift(rvb, 1);
1043: rve++;
1082: else
1083: rshift(rvb, -j);
1084: rve -= j;