cuda-function-word? ( object -- ? )

Vocabulary

cuda.prettyprint

Inputs and outputs

object	an object
?	a boolean

Word description

Tests if the object is an instance of the cuda-function-word class.

Definition

USING: accessors combinators.short-circuit cuda.libraries kernel
sequences words ;

IN: cuda.prettyprint

: cuda-function-word? ( object -- ? )
    dup word?
    [ def>> { [ length 14 = ] [ last \ cuda-invoke eq? ] } 1&& ]
    [ drop f ] if ;