1 1.1 jtc /* 2 1.6 salo * Written by J.T. Conklin <jtc (at) NetBSD.org>. 3 1.2 jtc * Public domain. 4 1.1 jtc */ 5 1.1 jtc 6 1.1 jtc #include <machine/asm.h> 7 1.1 jtc 8 1.8 drochner RCSID("$NetBSD: s_scalbnf.S,v 1.8 2010/04/23 19:17:07 drochner Exp $") 9 1.1 jtc 10 1.8 drochner #ifdef WEAK_ALIAS 11 1.8 drochner WEAK_ALIAS(scalbnf,_scalbnf) 12 1.8 drochner #endif 13 1.8 drochner 14 1.8 drochner ENTRY(_scalbnf) 15 1.7 drochner #ifdef __x86_64__ 16 1.7 drochner movl %edi,-8(%rsp) 17 1.7 drochner fildl -8(%rsp) 18 1.7 drochner movss %xmm0,-4(%rsp) 19 1.7 drochner flds -4(%rsp) 20 1.7 drochner fscale 21 1.7 drochner fstps -4(%rsp) 22 1.7 drochner movss -4(%rsp),%xmm0 23 1.7 drochner fstp %st(0) 24 1.7 drochner #else 25 1.7 drochner fildl 8(%esp) 26 1.7 drochner flds 4(%esp) 27 1.1 jtc fscale 28 1.7 drochner fstp %st(1) /* clean up stack */ 29 1.7 drochner #endif 30 1.1 jtc ret 31