1 1.1 jtc /* 2 1.6 salo * 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.7 riastrad RCSID("$NetBSD: s_finitef.S,v 1.7 2024/05/08 01:04:03 riastradh Exp $") 9 1.1 jtc 10 1.7 riastrad WEAK_ALIAS(finitef, _finitef) 11 1.7 riastrad 12 1.7 riastrad ENTRY(_finitef) 13 1.5 fvdl #ifdef __i386__ 14 1.1 jtc movl 4(%esp),%eax 15 1.4 jtc andl $0x7f800000, %eax 16 1.4 jtc cmpl $0x7f800000, %eax 17 1.4 jtc setne %al 18 1.1 jtc andl $0x000000ff, %eax 19 1.5 fvdl #else 20 1.5 fvdl xorl %eax,%eax 21 1.5 fvdl movl $0x7ff00000,%esi 22 1.5 fvdl movss %xmm0,-4(%rsp) 23 1.5 fvdl andl -4(%rsp),%esi 24 1.5 fvdl cmpl $0x7ff00000,%esi 25 1.5 fvdl setne %al 26 1.5 fvdl #endif 27 1.1 jtc ret 28 1.7 riastrad END(_finitef) 29