[unix-history] / usr / src / sys / tahoe / math / Kfp_exp.s

/*	Kfp_exp.s	1.3	86/01/05	*/

#include "../tahoemath/fp.h"
#include "../tahoemath/Kfp.h"
#include "../tahoe/SYS.h"

ENTRY(Kfpover, 0)
	movl	$HUGE0,r0
	movl	$HUGE1,r1
	ret

ENTRY(Kfpunder, 0)
	clrl	r0
	clrl	r1
	ret

ENTRY(Kfpzdiv, 0)
	divl2	$0,r1		# force division by zero.
	ret
Commit	Line	Data
9d1834ba	1	/* Kfp_exp.s 1.3 86/01/05 */
552a62dd	2
9d1834ba SL	3	#include "../tahoemath/fp.h"
	4	#include "../tahoemath/Kfp.h"
	5	#include "../tahoe/SYS.h"
2b252132 SL	6
2b252132 SL	7	ENTRY(Kfpover, 0)
552a62dd SL	8	movl $HUGE0,r0
	9	movl $HUGE1,r1
	10	ret
	11
2b252132	12	ENTRY(Kfpunder, 0)
552a62dd SL	13	clrl r0
	14	clrl r1
	15	ret
	16
2b252132 SL	17	ENTRY(Kfpzdiv, 0)
2b252132 SL	18	divl2 $0,r1 # force division by zero.
552a62dd	19	ret