From 36e4a141c4dd840836a0cda97a07ad54e08aeee5 Mon Sep 17 00:00:00 2001 From: Joe Groff Date: Sun, 1 Nov 2009 18:29:12 -0600 Subject: [PATCH] clear destination register before doing CVTS* to break dependency chains --- basis/cpu/x86/x86.factor | 9 ++++++--- 1 file changed, 6 insertions(+), 3 deletions(-) diff --git a/basis/cpu/x86/x86.factor b/basis/cpu/x86/x86.factor index d24615c2d3..99a04c7503 100644 --- a/basis/cpu/x86/x86.factor +++ b/basis/cpu/x86/x86.factor @@ -489,10 +489,13 @@ M: x86 %min-float double-rep two-operand MINSD ; M: x86 %max-float double-rep two-operand MAXSD ; M: x86 %sqrt SQRTSD ; -M: x86 %single>double-float CVTSS2SD ; -M: x86 %double>single-float CVTSD2SS ; +: %clear-unless-in-place ( dst src -- ) + over = [ drop ] [ dup XORPS ] if ; -M: x86 %integer>float CVTSI2SD ; +M: x86 %single>double-float [ %clear-unless-in-place ] [ CVTSS2SD ] 2bi ; +M: x86 %double>single-float [ %clear-unless-in-place ] [ CVTSD2SS ] 2bi ; + +M: x86 %integer>float [ dup XORPS ] [ CVTSI2SD ] 2bi ; M: x86 %float>integer CVTTSD2SI ; : %cmov-float= ( dst src -- )