cuda-arguments ( c-types abi -- quot: ( args... function -- ) )

Vocabulary

cuda.libraries

Inputs

c-types	an object
abi	an object

Outputs

quot	a quotation with stack effect ( args... function -- )

Definition

USING: cuda.libraries.private kernel sequences ;

IN: cuda.libraries

MACRO: cuda-arguments
    ( c-types abi -- quot: ( args... function -- ) )
    [ [ 0 cuda-param-size ] ] swap [ [cuda-arguments] ] curry
    if-empty ;