NetBSD/lib/libm/arch/i387/s_copysign.S

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

/*
 * XXXfvdl might as well split this file.
 */

#include <machine/asm.h>

RCSID("$NetBSD: s_copysign.S,v 1.7 2011/06/18 20:49:26 joerg Exp $")

#ifdef __x86_64__
.Lpos:
	.quad	0x8000000000000000
.Lneg:
	.quad	0x7fffffffffffffff
#endif


ENTRY(copysign)
#ifdef __i386__
	movl	16(%esp),%edx
	andl	$0x80000000,%edx
	movl	8(%esp),%eax
	andl	$0x7fffffff,%eax
	orl	%edx,%eax
	movl	%eax,8(%esp)
	fldl	4(%esp)
#else
	movq	.Lpos(%rip),%xmm2
	movq	.Lneg(%rip),%xmm3
	pand	%xmm2,%xmm1
	pand	%xmm3,%xmm0
	por	%xmm1,%xmm0
#endif
	ret
More i387 math support, too bad we can't enable it 1994-02-12 04:31:52 +03:00			`/*`
netbsd.org->NetBSD.org 2003-07-26 23:24:24 +04:00			`* Written by J.T. Conklin <jtc@NetBSD.org>.`
Winning Strategies has placed this code into the Public Domain 1995-04-29 02:43:31 +04:00			`* Public domain.`
More i387 math support, too bad we can't enable it 1994-02-12 04:31:52 +03:00			`*/`

Modify the i387 code so that it can be shared between the i386 port and the x86_64 port. XXX some files should be distinct. 2001-06-19 04:26:29 +04:00			`/*`
			`* XXXfvdl might as well split this file.`
			`*/`

More i387 math support, too bad we can't enable it 1994-02-12 04:31:52 +03:00			`#include <machine/asm.h>`

Switch to SSE code, since our gas supports it now. 2011-06-19 00:49:26 +04:00			`RCSID("$NetBSD: s_copysign.S,v 1.7 2011/06/18 20:49:26 joerg Exp $")`
Modify the i387 code so that it can be shared between the i386 port and the x86_64 port. XXX some files should be distinct. 2001-06-19 04:26:29 +04:00
			`#ifdef __x86_64__`
			`.Lpos:`
			`.quad 0x8000000000000000`
			`.Lneg:`
			`.quad 0x7fffffffffffffff`
			`#endif`

Added RCS ID's. ID's use new RCSID macro from <machine/asm.h>. 1994-03-12 04:30:22 +03:00
More i387 math support, too bad we can't enable it 1994-02-12 04:31:52 +03:00			`ENTRY(copysign)`
Modify the i387 code so that it can be shared between the i386 port and the x86_64 port. XXX some files should be distinct. 2001-06-19 04:26:29 +04:00			`#ifdef __i386__`
More i387 math support, too bad we can't enable it 1994-02-12 04:31:52 +03:00			`movl 16(%esp),%edx`
			`andl $0x80000000,%edx`
			`movl 8(%esp),%eax`
			`andl $0x7fffffff,%eax`
			`orl %edx,%eax`
			`movl %eax,8(%esp)`
			`fldl 4(%esp)`
Modify the i387 code so that it can be shared between the i386 port and the x86_64 port. XXX some files should be distinct. 2001-06-19 04:26:29 +04:00			`#else`
			`movq .Lpos(%rip),%xmm2`
			`movq .Lneg(%rip),%xmm3`
			`pand %xmm2,%xmm1`
			`pand %xmm3,%xmm0`
			`por %xmm1,%xmm0`
			`#endif`
More i387 math support, too bad we can't enable it 1994-02-12 04:31:52 +03:00			`ret`