Update.
[glibc.git] / sysdeps / libm-i387 / s_finite.S
blob7c67e1906fee1d143c53309bd3c43d9f43cac82b
1 /*
2  * Written by J.T. Conklin <jtc@netbsd.org>.
3  * Public domain.
4  */
6 #include <machine/asm.h>
8 RCSID("$NetBSD: s_finite.S,v 1.4 1995/05/08 23:57:41 jtc Exp $")
10 ENTRY(__finite)
11         movl    8(%esp),%eax
12         andl    $0x7ff00000, %eax
13         cmpl    $0x7ff00000, %eax
14         setne   %al
15         andl    $0x000000ff, %eax
16         ret
17 END (__finite)
18 weak_alias (__finite, finite)