From 7520da41cc555d4dcf3cfe19344807e370b328fc Mon Sep 17 00:00:00 2001
From: Joe Groff <arcata@gmail.com>
Date: Mon, 28 Sep 2009 12:00:03 -0500
Subject: [PATCH] use MOVDDUP for double-2 broadcast to eliminate a %copy

---
 basis/cpu/x86/x86.factor | 3 +--
 1 file changed, 1 insertion(+), 2 deletions(-)

diff --git a/basis/cpu/x86/x86.factor b/basis/cpu/x86/x86.factor
index 2668379b37..084ce9eef3 100644
--- a/basis/cpu/x86/x86.factor
+++ b/basis/cpu/x86/x86.factor
@@ -593,8 +593,7 @@ M:: x86 %broadcast-vector ( dst src rep -- )
             dst dst { 0 0 0 0 } SHUFPS
         ] }
         { double-2-rep   [
-            dst src double-2-rep %copy
-            dst dst UNPCKLPD
+            dst src MOVDDUP
         ] }
         { longlong-2-rep [
             dst src longlong-2-rep %copy