1*45761Sbostic/*- 2*45761Sbostic * Copyright (c) 1985 The Regents of the University of California. 3*45761Sbostic * All rights reserved. 4*45761Sbostic * 5*45761Sbostic * This code is derived from software contributed to Berkeley by 6*45761Sbostic * Computer Consoles Inc. 7*45761Sbostic * 8*45761Sbostic * %sccs.include.redist.c% 9*45761Sbostic * 10*45761Sbostic * @(#)Kfp_exp.s 7.1 (Berkeley) 12/06/90 11*45761Sbostic */ 1224130Ssam 1345701Sbostic#include "../math/fp.h" 1445701Sbostic#include "../math/Kfp.h" 1525693Ssam#include "../tahoe/SYS.h" 1625664Ssam 1725664SsamENTRY(Kfpover, 0) 1824130Ssam movl $HUGE0,r0 1924130Ssam movl $HUGE1,r1 2024130Ssam ret 2124130Ssam 2225664SsamENTRY(Kfpunder, 0) 2324130Ssam clrl r0 2424130Ssam clrl r1 2524130Ssam ret 2624130Ssam 2725664SsamENTRY(Kfpzdiv, 0) 2825664Ssam divl2 $0,r1 # force division by zero. 2924130Ssam ret 30