>variable-shuffle ( shuffle rep -- shuffle' )

Vocabulary

compiler.cfg.intrinsics.simd

Inputs

shuffle	an object
rep	an object

Outputs

shuffle'

an object

Definition

USING: alien.c-types byte-arrays cpu.architecture kernel
math.vectors sequences ;

IN: compiler.cfg.intrinsics.simd

: >variable-shuffle ( shuffle rep -- shuffle' )
    rep-component-type heap-size
    [ dup <repetition> >byte-array ] [ <iota> >byte-array ] bi
    [ [ n*v ] curry ] dip [ v+ ] curry compose map concat ;