Lines Matching +full:3 +full:d0
2 | bindec.sa 3.4 1/3/91
12 | value in memory; d0 contains the k-factor sign-extended
112 | d0: scratch; LEN input to binstr
154 .byte 3,3,2,2
155 .byte 3,2,2,3
156 .byte 2,3,3,2
177 movel %d0,%d7 |move k-factor to d7
179 movew STAG(%a6),%d0 |get stag
180 andiw #0xe000,%d0 |isolate stag bits
186 movew (%a0),%d0
187 andiw #0x7fff,%d0 |strip sign of normalized exp
191 subw #1,%d0
199 tstw %d0
203 andiw #0x7fff,%d0 |strip sign of normalized exp
204 movew %d0,(%a0)
224 | d0: k-factor/exponent
238 | F_SCR2:Abs(X)/Abs(X) with $3fff exponent
247 movew FP_SCR2(%a6),%d0 |move exp to d0
250 subw #0x3fff,%d0 |strip off bias
251 faddw %d0,%fp0 |add in exp
287 | d0: exponent/Unchanged
301 | F_SCR2:Abs(X) with $3fff exponent/Unchanged
344 | RZ 01 0 0 11/3 RP
345 | RZ 01 0 1 11/3 RP
348 | RM 10 0 0 11/3 RP
351 | RM 10 1 1 11/3 RP
353 | RP 11 0 1 11/3 RP
354 | RP 11 1 0 11/3 RP
359 | d0: exponent/scratch - final is 0
373 | F_SCR2:Abs(X) with $3fff exponent/Unchanged
384 movel %d6,%d0 |calc ILOG + 1 - LEN in d0
385 addql #1,%d0 |add the 1
386 subl %d4,%d0 |sub off LEN
390 tstl %d0 |test sign of ISCALE
393 cmpl #0xffffecd4,%d0 |test iscale <= -4908
395 addil #24,%d0 |add in 24 to iscale
398 negl %d0 |and take abs of ISCALE
404 lslw #1,%d1 |put them in bits 3:1
428 lsrl #1,%d0 |shift next bit into carry
433 tstl %d0 |test if ISCALE is zero
464 | d0: FPCR with RZ mode/Unchanged
478 | F_SCR2:Abs(X) with $3fff exponent/Unchanged
525 | d0: FPCR with RZ mode/FPSR with INEX2 isolated
540 fmovel %FPSR,%d0 |get FPSR
543 btstl #9,%d0 |check if INEX2 set
566 | d0: FPSR with AINEX cleared/FPCR with size set to ext
586 moveml %d0-%d1/%a0-%a1,-(%a7) |save regs used by sintd0
601 moveml (%a7)+,%d0-%d1/%a0-%a1 |restore regs used by sint
619 | d0: FPCR with size set to ext/scratch final = 0
645 movel %d4,%d0 |put LEN in d0
646 subql #1,%d0 |d0 = LEN -1
649 lsrl #1,%d0 |shift next bit into carry
654 tstl %d0 |test if LEN is zero
697 movel %d4,%d0 |put LEN in d0
700 lsrl #1,%d0 |shift next bit into carry
705 tstl %d0 |test if LEN is zero
727 | d0: x/LEN call to binstr - final is 0
753 movel 8(%a0),%d3 |move 3rd word of FP_RES to d3
755 clrl 8(%a0) |zero word 3 of FP_RES
756 movel (%a0),%d0 |move exponent to d0
757 swap %d0 |put exponent in lower word
759 subil #0x3ffd,%d0 |sub bias less 2 to make fract
760 tstl %d0 |check if > 1
762 negl %d0 |make exp positive
766 dbf %d0,m_loop |given in d0
778 movel %d4,%d0 |put LEN in d0 for binstr call
779 addql #3,%a0 |a0 points to M16 byte in result
800 | d0: x/LEN call to binstr - final is 0
848 movel 8(%a2),%d3 |move word 3 to d3
849 movew (%a2),%d0 |move exp to d0
851 subiw #0x3ffd,%d0 |subtract off bias
852 negw %d0 |make exp positive
856 dbf %d0,x_loop |given in d0
862 movel #4,%d0 |put 4 in d0 for binstr call
865 movel L_SCR1(%a6),%d0 |load L_SCR1 lword to d0
867 lsrl %d1,%d0 |shift d0 right by 12
868 bfins %d0,FP_SCR1(%a6){#4:#12} |put e3:e2:e1 in FP_SCR1
869 lsrl %d1,%d0 |shift d0 right by 12
870 bfins %d0,FP_SCR1(%a6){#16:#4} |put e4 in FP_SCR1
871 tstb %d0 |check if e4 is zero
881 | d0: x/scratch - final is x
900 clrl %d0 |clr d0 for collection of signs
904 moveql #2,%d0 |move 2 in to d0 for SM
908 addql #1,%d0 |set bit 0 in d0 for SE
910 bfins %d0,FP_SCR1(%a6){#0:#2} |insert SM and SE into FP_SCR1