s_copysign.S revision 1.3 
11.1Sjtc/*
21.3Sjtc * Written by J.T. Conklin <jtc@netbsd.org>.
31.3Sjtc * Public domain.
41.1Sjtc */
51.1Sjtc
61.1Sjtc#include <machine/asm.h>
71.1Sjtc
81.3SjtcRCSID("$Id: s_copysign.S,v 1.3 1995/04/28 22:43:54 jtc Exp $")
91.2Sjtc
101.1SjtcENTRY(copysign)
111.1Sjtc	movl	16(%esp),%edx
121.1Sjtc	andl	$0x80000000,%edx
131.1Sjtc	movl	8(%esp),%eax
141.1Sjtc	andl	$0x7fffffff,%eax
151.1Sjtc	orl	%edx,%eax
161.1Sjtc	movl	%eax,8(%esp)
171.1Sjtc	fldl	4(%esp)
181.1Sjtc	ret
19