write-insn ( insn name -- insn )

Vocabulary

cuda.ptx

Inputs

insn	an object
name	an object

Outputs

insn

an object

Definition

USING: accessors io kernel ;

IN: cuda.ptx

: write-insn ( insn name -- insn )
    over predicate>> [ "@" write write-ptx-operand bl ] when*
    write ;