check-elements ( quots -- quot )


Vocabulary
compiler.cfg.intrinsics.simd.backend

Inputs
quotsan object


Outputs
quotan object


Definition
USING: combinators kernel math sequences
sequences.generalizations ;

IN: compiler.cfg.intrinsics.simd.backend

MACRO: check-elements ( quots -- quot )
[ length [ firstn ] curry ] [ [ spread ] curry ]
[ length 1 - \ and <repetition> [ ] like ] tri 3append ;