diff options
Diffstat (limited to 'arch/m68k/ifpsp060/src/pfpsp.S')
-rw-r--r-- | arch/m68k/ifpsp060/src/pfpsp.S | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/arch/m68k/ifpsp060/src/pfpsp.S b/arch/m68k/ifpsp060/src/pfpsp.S index e71ba0ab013c..4aedef973cf6 100644 --- a/arch/m68k/ifpsp060/src/pfpsp.S +++ b/arch/m68k/ifpsp060/src/pfpsp.S | |||
@@ -7777,7 +7777,7 @@ dst_get_dupper: | |||
7777 | swap %d0 # d0 now in upper word | 7777 | swap %d0 # d0 now in upper word |
7778 | lsl.l &0x4,%d0 # d0 in proper place for dbl prec exp | 7778 | lsl.l &0x4,%d0 # d0 in proper place for dbl prec exp |
7779 | tst.b FTEMP_EX(%a0) # test sign | 7779 | tst.b FTEMP_EX(%a0) # test sign |
7780 | bpl.b dst_get_dman # if postive, go process mantissa | 7780 | bpl.b dst_get_dman # if positive, go process mantissa |
7781 | bset &0x1f,%d0 # if negative, set sign | 7781 | bset &0x1f,%d0 # if negative, set sign |
7782 | dst_get_dman: | 7782 | dst_get_dman: |
7783 | mov.l FTEMP_HI(%a0),%d1 # get ms mantissa | 7783 | mov.l FTEMP_HI(%a0),%d1 # get ms mantissa |
@@ -8244,7 +8244,7 @@ fmul_unfl_ena: | |||
8244 | bne.b fmul_unfl_ena_sd # no, sgl or dbl | 8244 | bne.b fmul_unfl_ena_sd # no, sgl or dbl |
8245 | 8245 | ||
8246 | # if the rnd mode is anything but RZ, then we have to re-do the above | 8246 | # if the rnd mode is anything but RZ, then we have to re-do the above |
8247 | # multiplication becuase we used RZ for all. | 8247 | # multiplication because we used RZ for all. |
8248 | fmov.l L_SCR3(%a6),%fpcr # set FPCR | 8248 | fmov.l L_SCR3(%a6),%fpcr # set FPCR |
8249 | 8249 | ||
8250 | fmul_unfl_ena_cont: | 8250 | fmul_unfl_ena_cont: |
@@ -12903,7 +12903,7 @@ store_fpreg_7: | |||
12903 | # FP_SRC(a6) = packed operand now as a binary FP number # | 12903 | # FP_SRC(a6) = packed operand now as a binary FP number # |
12904 | # # | 12904 | # # |
12905 | # ALGORITHM *********************************************************** # | 12905 | # ALGORITHM *********************************************************** # |
12906 | # Get the correct <ea> whihc is the value on the exception stack # | 12906 | # Get the correct <ea> which is the value on the exception stack # |
12907 | # frame w/ maybe a correction factor if the <ea> is -(an) or (an)+. # | 12907 | # frame w/ maybe a correction factor if the <ea> is -(an) or (an)+. # |
12908 | # Then, fetch the operand from memory. If the fetch fails, exit # | 12908 | # Then, fetch the operand from memory. If the fetch fails, exit # |
12909 | # through facc_in_x(). # | 12909 | # through facc_in_x(). # |
@@ -14056,7 +14056,7 @@ do_fint12: | |||
14056 | # A6. This test occurs only on the first pass. If the | 14056 | # A6. This test occurs only on the first pass. If the |
14057 | # result is exactly 10^LEN, decrement ILOG and divide | 14057 | # result is exactly 10^LEN, decrement ILOG and divide |
14058 | # the mantissa by 10. The calculation of 10^LEN cannot | 14058 | # the mantissa by 10. The calculation of 10^LEN cannot |
14059 | # be inexact, since all powers of ten upto 10^27 are exact | 14059 | # be inexact, since all powers of ten up to 10^27 are exact |
14060 | # in extended precision, so the use of a previous power-of-ten | 14060 | # in extended precision, so the use of a previous power-of-ten |
14061 | # table will introduce no error. | 14061 | # table will introduce no error. |
14062 | # | 14062 | # |