USING: compiler.cfg.hats compiler.cfg.intrinsics.simd.backend
cpu.architecture locals.backend ;

IN: compiler.cfg.intrinsics.simd

: ^compare-vector ( src1 src2 rep cc -- dst )
{
[ ^(compare-vector) ]
[ ^minmax-compare-vector ]
{
unsigned-int-vector-rep
[
4 load-locals
-1 get-local sign-bit-mask ^^load-literal
load-local
-4 get-local 0 get-local -2 get-local
^^xor-vector
-3 get-local 0 get-local -2 get-local
^^xor-vector
-2 get-local signed-rep -1 get-local 5
drop-locals ^(compare-vector)
]
}
} vv-cc-vector-op ;