cl-marker ( -- event )

Vocabulary

opencl

Inputs

None

Outputs

event

a cl-event

Word description

Inserts a marker into the current command queue.

Definition

USING: accessors alien.c-types alien.data destructors kernel
opencl.ffi opencl.private ;

IN: opencl

: cl-marker ( -- event )
    (current-cl-queue) f void* <ref>
    [ clEnqueueMarker cl-success ] keep void* deref
    cl-event new-disposable swap >>handle ; inline