]> git.ipfire.org Git - thirdparty/glibc.git/blob - sysdeps/libm-i387/s_rintl.S
update from main archive 961005
[thirdparty/glibc.git] / sysdeps / libm-i387 / s_rintl.S
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 */
6
7 #include <machine/asm.h>
8
9 RCSID("$NetBSD: $")
10
11 ENTRY(__rintl)
12 fldt 4(%esp)
13 frndint
14 ret
15 PSEUDO_END (__rintl)
16 weak_alias (__rintl, rintl)