s_finitef.S revision 1.5 1 1.1 jtc /*
2 1.2 jtc * Written by J.T. Conklin <jtc (at) netbsd.org>.
3 1.2 jtc * Public domain.
4 1.1 jtc */
5 1.1 jtc
6 1.1 jtc #include <machine/asm.h>
7 1.1 jtc
8 1.5 fvdl RCSID("$NetBSD: s_finitef.S,v 1.5 2001/06/19 00:26:30 fvdl Exp $")
9 1.1 jtc
10 1.1 jtc ENTRY(finitef)
11 1.5 fvdl #ifdef __i386__
12 1.1 jtc movl 4(%esp),%eax
13 1.4 jtc andl $0x7f800000, %eax
14 1.4 jtc cmpl $0x7f800000, %eax
15 1.4 jtc setne %al
16 1.1 jtc andl $0x000000ff, %eax
17 1.5 fvdl #else
18 1.5 fvdl xorl %eax,%eax
19 1.5 fvdl movl $0x7ff00000,%esi
20 1.5 fvdl movss %xmm0,-4(%rsp)
21 1.5 fvdl andl -4(%rsp),%esi
22 1.5 fvdl cmpl $0x7ff00000,%esi
23 1.5 fvdl setne %al
24 1.5 fvdl #endif
25 1.1 jtc ret
26