/* $OpenBSD: s_scalbnf.S,v 1.4 2009/04/25 11:03:35 martynas Exp $ */ /* * Written by J.T. Conklin <jtc@NetBSD.org>. * Public domain. */ #include <machine/asm.h> #include "abi.h" .global ldexpf ldexpf = scalbnf ENTRY(scalbnf) movss %xmm0,-8(%rsp) movl %edi,-4(%rsp) fildl -4(%rsp) flds -8(%rsp) fscale fstp %st(1) /* bug fix for fp stack overflow */ fstps -8(%rsp) movss -8(%rsp),%xmm0 ret