Lines Matching refs:d2
4965 mov.l %d2,-(%sp) # save d2
4966 mov.l L_SCR1(%a6),%d2 # fetch opword
4968 btst &0xb,%d2 # is it word or long?
4972 mov.l %d2,%d1
4978 extb.l %d2 # sign extend displacement
4979 add.l %d2,%d0 # index + disp
4982 mov.l (%sp)+,%d2 # restore old d2
5061 mov.l %d2,-(%sp) # save d2
5062 mov.l L_SCR1(%a6),%d2 # fetch opword
5064 btst &0xb,%d2 # is index word or long?
5068 mov.l %d2,%d1
5074 extb.l %d2 # sign extend displacement
5075 add.l %d2,%d0 # disp + index
5078 mov.l (%sp)+,%d2 # restore temp register
5081 # d2 = index
5089 movm.l &0x3c00,-(%sp) # save d2-d5
5094 clr.l %d2 # yes, so index = 0
5103 movm.l &0x3c00,-(%sp) # save d2-d5
5104 mov.l %d0,%d2 # put index in d2
5110 ext.l %d2
5114 lsl.l %d0,%d2
5198 add.l %d2,%d0 # <ea> += index
5203 add.l %d2,%d3 # preindexing
5214 add.l %d2,%d3 # ea = (base + bd) + index
5219 movm.l (%sp)+,&0x003c # restore d2-d5
5226 movm.l (%sp)+,&0x003c # restore d2-d5
5231 movm.l (%sp)+,&0x003c # restore d2-d5
5864 clr.l FTEMP_LO(%a0) # set d2 = 0 (ms mantissa)
5937 mov.l %d2, -(%sp) # create temp storage
5945 mov.b GRS(%a6), %d2
5946 or.b %d2, 3+FTEMP_LO2(%a6)
5949 bfextu FTEMP_HI(%a0){&0:%d0}, %d2 # %d2 = new FTEMP_HI
5953 mov.l %d2, FTEMP_HI(%a0) # store new FTEMP_HI
5962 mov.l (%sp)+, %d2 # restore temp register
5989 mov.l %d2, -(%sp) # create temp storage
5999 mov.b GRS(%a6), %d2
6000 or.b %d2, 3+FTEMP_LO2(%a6)
6002 bfextu FTEMP_HI(%a0){&0:%d0}, %d2 # %d2 = new FTEMP_LO
6019 mov.l %d2, FTEMP_LO(%a0) # store FTEMP_LO
6022 mov.l (%sp)+,%d2 # restore temp register
6263 clr.l FTEMP_LO(%a0) # clear d2
6356 movm.l &0x3000, -(%sp) # make some temp registers {d2/d3}
6375 mov.l &30, %d2 # of the sgl prec. limits
6376 lsl.l %d2, %d3 # shift g-r bits to MSB of d3
6377 mov.l FTEMP_HI(%a0), %d2 # get word 2 for s-bit test
6378 and.l &0x0000003f, %d2 # s bit is the or of all other
6400 mov.l &30, %d2 # of the dbl prec. limits
6401 lsl.l %d2, %d3 # shift g-r bits to the MSB of d3
6402 mov.l FTEMP_LO(%a0), %d2 # get lower mantissa for s-bit test
6403 and.l &0x000001ff, %d2 # s bit is the or-ing of all
6414 movm.l (%sp)+, &0xc # restore scratch registers {d2/d3}
6440 mov.l %d2, -(%sp) # create some temp regs
6446 bfffo %d0{&0:&32}, %d2 # how many places to shift?
6450 lsl.l %d2, %d0 # left shift hi(man)
6451 bfextu %d1{&0:%d2}, %d3 # extract lo bits
6454 lsl.l %d2, %d1 # create lo(man)
6459 mov.l %d2, %d0 # return shift amount
6462 mov.l (%sp)+, %d2
6467 bfffo %d1{&0:&32}, %d2 # how many places to shift?
6468 lsl.l %d2, %d1 # shift lo(man)
6469 add.l &32, %d2 # add 32 to shft amount
6474 mov.l %d2, %d0 # return shift amount
6477 mov.l (%sp)+, %d2
8068 mov.l %d2,-(%sp) # save d2
8070 mov.l %d1,%d2 # make a copy
8072 andi.w &0x8000,%d2 # keep old sign
8074 or.w %d2,%d1 # concat old sign,new exp
8076 mov.l (%sp)+,%d2 # restore d2
8138 mov.l %d2,-(%sp) # save d2
8140 mov.w %d1,%d2 # make a copy
8145 andi.w &0x8000,%d2 # keep old sign
8146 or.w %d2,%d1 # concat old sign,new exp
8148 mov.l (%sp)+,%d2 # restore d2
8258 mov.l %d2,-(%sp) # save d2
8260 mov.l %d1,%d2 # make a copy
8262 andi.w &0x8000,%d2 # keep old sign
8266 or.w %d2,%d1 # concat old sign,new exp
8268 mov.l (%sp)+,%d2 # restore d2
8595 mov.l %d2,-(%sp) # save d2
8598 mov.w %d1,%d2 # make a copy
8601 andi.w &0x8000,%d2 # keep old sign
8602 or.w %d1,%d2 # concat old sign,new exponent
8603 mov.w %d2,FP_SCR0_EX(%a6) # insert new exponent
8604 mov.l (%sp)+,%d2 # restore d2
8657 mov.l %d2,-(%sp) # save d2
8658 mov.w %d1,%d2 # make a copy
8661 andi.w &0x8000,%d2 # extract old sign
8664 or.w %d1,%d2 # concat old sign,new exp
8665 mov.w %d2,FP_SCR1_EX(%a6) # insert new exponent
8667 mov.l (%sp)+,%d2 # restore d2
8710 mov.l %d2,-(%sp) # save d2
8712 mov.l %d1,%d2 # make a copy
8714 andi.w &0x8000,%d2 # keep old sign
8718 or.w %d2,%d1
8720 mov.l (%sp)+,%d2 # restore d2
8882 mov.l %d2,-(%sp) # store d2
8884 mov.l %d1,%d2 # make a copy
8886 andi.w &0x8000,%d2 # keep old sign
8888 or.w %d2,%d1 # concat old sign,new exp
8890 mov.l (%sp)+,%d2 # restore d2
8951 mov.l %d2,-(%sp) # save d2
8953 mov.w %d1,%d2 # make a copy
8958 andi.w &0x8000,%d2 # keep old sign
8959 or.w %d2,%d1 # concat old sign,new exp
8961 mov.l (%sp)+,%d2 # restore d2
9026 mov.l %d2,-(%sp) # save d2
9028 mov.l %d1,%d2 # make a copy
9030 andi.w &0x8000,%d2 # keep old sign
9034 or.w %d2,%d1 # concat old sign,new exp
9036 mov.l (%sp)+,%d2 # restore d2
9375 mov.l %d2,-(%sp) # save d2
9378 mov.w %d1,%d2 # make a copy
9381 andi.w &0x8000,%d2 # keep old sign
9382 or.w %d1,%d2 # concat old sign,new exp
9383 mov.w %d2,FP_SCR0_EX(%a6) # insert new exponent
9384 mov.l (%sp)+,%d2 # restore d2
9437 mov.l %d2,-(%sp) # save d2
9438 mov.l %d1,%d2 # make a copy
9440 andi.w &0x8000,%d2 # keep old sign
9444 or.w %d2,%d1 # concat new sign,new exp
9447 mov.l (%sp)+,%d2 # restore d2
9490 mov.l %d2,-(%sp) # save d2
9492 mov.l %d1,%d2 # make a copy
9494 andi.w &0x8000,%d2 # keep old sign
9498 or.w %d2,%d1 # concat sign,exp
9501 mov.l (%sp)+,%d2 # restore d2
9993 mov.l %d2,-(%sp) # save d2
9996 mov.l %d1,%d2 # make a copy
9999 andi.w &0x8000,%d2 # keep old sign
10000 or.w %d1,%d2 # concat old sign,new exp
10001 mov.w %d2,FP_SCR0_EX(%a6) # insert new exponent
10002 mov.l (%sp)+,%d2 # restore d2
10052 mov.l %d2,-(%sp) # save d2
10053 mov.l %d1,%d2 # make a copy
10055 andi.w &0x8000,%d2 # keep old sign
10059 or.w %d2,%d1 # concat new sign,new exp
10062 mov.l (%sp)+,%d2 # restore d2
10105 mov.l %d2,-(%sp) # save d2
10107 mov.l %d1,%d2 # make a copy
10109 andi.w &0x8000,%d2 # keep old sign
10113 or.w %d2,%d1 # concat sign,exp
10116 mov.l (%sp)+,%d2 # restore d2
10439 mov.l %d2,-(%sp) # save d2
10441 mov.l %d1,%d2 # make a copy
10443 andi.w &0x8000,%d2 # keep old sign
10445 or.w %d2,%d1 # concat old sign,new exp
10447 mov.l (%sp)+,%d2 # restore d2
10486 mov.l %d2,-(%sp) # save d2
10488 mov.l %d1,%d2 # make a copy
10493 andi.w &0x8000,%d2 # keep old sign
10494 or.w %d2,%d1 # concat old sign,new exp
10496 mov.l (%sp)+,%d2 # restore d2
10563 mov.l %d2,-(%sp) # save d2
10565 mov.l %d1,%d2 # make a copy
10567 andi.w &0x8000,%d2 # keep old sign
10571 or.w %d2,%d1 # concat old sign,new exp
10573 mov.l (%sp)+,%d2 # restore d2
10786 mov.l %d2,-(%sp) # save d2
10788 mov.l %d1,%d2 # make a copy
10790 andi.w &0x8000,%d2 # keep old sign
10792 or.w %d2,%d1 # concat old sign,new exp
10794 mov.l (%sp)+,%d2 # restore d2
10839 mov.l %d2,-(%sp) # save d2
10841 mov.l %d1,%d2 # make a copy
10843 andi.w &0x8000,%d2 # keep old sign
10847 or.w %d2,%d1 # concat old sign,new exp
10849 mov.l (%sp)+,%d2 # restore d2
10896 mov.l %d2,-(%sp) # save d2
10898 mov.l %d1,%d2 # make a copy
10900 andi.w &0x8000,%d2 # keep old sign
10904 or.w %d2,%d1 # concat old sign, new exp
10906 mov.l (%sp)+,%d2 # restore d2
11109 mov.l %d2,-(%sp) # save d2
11116 mov.w (%sp),%d2 # fetch new sign, exp
11117 andi.l &0x7fff,%d2 # strip sign
11118 sub.l %d0,%d2 # add scale factor
11120 cmp.l %d2,(tbl_fadd_ovfl.b,%pc,%d1.w*4) # is it an overflow?
11123 cmp.l %d2,(tbl_fadd_unfl.b,%pc,%d1.w*4) # is it an underflow?
11130 or.w %d2,%d1 # concat sign,new exp
11135 mov.l (%sp)+,%d2 # restore d2
11167 mov.l (%sp)+,%d2 # restore d2
11178 subi.l &0x6000,%d2 # add extra bias
11179 andi.w &0x7fff,%d2
11180 or.w %d2,%d1 # concat sign,new exp
11230 mov.l (%sp)+,%d2 # restore d2
11251 mov.l %d1,%d2 # make a copy
11253 andi.w &0x8000,%d2 # keep old sign
11257 or.w %d2,%d1 # concat sign,new exp
11562 mov.l %d2,-(%sp) # save d2
11569 mov.w (%sp),%d2 # fetch new exponent
11570 andi.l &0x7fff,%d2 # strip sign
11571 sub.l %d0,%d2 # add scale factor
11573 cmp.l %d2,(tbl_fsub_ovfl.b,%pc,%d1.w*4) # is it an overflow?
11576 cmp.l %d2,(tbl_fsub_unfl.b,%pc,%d1.w*4) # is it an underflow?
11583 or.w %d2,%d1 # insert new exponent
11588 mov.l (%sp)+,%d2 # restore d2
11620 mov.l (%sp)+,%d2 # restore d2
11631 subi.l &0x6000,%d2 # subtract new bias
11632 andi.w &0x7fff,%d2 # clear top bit
11633 or.w %d2,%d1 # concat sign,exp
11683 mov.l (%sp)+,%d2 # restore d2
11704 mov.l %d1,%d2 # make a copy
11706 andi.w &0x8000,%d2 # keep old sign
11710 or.w %d2,%d1 # concat sgn,exp
12056 mov.l %d2,-(%sp) # save d2
12059 mov.l %d1,%d2 # make a copy
12062 andi.w &0x8000,%d2 # keep old sign
12063 or.w %d1,%d2 # concat old sign,new exp
12064 mov.w %d2,FP_SCR0_EX(%a6) # insert new exponent
12065 mov.l (%sp)+,%d2 # restore d2
12134 mov.l %d2,-(%sp) # save d2
12135 mov.l %d1,%d2 # make a copy
12137 andi.w &0x8000,%d2 # keep old sign
12141 or.w %d2,%d1 # concat new sign,new exp
12144 mov.l (%sp)+,%d2 # restore d2
12187 mov.l %d2,-(%sp) # save d2
12189 mov.l %d1,%d2 # make a copy
12191 andi.w &0x8000,%d2 # keep old sign
12195 or.w %d2,%d1 # concat sign,exp
12198 mov.l (%sp)+,%d2 # restore d2
12319 mov.l %d2,%d0
12404 mov.l %d0,%d2
12465 mov.w %d0,%d2
12526 mov.b %d0,%d2
13038 movm.l &0x3c00,-(%sp) # save d2-d5
13053 # (*) d2: digit count
13062 mov.l &EDIGITS,%d2 # # of nibbles (digits) in fraction part
13071 dbf.w %d2,e_gd # if we have used all 3 digits, exit loop
13095 # (*) d2: digit count
13122 mov.l &FNIBS,%d2 # reset number of digits per a0 ptr
13129 # If all the digits (8) in that long word have been converted (d2=0),
13131 # to initialize the digit offset, and set d2 to 7 for the digit count;
13135 dbf.w %d2,md2b # check for last digit in this lw
13183 # (*) d2: digit count
13216 mov.l &7,%d2 # init digit counter
13222 dbf.w %d2,ap_p_gd # get next digit
13224 mov.l %d1,%d0 # copy counter to d2
13240 mov.l &3,%d2 # init d2 to count bits in counter
13264 mov.l &7,%d2 # init digit counter
13270 dbf.w %d2,ap_n_gd # get next digit
13288 mov.l &3,%d2 # init d2 to count bits in counter
13307 # (*) d2: {FPCR[6:5],SM,SE} as index in RTABLE; temp
13344 bfextu %d3{&26:&2},%d2 # isolate rounding mode bits
13346 asl.l &2,%d2 # format d2 to be
13348 add.l %d0,%d2 # in d2 as index into RTABLE
13350 mov.b (%a1,%d2),%d0 # load new rounding bits from table
13416 movm.l (%sp)+,&0x3c # restore d2-d5
13553 # d2: upper 32-bits of mantissa for binstr
13572 movm.l &0x3f20,-(%sp) # {%d2-%d7/%a2}
13597 mov.l 8(%a0),%d2
13600 lsl.l &1,%d2
13614 mov.l %d2,8(%a0)
13633 # d2: x/x
13695 # d2: x/x/scratch
13767 # d2: x/0 or 24 for A9
13796 clr.w %d2 # set up d2 for very small case
13803 mov.l &24,%d2 # put 24 in d2 for A9
13858 # Check d2 for excess 10 exponential value. If not zero,
13861 # multiply by 10^(d2), which is now only allowed to be 24,
13870 # d2: 0 or 24/unchanged
13944 tst.w %d2 # test for small exp case
13958 # d2: x/x
13999 # d2: x/x/scratch
14067 # d2: x/x
14175 # d2: x/ms 32-bits of mant of abs(YINT)
14198 mov.l 4(%a0),%d2 # move 2nd word of FP_RES to d2
14210 lsr.l &1,%d2 # shift d2:d3 right, add 0s
14214 tst.l %d2 # check for mantissa of zero
14221 addx.l %d1,%d2 # continue inc
14248 # d2: x/ms 32-bits of exp fraction/scratch
14293 mov.l 4(%a2),%d2 # move word 2 to d2
14300 lsr.l &1,%d2 # shift d2:d3 right
14306 addx.l %d1,%d2 # continue inc
14328 # d2: x/x
14362 movm.l (%sp)+,&0x4fc # {%d2-%d7/%a2}
14417 # d2:d3 = 64-bit binary integer #
14438 # Copy the fraction in d2:d3 to d4:d5. #
14440 # A3. Multiply the fraction in d2:d3 by 8 using bit-field #
14441 # extracts and shifts. The three msbs from d2 will go into d1. #
14446 # A5. Add using the carry the 64-bit quantities in d2:d3 and d4:d5 #
14447 # into d2:d3. D1 will contain the bcd digit formed. #
14464 # d2: upper 32-bits of fraction for mul by 8
14483 # A2. Copy d2:d3 to d4:d5. Start loop.
14486 mov.l %d2,%d4 # copy the fraction before muls
14489 # A3. Multiply d2:d3 by 8; extract msbs into d1.
14491 bfextu %d2{&0:&3},%d1 # copy 3 msbs of d2 into d1
14492 asl.l &3,%d2 # shift d2 left by 3 places
14495 or.l %d6,%d2 # or in msbs from d3 into d2
14508 addx.l %d4,%d2 # add with extend upper 32 bits