diff --git a/basis/cpu/x86/x86.factor b/basis/cpu/x86/x86.factor index 299d3db84c..8c152189a3 100644 --- a/basis/cpu/x86/x86.factor +++ b/basis/cpu/x86/x86.factor @@ -623,7 +623,7 @@ M: x86 %epilogue ( n -- ) cell - incr-stack-reg ; temp 0 MOV \ t rc-absolute-cell rel-immediate dst temp word execute ; inline -M: x86 %compare ( dst src1 src2 cc temp -- ) +M:: x86 %compare ( dst src1 src2 cc temp -- ) src1 src2 CMP cc order-cc { { cc< [ dst temp \ CMOVL %boolean ] } diff --git a/basis/math/vectors/simd/simd-tests.factor b/basis/math/vectors/simd/simd-tests.factor index e847fcad74..007e3a7c6c 100644 --- a/basis/math/vectors/simd/simd-tests.factor +++ b/basis/math/vectors/simd/simd-tests.factor @@ -1,7 +1,7 @@ IN: math.vectors.simd.tests USING: math math.vectors.simd math.vectors.simd.private -math.vectors math.functions kernel.private compiler sequences -tools.test compiler.tree.debugger accessors kernel ; +math.vectors math.functions math.private kernel.private compiler +sequences tools.test compiler.tree.debugger accessors kernel ; [ float-4{ 0 0 0 0 } ] [ float-4 new ] unit-test