Lines Matching refs:d0
33 | d0{31:29} contains the g,r,s bits (extended)
36 | a0 is preserved and the g-r-s bits in d0 are cleared.
52 tstl %d0 |if grs are zero, go force
84 movel #0xffffffff,%d0 |force g,r,s to be all f's
97 movel #0xffffffff,%d0 |force g,r,s to be all f's
117 asll #1,%d0 |shift g-bit to c-bit
127 | Output: d0{31:29}= guard, round, sticky
131 | only. All registers except d0 are kept intact. d0 becomes an
132 | updated guard,round,sticky in d0{31:29}
156 tstl %d0 |test original g,r,s
166 tstl %d0 |test word original g,r,s
172 movel %d3,%d0 |return grs to d0
200 tstl %d0 |test for rs = 0
222 tstl %d0 |test rs = 0
241 tstl %d0 |test for rs = 0
281 | exponent (d0) is set to 0 and the mantissa (d1 & d2) is not
305 movew LOCAL_EX(%a0),%d0
306 cmpw #64,%d0 |see if exp > 64
318 cmpw %d3,%d0 |of X>Y
326 lsll %d0,%d2 |shift ls mant by count
327 lsll %d0,%d1 |shift ms mant by count
329 subl %d0,%d5 |make op a denorm by shifting bits
333 movel #0,%d0 |same as if decremented exp to 0
335 movew %d0,LOCAL_EX(%a0)
344 cmpw %d3,%d0 |if X>Y
365 movel LOCAL_HI(%a0),%d0 |d0 has ms mant
368 lsll %d7,%d0 |shift first 1 to j bit position
376 orl %d1,%d0 |shift the ls mant bits into the ms mant
377 movel %d0,LOCAL_HI(%a0) |store ms mant into memory
386 movew LOCAL_EX(%a0),%d0 |d0 has exponent
388 subw #32,%d0 |account for ms mant being all zeros
390 subw %d7,%d0 |subtract shift count from exp
392 movew %d0,LOCAL_EX(%a0) |store ms mant
406 | d0: rounding precision
411 | d0 is guard,round,sticky
413 | d0 comes into this routine with the rounding precision. It
425 cmpib #0,%d0 |if 0 then extended precision
429 clrl %d0 |clear the sticky flag
436 cmpil #1,%d0 |if 1 then single precision
441 movel %d1,%d0 |copy d1 into d0
442 subw LOCAL_EX(%a0),%d0 |diff = threshold - exp
443 cmpw #67,%d0 |if diff > 67 (mant + grs bits)
446 clrl %d0 |else clear the sticky flag
454 movel %d1,%d0 |copy d1 into d0
455 subw LOCAL_EX(%a0),%d0 |diff = threshold - exp
456 cmpw #67,%d0 |if diff > 67 (mant + grs bits)
459 clrl %d0 |else clear the sticky flag
473 movel #0x20000000,%d0 |set sticky bit in return value
489 | d0{31:29} initial guard,round,sticky
493 | d0{31:29} final guard,round,sticky
507 movel #29,%d0
508 lsll %d0,%d2 |shift g,r,s to their positions
509 movel %d2,%d0
513 movel %d0,FP_SCR2+LOCAL_GRS(%a6)
514 movel %d1,%d0 |copy the denorm threshold
527 movel FP_SCR2+LOCAL_GRS(%a6),%d0 |restore original g,r,s
534 movew %d0,LOCAL_EX(%a0) |exponent = denorm threshold
535 movel #32,%d0
536 subw %d1,%d0 |d0 = 32 - d1
537 bfextu LOCAL_EX(%a0){%d0:#32},%d2
538 bfextu %d2{%d1:%d0},%d2 |d2 = new LOCAL_HI
539 bfextu LOCAL_HI(%a0){%d0:#32},%d1 |d1 = new LOCAL_LO
540 bfextu FP_SCR2+LOCAL_LO(%a6){%d0:#32},%d0 |d0 = new G,R,S
544 bftst %d0{#2:#30}
546 bsetl #rnd_stky_bit,%d0
553 orl #0x20000000,%d0 |set sticky bit in d0
555 andil #0xe0000000,%d0 |clear all but G,R,S
563 movew %d0,LOCAL_EX(%a0) |unsigned exponent = threshold
565 movel #32,%d0
566 subw %d1,%d0 |d0 = 32 - d1
567 bfextu LOCAL_EX(%a0){%d0:#32},%d2
568 bfextu %d2{%d1:%d0},%d2 |d2 = new LOCAL_LO
569 bfextu LOCAL_HI(%a0){%d0:#32},%d1 |d1 = new G,R,S
572 bftst FP_SCR2+LOCAL_LO(%a6){%d0:#32}
574 movel %d1,%d0
578 movel %d1,%d0
579 bsetl #rnd_stky_bit,%d0
588 orl #0x20000000,%d0 |set sticky bit in d0
590 andil #0xe0000000,%d0 |get rid of all but G,R,S
598 movew %d0,LOCAL_EX(%a0)
614 movel #0x20000000,%d0
619 movel LOCAL_HI(%a0),%d0
620 bfextu %d0{#2:#30},%d1
621 andil #0xc0000000,%d0
625 movel LOCAL_HI(%a0),%d0
626 bfextu %d0{#1:#31},%d1
627 andil #0x80000000,%d0
628 lsrl #1,%d0 |shift high bit into R bit
641 bsetl #rnd_stky_bit,%d0