minix/lib/libm/arch/i387/s_floor.S

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

#include <machine/asm.h>

RCSID("$NetBSD: s_floor.S,v 1.9 2011/06/18 21:24:51 joerg Exp $")

ENTRY(floor)
#ifdef __i386__
	pushl	%ebp
	movl	%esp,%ebp
	subl	$8,%esp

	fstcw	-4(%ebp)		/* store fpu control word */
	movw	-4(%ebp),%dx
	orw	$0x0400,%dx		/* round towards -oo */
	andw	$0xf7ff,%dx
	movw	%dx,-8(%ebp)
	fldcw	-8(%ebp)		/* load modfied control word */

	fldl	8(%ebp)			/* round */
	frndint

	fldcw	-4(%ebp)		/* restore original control word */

	leave
#else
	movsd	%xmm0, -8(%rsp)
	fstcw	-12(%rsp)
	movw	-12(%rsp),%dx
	orw	$0x0400,%dx
	andw	$0xf7ff,%dx
	movw	%dx,-16(%rsp)
	fldcw	-16(%rsp)
	fldl	-8(%rsp)
	frndint
	fldcw	-12(%rsp)
	fstpl	-8(%rsp)
	movsd	-8(%rsp),%xmm0
#endif
	ret
Import unmodified NetBSD's libm for compiling with new libc. As the current libc includes a libm implementation, with the new libc this is needed. Unneeded (for the moment) archs have been removed. 2011-03-18 16:52:16 +01:00			`/*`
			`* Written by J.T. Conklin <jtc@NetBSD.org>.`
			`* Public domain.`
			`*/`

			`#include <machine/asm.h>`

Synchronize on NetBSD-CVS (2013/12/1 12:00:00 UTC) - Fix for possible unset uid/gid in toproto - Fix for default mtree style - Update libelf - Importing libexecinfo - Resynchronize GCC, mpc, gmp, mpfr - build.sh: Replace params with show-params. This has been done as the make target has been renamed in the same way, while a new target named params has been added. This new target generates a file containing all the parameters, instead of printing it on the console. - Update test48 with new etc/services (Fix by Ben Gras <ben@minix3.org) get getservbyport() out of the inner loop Change-Id: Ie6ad5226fa2621ff9f0dee8782ea48f9443d2091 2013-12-06 12:04:52 +01:00			`RCSID("$NetBSD: s_floor.S,v 1.9 2011/06/18 21:24:51 joerg Exp $")`
Import unmodified NetBSD's libm for compiling with new libc. As the current libc includes a libm implementation, with the new libc this is needed. Unneeded (for the moment) archs have been removed. 2011-03-18 16:52:16 +01:00
			`ENTRY(floor)`
			`#ifdef __i386__`
			`pushl %ebp`
			`movl %esp,%ebp`
			`subl $8,%esp`

			`fstcw -4(%ebp) /* store fpu control word */`
			`movw -4(%ebp),%dx`
			`orw $0x0400,%dx /* round towards -oo */`
			`andw $0xf7ff,%dx`
			`movw %dx,-8(%ebp)`
			`fldcw -8(%ebp) /* load modfied control word */`

Synchronize on NetBSD-CVS (2013/12/1 12:00:00 UTC) - Fix for possible unset uid/gid in toproto - Fix for default mtree style - Update libelf - Importing libexecinfo - Resynchronize GCC, mpc, gmp, mpfr - build.sh: Replace params with show-params. This has been done as the make target has been renamed in the same way, while a new target named params has been added. This new target generates a file containing all the parameters, instead of printing it on the console. - Update test48 with new etc/services (Fix by Ben Gras <ben@minix3.org) get getservbyport() out of the inner loop Change-Id: Ie6ad5226fa2621ff9f0dee8782ea48f9443d2091 2013-12-06 12:04:52 +01:00			`fldl 8(%ebp) /* round */`
Import unmodified NetBSD's libm for compiling with new libc. As the current libc includes a libm implementation, with the new libc this is needed. Unneeded (for the moment) archs have been removed. 2011-03-18 16:52:16 +01:00			`frndint`

			`fldcw -4(%ebp) /* restore original control word */`

			`leave`
			`#else`
			`movsd %xmm0, -8(%rsp)`
			`fstcw -12(%rsp)`
			`movw -12(%rsp),%dx`
			`orw $0x0400,%dx`
			`andw $0xf7ff,%dx`
			`movw %dx,-16(%rsp)`
			`fldcw -16(%rsp)`
			`fldl -8(%rsp)`
			`frndint`
			`fldcw -12(%rsp)`
			`fstpl -8(%rsp)`
			`movsd -8(%rsp),%xmm0`
			`#endif`
			`ret`