[thirdparty/glibc.git] / sysdeps / libm-i387 / s_ilogbl.S

/*
 * Written by J.T. Conklin <jtc@netbsd.org>.
 * Changes for long double by Ulrich Drepper <drepper@cygnus.com>
 * Public domain.
 */

#include <machine/asm.h>

RCSID("$NetBSD: $")

ENTRY(__ilogbl)
	pushl	%ebp
	movl	%esp,%ebp
	subl	$4,%esp

	fldt	8(%ebp)
	fxtract

	fistpl	-4(%ebp)
	movl	-4(%ebp),%eax

	leave
	ret
END (__ilogbl)
weak_alias (__ilogbl, ilogbl)
Commit	Line	Data
ee188d55 RM	1	/*
	2	* Written by J.T. Conklin <jtc@netbsd.org>.
	3	* Changes for long double by Ulrich Drepper <drepper@cygnus.com>
	4	* Public domain.
	5	*/
	6
	7	#include <machine/asm.h>
	8
	9	RCSID("$NetBSD: $")
	10
	11	ENTRY(__ilogbl)
	12	pushl %ebp
	13	movl %esp,%ebp
	14	subl $4,%esp
	15
	16	fldt 8(%ebp)
	17	fxtract
	18
	19	fistpl -4(%ebp)
	20	movl -4(%ebp),%eax
	21
	22	leave
	23	ret
d38cd08c	24	END (__ilogbl)
ee188d55	25	weak_alias (__ilogbl, ilogbl)