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.6.6.1 tron RCSID("$NetBSD: s_scalbnf.S,v 1.6.6.1 2006/04/04 21:33:38 tron Exp $") 9 1.1 jtc 10 1.1 jtc ENTRY(scalbnf) 11 1.6.6.1 tron #ifdef __x86_64__ 12 1.6.6.1 tron movl %edi,-8(%rsp) 13 1.6.6.1 tron fildl -8(%rsp) 14 1.6.6.1 tron movss %xmm0,-4(%rsp) 15 1.6.6.1 tron flds -4(%rsp) 16 1.6.6.1 tron fscale 17 1.6.6.1 tron fstps -4(%rsp) 18 1.6.6.1 tron movss -4(%rsp),%xmm0 19 1.6.6.1 tron fstp %st(0) 20 1.6.6.1 tron #else 21 1.6.6.1 tron fildl 8(%esp) 22 1.6.6.1 tron flds 4(%esp) 23 1.1 jtc fscale 24 1.6.6.1 tron fstp %st(1) /* clean up stack */ 25 1.6.6.1 tron #endif 26 1.1 jtc ret 27