arch/i387/s_scalbnf.S

 1.1       jtc /*
 1.6      salo  * Written by J.T. Conklin <jtc (at) NetBSD.org>.
 1.2       jtc  * Public domain.
 1.1       jtc  */
 1.1       jtc
 1.1       jtc #include <machine/asm.h>
 1.1       jtc
1.12     joerg RCSID("$NetBSD: s_scalbnf.S,v 1.12 2013/04/27 18:36:41 joerg Exp $")
 1.1       jtc
 1.8  drochner #ifdef WEAK_ALIAS
 1.8  drochner WEAK_ALIAS(scalbnf,_scalbnf)
 1.9      matt WEAK_ALIAS(scalblnf,_scalblnf)
 1.8  drochner #endif
 1.8  drochner
 1.9      matt #ifdef __x86_64__
 1.8  drochner ENTRY(_scalbnf)
 1.7  drochner 	movl %edi,-8(%rsp)
 1.7  drochner 	fildl -8(%rsp)
 1.7  drochner 	movss %xmm0,-4(%rsp)
 1.7  drochner 	flds -4(%rsp)
 1.7  drochner 	fscale
 1.7  drochner 	fstps -4(%rsp)
 1.7  drochner 	movss -4(%rsp),%xmm0
 1.7  drochner 	fstp %st(0)
 1.9      matt 	ret
 1.9      matt #elif defined(STRONG_ALIAS)
1.11      matt STRONG_ALIAS(_scalbnf,_scalblnf)
 1.9      matt #endif
 1.9      matt
 1.9      matt ENTRY(_scalblnf)
 1.9      matt #ifdef __x86_64__
1.12     joerg 	movq %rdi,-16(%rsp)
 1.9      matt 	fildq -16(%rsp)
 1.9      matt 	movss %xmm0,-4(%rsp)
 1.9      matt 	flds -4(%rsp)
 1.9      matt 	fscale
 1.9      matt 	fstps -4(%rsp)
 1.9      matt 	movss -4(%rsp),%xmm0
 1.9      matt 	fstp %st(0)
 1.7  drochner #else
 1.7  drochner 	fildl 8(%esp)
 1.7  drochner 	flds 4(%esp)
 1.1       jtc 	fscale
 1.7  drochner 	fstp %st(1)		/* clean up stack */
 1.7  drochner #endif
 1.1       jtc 	ret