Fix typo.
git-svn-id: svn+ssh://svn.code.sf.net/p/mingw-w64/code/trunk@1345 4407c894-4637-0410-b4f5-ada5f102cad1
diff --git a/mingw-w64-crt/math/scalbnf.S b/mingw-w64-crt/math/scalbnf.S
index 3c31071..ccc8376 100644
--- a/mingw-w64-crt/math/scalbnf.S
+++ b/mingw-w64-crt/math/scalbnf.S
@@ -15,15 +15,17 @@
.globl __MINGW_USYMBOL(scalbnf)
.def __MINGW_USYMBOL(scalbnf); .scl 2; .type 32; .endef
__MINGW_USYMBOL(scalbnf):
-#ifdef _WIN664
- movq %rdx,-16(%rsp)
- fildl -16(%rsp)
- movss %xmm0,-16(%rsp)
- flds -16(%rsp)
+#ifdef _WIN64
+ subq $24, %rsp
+ movq %rdx,(%rsp)
+ fildl (%rsp)
+ movss %xmm0,(%rsp)
+ flds (%rsp)
fscale
fstp %st(1)
- fstps -16(%rsp)
- movss -16(%rsp),%xmm0
+ fstps (%rsp)
+ movss (%rsp),%xmm0
+ addq $24, %rsp
ret
#else
fildl 8(%esp)
diff --git a/mingw-w64-crt/math/scalbnl.S b/mingw-w64-crt/math/scalbnl.S
index 980beff..8e82a12 100644
--- a/mingw-w64-crt/math/scalbnl.S
+++ b/mingw-w64-crt/math/scalbnl.S
@@ -16,14 +16,17 @@
.def __MINGW_USYMBOL(scalbnl); .scl 2; .type 32; .endef
__MINGW_USYMBOL(scalbnl):
#ifdef _WIN64
- movq %r8, 24(%rsp)
- fildl 24(%rsp)
+ subq $24, %rsp
+ andq $0xffffffff, %r8
+ movq %r8, (%rsp)
+ fildl (%rsp)
fldt (%rdx)
fscale
fstp %st(1)
movq %rcx,%rax
movq $0,8(%rcx)
fstpt (%rcx)
+ addq $24, %rsp
ret
#else
fildl 16(%esp)
