update from main archive 961229
[glibc.git] / sysdeps / libm-i387 / s_logbl.S
blob6ce274c57c76f4b541dac8975e35483984f01ef1
1 /*
2  * Written by J.T. Conklin <jtc@netbsd.org>.
3  * Changes for long double by Ulrich Drepper <drepper@cygnus.com>
4  * Public domain.
5  */
7 #include <machine/asm.h>
9 RCSID("$NetBSD: $")
11 ENTRY(__logbl)
12         fldt    4(%esp)
13         fxtract
14         ret
15 END (__logbl)
16 weak_alias (__logbl, logbl)