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.8.6.1      yamt RCSID("$NetBSD: s_scalbnf.S,v 1.8.6.1 2014/05/22 11:36:56 yamt Exp $")
    1.1       jtc
    1.8  drochner #ifdef WEAK_ALIAS
    1.8  drochner WEAK_ALIAS(scalbnf,_scalbnf)
1.8.6.1      yamt WEAK_ALIAS(scalblnf,_scalblnf)
1.8.6.1      yamt WEAK_ALIAS(ldexpf,_scalbnf)
    1.8  drochner #endif
    1.8  drochner
    1.7  drochner #ifdef __x86_64__
1.8.6.1      yamt 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.8.6.1      yamt 	ret
1.8.6.1      yamt #elif defined(STRONG_ALIAS)
1.8.6.1      yamt STRONG_ALIAS(_scalbnf,_scalblnf)
1.8.6.1      yamt #endif
1.8.6.1      yamt
1.8.6.1      yamt ENTRY(_scalblnf)
1.8.6.1      yamt #ifdef __x86_64__
1.8.6.1      yamt 	movq %rdi,-16(%rsp)
1.8.6.1      yamt 	fildq -16(%rsp)
1.8.6.1      yamt 	movss %xmm0,-4(%rsp)
1.8.6.1      yamt 	flds -4(%rsp)
1.8.6.1      yamt 	fscale
1.8.6.1      yamt 	fstps -4(%rsp)
1.8.6.1      yamt 	movss -4(%rsp),%xmm0
1.8.6.1      yamt 	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