1/* $OpenBSD: s_scalbnf.S,v 1.4 2009/04/25 11:03:35 martynas Exp $ */ 2/* 3 * Written by J.T. Conklin <jtc@NetBSD.org>. 4 * Public domain. 5 */ 6 7#include <machine/asm.h> 8 9#include "abi.h" 10 11.global ldexpf 12 ldexpf = scalbnf 13 14ENTRY(scalbnf) 15 movss %xmm0,-8(%rsp) 16 movl %edi,-4(%rsp) 17 fildl -4(%rsp) 18 flds -8(%rsp) 19 fscale 20 fstp %st(1) /* bug fix for fp stack overflow */ 21 fstps -8(%rsp) 22 movss -8(%rsp),%xmm0 23 ret 24END(scalbnf) 25 26 .section .note.GNU-stack,"",%progbits 27