[vector-op-checked] ( #dup quot -- quot )

Vocabulary

compiler.cfg.intrinsics.simd.backend

Inputs

#dup	an object
quot	an object

Outputs

quot

an object

Definition

USING: generalizations kernel make sequences ;

IN: compiler.cfg.intrinsics.simd.backend

: [vector-op-checked] ( #dup quot -- quot )
    [ [ ndup ] curry ] dip
    [ { } make dup [ insn-available? ] all? ] curry compose ;