1 1.1 jtc /* 2 1.7 salo * Written by J.T. Conklin <jtc (at) NetBSD.org>. 3 1.3 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.9 drochner RCSID("$NetBSD: s_scalbn.S,v 1.9 2010/04/23 19:17:07 drochner Exp $") 9 1.2 jtc 10 1.9 drochner #ifdef WEAK_ALIAS 11 1.9 drochner WEAK_ALIAS(scalbn,_scalbn) 12 1.9 drochner #endif 13 1.9 drochner 14 1.9 drochner ENTRY(_scalbn) 15 1.8 drochner #ifdef __x86_64__ 16 1.8 drochner movl %edi,-12(%rsp) 17 1.8 drochner fildl -12(%rsp) 18 1.8 drochner movsd %xmm0,-8(%rsp) 19 1.8 drochner fldl -8(%rsp) 20 1.8 drochner fscale 21 1.8 drochner fstpl -8(%rsp) 22 1.8 drochner movsd -8(%rsp),%xmm0 23 1.8 drochner fstp %st(0) 24 1.8 drochner #else 25 1.8 drochner fildl 12(%esp) 26 1.8 drochner fldl 4(%esp) 27 1.1 jtc fscale 28 1.8 drochner fstp %st(1) /* clean up stack */ 29 1.8 drochner #endif 30 1.1 jtc ret 31