diff options
Diffstat (limited to 'arch/m68k/ifpsp060')
-rw-r--r-- | arch/m68k/ifpsp060/src/fpsp.S | 10 | ||||
-rw-r--r-- | arch/m68k/ifpsp060/src/pfpsp.S | 8 |
2 files changed, 9 insertions, 9 deletions
diff --git a/arch/m68k/ifpsp060/src/fpsp.S b/arch/m68k/ifpsp060/src/fpsp.S index 26e85e2b7a5e..78cb60f5bb4d 100644 --- a/arch/m68k/ifpsp060/src/fpsp.S +++ b/arch/m68k/ifpsp060/src/fpsp.S | |||
@@ -11813,7 +11813,7 @@ fmul_unfl_ena: | |||
11813 | bne.b fmul_unfl_ena_sd # no, sgl or dbl | 11813 | bne.b fmul_unfl_ena_sd # no, sgl or dbl |
11814 | 11814 | ||
11815 | # if the rnd mode is anything but RZ, then we have to re-do the above | 11815 | # if the rnd mode is anything but RZ, then we have to re-do the above |
11816 | # multiplication becuase we used RZ for all. | 11816 | # multiplication because we used RZ for all. |
11817 | fmov.l L_SCR3(%a6),%fpcr # set FPCR | 11817 | fmov.l L_SCR3(%a6),%fpcr # set FPCR |
11818 | 11818 | ||
11819 | fmul_unfl_ena_cont: | 11819 | fmul_unfl_ena_cont: |
@@ -18095,7 +18095,7 @@ fscc_mem_op: | |||
18095 | 18095 | ||
18096 | rts | 18096 | rts |
18097 | 18097 | ||
18098 | # addresing mode is post-increment. write the result byte. if the write | 18098 | # addressing mode is post-increment. write the result byte. if the write |
18099 | # fails then don't update the address register. if write passes then | 18099 | # fails then don't update the address register. if write passes then |
18100 | # call inc_areg() to update the address register. | 18100 | # call inc_areg() to update the address register. |
18101 | fscc_mem_inc: | 18101 | fscc_mem_inc: |
@@ -20876,7 +20876,7 @@ dst_get_dupper: | |||
20876 | swap %d0 # d0 now in upper word | 20876 | swap %d0 # d0 now in upper word |
20877 | lsl.l &0x4,%d0 # d0 in proper place for dbl prec exp | 20877 | lsl.l &0x4,%d0 # d0 in proper place for dbl prec exp |
20878 | tst.b FTEMP_EX(%a0) # test sign | 20878 | tst.b FTEMP_EX(%a0) # test sign |
20879 | bpl.b dst_get_dman # if postive, go process mantissa | 20879 | bpl.b dst_get_dman # if positive, go process mantissa |
20880 | bset &0x1f,%d0 # if negative, set sign | 20880 | bset &0x1f,%d0 # if negative, set sign |
20881 | dst_get_dman: | 20881 | dst_get_dman: |
20882 | mov.l FTEMP_HI(%a0),%d1 # get ms mantissa | 20882 | mov.l FTEMP_HI(%a0),%d1 # get ms mantissa |
@@ -22943,7 +22943,7 @@ tbl_ovfl_result: | |||
22943 | # FP_SRC(a6) = packed operand now as a binary FP number # | 22943 | # FP_SRC(a6) = packed operand now as a binary FP number # |
22944 | # # | 22944 | # # |
22945 | # ALGORITHM *********************************************************** # | 22945 | # ALGORITHM *********************************************************** # |
22946 | # Get the correct <ea> whihc is the value on the exception stack # | 22946 | # Get the correct <ea> which is the value on the exception stack # |
22947 | # frame w/ maybe a correction factor if the <ea> is -(an) or (an)+. # | 22947 | # frame w/ maybe a correction factor if the <ea> is -(an) or (an)+. # |
22948 | # Then, fetch the operand from memory. If the fetch fails, exit # | 22948 | # Then, fetch the operand from memory. If the fetch fails, exit # |
22949 | # through facc_in_x(). # | 22949 | # through facc_in_x(). # |
@@ -24096,7 +24096,7 @@ do_fint12: | |||
24096 | # A6. This test occurs only on the first pass. If the | 24096 | # A6. This test occurs only on the first pass. If the |
24097 | # result is exactly 10^LEN, decrement ILOG and divide | 24097 | # result is exactly 10^LEN, decrement ILOG and divide |
24098 | # the mantissa by 10. The calculation of 10^LEN cannot | 24098 | # the mantissa by 10. The calculation of 10^LEN cannot |
24099 | # be inexact, since all powers of ten upto 10^27 are exact | 24099 | # be inexact, since all powers of ten up to 10^27 are exact |
24100 | # in extended precision, so the use of a previous power-of-ten | 24100 | # in extended precision, so the use of a previous power-of-ten |
24101 | # table will introduce no error. | 24101 | # table will introduce no error. |
24102 | # | 24102 | # |
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 | # |