From a5e7176ec7a521fd23f990f66f5555001db8e822 Mon Sep 17 00:00:00 2001
From: John Benediktsson <mrjbq7@gmail.com>
Date: Sun, 30 Nov 2014 08:27:54 -0800
Subject: [PATCH] cpu.x86: "dup pop* push" is just "set-last".

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

diff --git a/basis/cpu/x86/x86.factor b/basis/cpu/x86/x86.factor
index 292556be9c..5394e36ec6 100644
--- a/basis/cpu/x86/x86.factor
+++ b/basis/cpu/x86/x86.factor
@@ -604,7 +604,7 @@ M:: x86 %dispatch ( src temp -- )
     building get length :> end
     ! Fix up the displacement above
     cell alignment
-    [ end start - + building get dup pop* push ]
+    [ end start - + building get set-last ]
     [ (align-code) ]
     bi ;