1 /* 2 * Written by J.T. Conklin <jtc (at) netbsd.org>. 3 * Public domain. 4 */ 5 6 #include <machine/asm.h> 7 8 RCSID("$Id: s_log1pf.S,v 1.3 1995/04/28 22:44:11 jtc Exp $") 9 10 /* 11 * Since the fyl2xp1 instruction has such a limited range: 12 * -(1 - (sqrt(2) / 2)) <= x <= sqrt(2) - 1 13 * it's not worth trying to use it. 14 */ 15 16 ENTRY(log1pf) 17 fldln2 18 flds 4(%esp) 19 fld1 20 faddp 21 fyl2x 22 ret 23