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