Fix typo.


git-svn-id: svn+ssh://svn.code.sf.net/p/mingw-w64/code/trunk@1345 4407c894-4637-0410-b4f5-ada5f102cad1

mingw-w64-crt/math/scalbnf.S

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)

mingw-w64-crt/math/scalbnl.S

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)