ifpsp060/src/pfpsp.S

366 set L_SCR3,		LV+28			# integer scratch 3
367 set L_SCR2,		LV+24			# integer scratch 2
368 set L_SCR1,		LV+20			# integer scratch 1
3156 # operand and save the appropriate minimum or maximum integer value
3195 	short		foperr_out_l - tbl_operr # long word integer
3199 	short		foperr_out_w - tbl_operr # word integer
3201 	short		foperr_out_b - tbl_operr # byte integer
3354 # operand and save the appropriate minimum or maximum integer value
3365 	short		fsnan_out_l - tbl_snan # long word integer
3369 	short		fsnan_out_w - tbl_snan # word integer
3371 	short		fsnan_out_b - tbl_snan # byte integer
3619 # longword integer directly into the upper longword of the mantissa along
3626 	fmov.l		FP_SRC_HI(%a6),%fp0	# load integer src
3627 	fmov.x		%fp0,FP_SRC(%a6)	# store integer as extended precision
7140 	beq.b		fout_byte_dn		# must save to integer regfile
7186 	beq.b		fout_word_dn		# must save to integer regfile
7233 	beq.b		fout_long_dn		# must save to integer regfile
7374 	beq.b		fout_sgl_exg_write_dn	# must save to integer regfile
7421 	beq.b		fout_sgl_unfl_dn	# must save to integer regfile
7471 	beq.b		fout_sgl_ovfl_dn	# must save to integer regfile
7750 #	get rid of ext integer bit					#
7815 #	get rid of ext integer bit					#
12970 #	for the mantissa which is to be interpreted as 17 integer	#
12971 #	digits, rather than 1 integer and 16 fraction digits.		#
12987 #	SM = 0	a non-zero digit in the integer position		#
13045 #  4. Subtract 16 to compensate for interpreting the mant as all integer digits.
13110 #  get the integer digit then skip down & get the rest of the
13113 	bfextu		(%a0){&28:&4},%d0	# integer part is ls digit in long word
13467 #		of decimal places needed to insure LEN integer digits	#
13737 #     of decimal places needed to insure LEN integer digits
14414 # binstr(): Converts a 64-bit binary integer to bcd.			#
14417 #	d2:d3 = 64-bit binary integer					#
14424 #	a0 = pointer to LEN bcd digits representing the 64-bit integer.	#