1*42218Sbostic/*- 2*42218Sbostic * Copyright (c) 1990 The Regents of the University of California. 3*42218Sbostic * All rights reserved. 4*42218Sbostic * 5*42218Sbostic * This code is derived from software contributed to Berkeley by 6*42218Sbostic * the Systems Programming Group of the University of Utah Computer 7*42218Sbostic * Science Department. 8*42218Sbostic * 9*42218Sbostic * %sccs.include.redist.c% 10*42218Sbostic * 11*42218Sbostic * @(#)exp.s 5.1 (Berkeley) 05/17/90 12*42218Sbostic */ 13*42218Sbostic 14*42218Sbostic/* exp(x) */ 15*42218Sbostic 16*42218Sbostic .text 17*42218Sbostic .globl _exp 18*42218Sbostic 19*42218Sbostic_exp: 20*42218Sbostic fetoxd sp@(4),fp0 21*42218Sbostic fmoved fp0,sp@- 22*42218Sbostic movel sp@+,d0 23*42218Sbostic movel sp@+,d1 24*42218Sbostic rts 25