1/*- 2 * Copyright (c) 1985 The Regents of the University of California. 3 * All rights reserved. 4 * 5 * This code is derived from software contributed to Berkeley by 6 * Computer Consoles Inc. 7 * 8 * %sccs.include.redist.c% 9 * 10 * @(#)Ksfp_exp.s 7.1 (Berkeley) 12/06/90 11 */ 12 13#include "../math/fp.h" 14#include "../math/Kfp.h" 15#include "../tahoe/SYS.h" 16 17ENTRY(Ksfpover, 0) 18 movl $HUGE0,r0 19 movl $HUGE1,r1 20 ret 21 22ENTRY(Ksfpunder, 0) 23 clrl r0 24 clrl r1 25 ret 26 27ENTRY(Ksfpzdiv, 0) 28 divl2 $0,r1 # force divission by zero. 29 ret 30