(M68*:*:R3V[567]*:*): Use uppercase 'M'.
[glibc.git] / sysdeps / libm-i387 / s_finitef.S
blobee26c875a51b4678c28a6717fea226b764d16a9b
1 /*
2  * Written by J.T. Conklin <jtc@netbsd.org>.
3  * Public domain.
4  */
6 #include <machine/asm.h>
8 RCSID("$NetBSD: s_finitef.S,v 1.3 1995/05/09 00:00:02 jtc Exp $")
10 ENTRY(__finitef)
11         movl    4(%esp),%eax
12         andl    $0x7f800000, %eax
13         cmpl    $0x7f800000, %eax
14         setne   %al
15         andl    $0x000000ff, %eax
16         ret
17 END (__finitef)
18 weak_alias (__finitef, finitef)