1/** 2 * This file has no copyright assigned and is placed in the Public Domain. 3 * This file is part of the mingw-w64 runtime package. 4 * No warranty is given; refer to the file DISCLAIMER.PD within this package. 5 */ 6#include <_mingw_mac.h> 7 8 .file "scalbnf.S" 9 .text 10#ifdef __x86_64__ 11 .align 8 12#else 13 .align 4 14#endif 15.globl __MINGW_USYMBOL(scalbnf) 16 .def __MINGW_USYMBOL(scalbnf); .scl 2; .type 32; .endef 17__MINGW_USYMBOL(scalbnf): 18#ifdef __x86_64__ 19 subq $24, %rsp 20 movq %rdx,(%rsp) 21 fildl (%rsp) 22 movss %xmm0,(%rsp) 23 flds (%rsp) 24 fscale 25 fstp %st(1) 26 fstps (%rsp) 27 movss (%rsp),%xmm0 28 addq $24, %rsp 29 ret 30#else 31 fildl 8(%esp) 32 flds 4(%esp) 33 fscale 34 fstp %st(1) 35 ret 36#endif 37 38.globl __MINGW_USYMBOL(scalblnf) 39 .set __MINGW_USYMBOL(scalblnf),__MINGW_USYMBOL(scalbnf) 40 41