ifpsp060/src/pfpsp.S

2317 	mov.l		FP_SRC_HI(%a6),%d1	# fetch DENORM hi(man)
2320 	mov.l		%d1,FP_SRC_HI(%a6)	# insert new hi(man)
6447 	beq.b		norm_lo			# hi(man) is all zeroes!
6450 	lsl.l		%d2, %d0		# left shift hi(man)
6453 	or.l		%d3, %d0		# create hi(man)
6454 	lsl.l		%d2, %d1		# create lo(man)
6456 	mov.l		%d0, FTEMP_HI(%a0)	# store new hi(man)
6457 	mov.l		%d1, FTEMP_LO(%a0)	# store new lo(man)
6468 	lsl.l		%d2, %d1		# shift lo(man)
6471 	mov.l		%d1, FTEMP_HI(%a0)	# store hi(man)
6472 	clr.l		FTEMP_LO(%a0)		# lo(man) is now zero
6504 	bne.b		unnorm_shift		# hi(man) is not all zeroes
6507 # hi(man) is all zeroes so see if any bits in lo(man) are set
6547 	bfextu		FTEMP_HI(%a0){%d1:&32}, %d0 # extract new hi(man)
6548 	mov.l		%d0, FTEMP_HI(%a0)	# save new hi(man)
6550 	mov.l		FTEMP_LO(%a0), %d0	# fetch old lo(man)
6551 	lsl.l		%d1, %d0		# extract new lo(man)
6552 	mov.l		%d0, FTEMP_LO(%a0)	# save new lo(man)
6560 # only mantissa bits set are in lo(man)
6565 	mov.l		FTEMP_LO(%a0), %d0	# fetch old lo(man)
6566 	lsl.l		%d1, %d0		# left shift lo(man)
6568 	mov.l		%d0, FTEMP_HI(%a0)	# store new hi(man)
6569 	clr.l		FTEMP_LO(%a0)		# lo(man) = 0
7506 	mov.l		SRC_HI(%a0),FP_SCR0_HI(%a6) # copy hi(man)
7507 	mov.l		SRC_LO(%a0),FP_SCR0_LO(%a6) # copy lo(man)
7717 	mov.l		SRC_HI(%a0),FP_SCR0_HI(%a6) # copy hi(man)
7718 	mov.l		SRC_LO(%a0),FP_SCR0_LO(%a6) # copy lo(man)
11279 	mov.l		0x4(%sp),%d1		# extract hi(man)
11280 	cmpi.l		%d1,&0x80000000		# is hi(man) = 0x80000000?
11283 	tst.l		0x8(%sp)		# is lo(man) = 0x0?
11733 	cmpi.l		%d1,&0x80000000		# is hi(man) = 0x80000000?
11736 	tst.l		0x8(%sp)		# is lo(man) = 0x0?