1/* Ksfp_exp.s 1.2 86/01/03 */ 2 3#include "fp.h" 4#include "Kfp.h" 5#include "SYS.h" 6 7ENTRY(Ksfpover, 0) 8 movl $HUGE0,r0 9 movl $HUGE1,r1 10 ret 11 12ENTRY(Ksfpunder, 0) 13 clrl r0 14 clrl r1 15 ret 16 17ENTRY(Ksfpzdiv, 0) 18 divl2 $0,r1 # force divission by zero. 19 ret 20