glibc/sysdeps/libm-i387/s_ilogb.S

25 lines
333 B
ArmAsm

/*
* Written by J.T. Conklin <jtc@netbsd.org>.
* Public domain.
*/
#include <machine/asm.h>
RCSID("$NetBSD: s_ilogb.S,v 1.5 1995/10/12 15:53:09 jtc Exp $")
ENTRY(__ilogb)
pushl %ebp
movl %esp,%ebp
subl $4,%esp
fldl 8(%ebp)
fxtract
fstpl %st
fistpl -4(%ebp)
movl -4(%ebp),%eax
leave
ret
weak_alias (__ilogb, ilogb)