Lines Matching refs:a6
321 movel #0x00000000,ADJK(%a6)
330 movel (%a0),X(%a6)
331 movel 4(%a0),X+4(%a6)
332 movel 8(%a0),X+8(%a6)
355 addl ADJK(%a6),%d0 | ...ADJUST K, ORIGINAL INPUT MAY BE DENORM.
360 movel #0x3FFF0000,X(%a6) | ...X IS NOW Y, I.E. 2^(-K)*X
361 movel XFRAC(%a6),FFRAC(%a6)
362 andil #0xFE000000,FFRAC(%a6) | ...FIRST 7 BITS OF Y
363 oril #0x01000000,FFRAC(%a6) | ...GET F: ATTACH A 1 AT THE EIGHTH BIT
364 movel FFRAC(%a6),%d0 | ...READY TO GET ADDRESS OF 1/F
371 fmovex X(%a6),%fp0
372 movel #0x3fff0000,F(%a6)
373 clrl F+8(%a6)
374 fsubx F(%a6),%fp0 | ...Y-F
385 fmovex %fp1,KLOG2(%a6) | ...PUT K*LOG2 IN MEMORY, FREE FP1
418 faddx KLOG2(%a6),%fp0 | ...FINAL ADD
441 fmovex %fp1,SAVEU(%a6) | ...STORE U IN MEMORY, FREE FP1
459 fmulx SAVEU(%a6),%fp0 | ...FP0 IS U*V
467 faddx SAVEU(%a6),%fp0