From: Andy Polyakov <appro@openssl.org>
Date: Wed, 18 Jul 2007 20:25:17 +0000 (+0000)
Subject: Fix masm type-casting problem in SSE2 code.
X-Git-Tag: OpenSSL_0_9_8f~86
X-Git-Url: https://git.librecmc.org/?a=commitdiff_plain;h=e3af0d041ea79d580683b864b7c3d66a936bebce;p=oweals%2Fopenssl.git

Fix masm type-casting problem in SSE2 code.
---

diff --git a/crypto/perlasm/x86ms.pl b/crypto/perlasm/x86ms.pl
index 82538a9a9a..cdaa337bbf 100644
--- a/crypto/perlasm/x86ms.pl
+++ b/crypto/perlasm/x86ms.pl
@@ -204,16 +204,17 @@ sub main'pand	{ &out2("pand",@_); }
 sub out2
 	{
 	local($name,$p1,$p2)=@_;
-	local($l,$t);
+	local($l,$t,$line);
 
-	push(@out,"\t$name\t");
+	$line="\t$name\t";
 	$t=&conv($p1).",";
 	$l=length($t);
-	push(@out,$t);
+	$line.="$t";
 	$l=4-($l+9)/8;
-	push(@out,"\t" x $l);
-	push(@out,&conv($p2));
-	push(@out,"\n");
+	$line.="\t" x $l;
+	$line.=&conv($p2);
+	if ($line=~/\bxmm[0-7]\b/i) { $line=~s/\b[A-Z]+WORD PTR/XMMWORD PTR/i; }
+	push(@out,$line."\n");
 	}
 
 sub out0