Motorola DSP96002 - Manual (Page 693)

B-174 DSP96002 USER’S MANUAL MOTOROLA
move #EXP_MSK,d1.l ;
and d1,d0 ;
tst d0 ;
jne _ebias2 ;
inc d0 ;
_ebias2 move #EBIAS,d1.l ;
sub d1,d0 ;
move d0.l,d1.m ;
; ****** Extract Mantissas ******
move #0,d6.h ;
move #0,d7.h ;
; ****** Normalize any Denorms ******
jset #31,d6.m,_nrmop2 ;
move d6.m,d0.l ;
tst d0 ;
jneq _op1nrm ;
move d1.m,d0.l ;
move #32,d1.l ;
sub d1,d0 ;
move d0.l,d1.m ;
move d6.l,d6.m ;
move #0,d6.l ;
jset #31,d6.m,_nrmop2 ;
_op1nrm ; normalize
asl d6 d6.m,d0.l ;
rol d0 ;
move d0.l,d6.m ;
move d1.m,d0.l ;
dec d0 ;
move d0.l,d1.m ;
jclr #31,d6.m,_op1nrm ;
_nrmop2 jset #31,d7.m,_domul ;
move d7.m,d0.l ;
tst d0 ;
jneq _op2nrm ;
move d0.m,d0.l ;
move #32,d1.l ;
sub d1,d0 ;
move d0.l,d0.m ;
move d7.l,d7.m ;
move #0,d7.l ;
jset #31,d7.m,_domul ;
_op2nrm ; normalize operand 2
asl d7 d7.m,d0.l ;
rol d0 ;