ifpsp060/src/fpsp.S

385 set EXC_OPWORD,		LV+0			# saved operation word
453 set aiop_bit,		7			# accrued inexact operation bit
481 set aiop_mask,		0x00000080		# accrued illegal operation
616 # default result should be for the operation. This default result is	#
674 	btst		&0x5,1+EXC_CMDREG(%a6)	# is operation monadic or dyadic?
715 # the operation has been emulated. the result is in fp0.
856 # default result should be for the operation. This default result is	#
962 # multiply operation is the smallest possible normalized number
965 # if our emulation, after re-doing the operation, decided that
995 # multiply operation is the smallest possible normalized number
998 # if our emulation, after re-doing the operation, decided that
1023 # multiply operation is the smallest possible normalized number
1260 # Opclass two w/ memory-to-fpn operation will have an incorrect extended
1282 	btst		&0x5,1+EXC_CMDREG(%a6)	# is operation monadic or dyadic?
1284 	cmpi.b		1+EXC_CMDREG(%a6),&0x3a	# is operation an ftst?
1426 # If the input operand to this operation was opclass two and a single
1827 	btst		&0x5,1+EXC_CMDREG(%a6)	# is operation monadic or dyadic?
1829 	cmpi.b		1+EXC_CMDREG(%a6),&0x3a	# is operation an ftst?
2423 # as a result of this operation emulation. A Trace exception can be	#
2480 	tst.w		%d0			# is operation fmovem?
2562 	btst		&0x5,1+EXC_CMDREG(%a6)	# is operation monadic or dyadic?
2564 	btst		&0x4,1+EXC_CMDREG(%a6)	# is operation fsincos,ftst,fcmp?
2580 # the operation is fsincos, ftst, or fcmp. only fcmp is dyadic
2582 	btst		&0x3,1+EXC_CMDREG(%a6)	# is operation fsincos?
2587 	btst		&0x1,1+EXC_CMDREG(%a6)	# is operation fcmp?
2623 # now, we save the result, unless, of course, the operation was ftst or fcmp.
3531 # the operation was "fmove.x SNAN,-(a7)" from supervisor mode.
3656 	btst		&0x5,1+EXC_CMDREG(%a6)	# is operation monadic or dyadic?
3659 	btst		&0x4,1+EXC_CMDREG(%a6)	# is operation an fsincos?
3686 # the operation has been emulated. the result is in fp0.
4355 # even though the operation size is byte, the stack ptr is decr by 2.
5309 # here, the operation may underflow iff the precision is sgl or dbl.
6623 #	5. (|X| > 1) Generate an invalid operation by 0 * infinity.	#
6724 #	5. (|X| > 1) Generate an invalid operation by 0 * infinity.	#
8700 #	5. (|X| > 1) Generate an invalid operation by 0 * infinity.	#
8774 #       Step 0.	If X < 0, create a NaN and raise the invalid operation	#
8788 #       Step 0. If X < 0, create a NaN and raise the invalid operation	#
8801 #       Step 0. If X < 0, create a NaN and raise the invalid operation	#
8815 #       Step 0. If X < 0, create a NaN and raise the invalid operation	#
10342 #	- the last operation of a transcendental emulation	#
11403 # math operation relative to the address of this table. Included are
11406 # operation longword.
11616 # - the result of the multiply operation will neither overflow nor underflow.
11651 # - the result of the multiply operation is an overflow.
11656 # extended precision. if the original operation was extended, then we have this
11657 # result. if the original operation was single or double, we have to do another
11659 # of this operation then has its exponent scaled by -0x6000 to create the
11735 # - the result of the multiply operation MAY overflow.
11762 # - the result of the multiply operation is an underflow.
11767 # extended precision. if the original operation was extended, then we have this
11768 # result. if the original operation was single or double, we have to do another
11770 # of this operation then has its exponent scaled by -0x6000 to create the
11872 # a normalized number that rounded down to a 2. so, redo the entire operation
12617 # the divide operation MAY underflow:
12641 # operation using RZ as the rounding mode to see what the pre-rounded
13208 #	res_{s,q}nan_1op() - set NAN result for monadic operation	#
13314 #	res_{s,q}nan_1op() - set NAN result for monadic operation	#
13422 #	res_{s,q}nan_1op() - set NAN result for monadic operation	#
14167 # a normalized number that rounded down to a 2. so, redo the entire operation
14480 # the divide operation MAY underflow:
14504 # operation using RZ as the rounding mode to see what the pre-rounded
16016 #		      fsqrt operation won't take an exception.		#
16157 #	If either operand (but not both operands) of an operation is a	#
16161 #	If either operand to an operation is a signalling NAN (SNAN),	#
16166 # SNAN bit in the operand to one), and the operation continues as	#
18068 	bne.b		fscc_mem_op		# it's a memory operation
18235 # if the bit string is a zero, then the operation is a no-op
18264 # the operation was unfortunately an: fmovm.x dn,-(sp)
18434 # table indexed by the operation's bit string that gives the number
21982 # last operation done was an "and" of the bits shifted off so the condition
23012 #	Note: this operation can never overflow.			#
23018 #	Note: this operation can never overflow.			#
23490 #		The operation in A3 above may have set INEX2.		#
23515 #		The operation in A3 above may have set INEX2.		#
23516 #		RZ mode is forced for the scaling operation to insure	#
23531 #		Perform FINT operation in the user's rounding mode.	#
23539 #		If the int operation results in more than LEN digits,	#
23711 #     The operation in A3 above may have set INEX2.
23884 #     The operation in A3 above may have set INEX2.
23885 #     RZ mode is forced for the scaling operation to insure
24022 #      Perform FINT operation in the user's rounding mode.  Keep
24094 #      If the int operation results in more than LEN digits,