/*
 * Written by J.T. Conklin <jtc@NetBSD.org>.
 * Public domain.
 */

#include <machine/asm.h>

RCSID("$NetBSD: s_finitef.S,v 1.7 2024/05/08 01:04:03 riastradh Exp $")

WEAK_ALIAS(finitef, _finitef)

ENTRY(_finitef)
#ifdef __i386__
        movl    4(%esp),%eax
        andl    $0x7f800000, %eax
        cmpl    $0x7f800000, %eax
        setne   %al
        andl    $0x000000ff, %eax
#else
        xorl    %eax,%eax
        movl    $0x7ff00000,%esi
        movss   %xmm0,-4(%rsp)
        andl    -4(%rsp),%esi
        cmpl    $0x7ff00000,%esi
        setne   %al
#endif
        ret
END(_finitef)