glibc/sysdeps/libm-i387/s_finitel.S

20 lines
339 B
ArmAsm

/*
* Written by J.T. Conklin <jtc@netbsd.org>.
* Public domain.
*
* Adapted for `long double' by Ulrich Drepper <drepper@cygnus.com>.
*/
#include <machine/asm.h>
RCSID("$NetBSD: $")
ENTRY(__finitel)
movl 12(%esp),%eax
andl $0x7fff, %eax
cmpl $0x7fff, %eax
setne %al
andl $0x000000ff, %eax
ret
weak_alias (__finitel, finitel)