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