178  (d, fpi, exp, bits, exact, rd, irv)  in rvOK()  argument
179  U *d; FPI *fpi; Long *exp; ULong *bits; int exact, rd, *irv;  in rvOK()
181  (U *d, FPI *fpi, Long *exp, ULong *bits, int exact, int rd, int *irv)
194 	bdif -= nb = fpi->nbits;
206 			fpi->rounding ==
267 	if (e < fpi->emin) {
268 		k = fpi->emin - e;
269 		e = fpi->emin;
270 		if (k > nb || fpi->sudden_underflow) {
296 	else if (e > fpi->emax) {
297 		e = fpi->emax + 1;
339 	(s00, se, fpi, exp, bits)  in strtodg()  argument
340 	CONST char *s00; char **se; FPI *fpi; Long *exp; ULong *bits;  in strtodg()
342 	(CONST char *s00, char **se, FPI *fpi, Long *exp, ULong *bits)
379 	nbits = fpi->nbits;
409 			irv = gethex(&s, fpi, exp, &rvb, sign);
424 	sudden_underflow = fpi->sudden_underflow;
534 					*exp = fpi->emax + 1;
537 						irv = hexnan(&s, fpi, bits);
552 	switch(fpi->rounding & 3) {
577 			if (rvOK(&rv, fpi, exp, bits, 1, rd, &irv)) {
590 				if (rvOK(&rv, fpi, exp, bits, i, rd, &irv)) {
623 				if (rvOK(&rv, fpi, exp, bits, 0, rd, &irv)) {
634 			if (rvOK(&rv, fpi, exp, bits, 0, rd, &irv)) {
711 	if (e2 > fpi->emax + 1)
714 	if (e2 < (emin = fpi->emin)) {
1089 	if (rve > fpi->emax) {
1090 		switch(fpi->rounding & 3) {
1105 		*exp = fpi->emax;
1107 		be = b + ((fpi->nbits + 31) >> 5);
1110 		if ((j = fpi->nbits & 0x1f))
1120 		*exp = fpi->emax + 1;