Fixes
parent
bbca00e2ae
commit
38c961cf6f
|
@ -623,7 +623,7 @@ M: x86 %epilogue ( n -- ) cell - incr-stack-reg ;
|
||||||
temp 0 MOV \ t rc-absolute-cell rel-immediate
|
temp 0 MOV \ t rc-absolute-cell rel-immediate
|
||||||
dst temp word execute ; inline
|
dst temp word execute ; inline
|
||||||
|
|
||||||
M: x86 %compare ( dst src1 src2 cc temp -- )
|
M:: x86 %compare ( dst src1 src2 cc temp -- )
|
||||||
src1 src2 CMP
|
src1 src2 CMP
|
||||||
cc order-cc {
|
cc order-cc {
|
||||||
{ cc< [ dst temp \ CMOVL %boolean ] }
|
{ cc< [ dst temp \ CMOVL %boolean ] }
|
||||||
|
|
|
@ -1,7 +1,7 @@
|
||||||
IN: math.vectors.simd.tests
|
IN: math.vectors.simd.tests
|
||||||
USING: math math.vectors.simd math.vectors.simd.private
|
USING: math math.vectors.simd math.vectors.simd.private
|
||||||
math.vectors math.functions kernel.private compiler sequences
|
math.vectors math.functions math.private kernel.private compiler
|
||||||
tools.test compiler.tree.debugger accessors kernel ;
|
sequences tools.test compiler.tree.debugger accessors kernel ;
|
||||||
|
|
||||||
[ float-4{ 0 0 0 0 } ] [ float-4 new ] unit-test
|
[ float-4{ 0 0 0 0 } ] [ float-4 new ] unit-test
|
||||||
|
|
||||||
|
|
Loading…
Reference in New Issue