Lines Matching +full:reference +full:- +full:div +full:- +full:factor
5 | register A6 to extended-precision value in FP0.
9 | Output: Exact floating-point representation of the packed bcd value.
11 | Saves and Modifies: D2-D5
17 | External Reference(s): None.
20 | Expected is a normal bcd (i.e. non-exceptional; all inf, zero,
33 | assumed following the least-significant digit.
43 | SM = 0 a non-zero digit in the integer position
44 | SM = 1 a non-zero digit in Mant0, lsd of the fraction
47 | representation (ex. 0.1E2, 1E1, 10E0, 100E-1), is converted
50 | A4. Calculate the factor 10^exp in FP1 using a table of
57 | the exponent factor. This is done by multiplying the
58 | mantissa in FP0 by the factor in FP1 if the adjusted
62 | Clean up and return. Check if the final mul or div resulted
121 moveml %d2-%d5,-(%a7)
248 | 3. Add one for each zero encountered until a non-zero digit.
255 | 3. Add one for each zero encountered until a non-zero digit.
260 | *Why 27? If the adjusted exponent is within -28 < expA < 28, than
282 | and do append (+) or strip (-) zeros accordingly.
294 bnes ap_p_fx |if M16 is non-zero, go fix exp
307 bnes ap_p_fx |if non-zero, go to fix exp
325 movel #PTENRN,%a1 |get address of power-of-ten table
331 bccs ap_p_en |if 1, mul fp1 by pwrten factor
355 bnes ap_n_fx |if non-zero, go to exp fix
373 movel #PTENRN,%a1 |get address of power-of-ten table
379 bccs ap_n_en |if 1, mul fp1 by pwrten factor
385 fdivx %fp1,%fp0 |div mantissa by 10**(no_bits_shifted)
388 | Calculate power-of-ten factor from adjusted and shifted exponent.
405 | (*) fp1: power-of-ten accumulator
407 | Pwrten calculates the exponent factor in the selected rounding mode
415 | - + RP RM
416 | + - RP RM
417 | - - RP RP
420 | - + RM RP
421 | + - RM RP
422 | - - RM RM
425 | - + RZ RM
426 | + - RZ RP
427 | - - RZ RP
479 | ( ) fp1: scaling factor - 10**(abs(exp))
484 div: label
493 | If the final mul/div in decbin incurred an inex exception,
503 moveml (%a7)+,%d2-%d5