cl-barrier-events ( event/events -- )

Vocabulary

opencl

Inputs

event/events

a single event or sequence of events

Outputs

None

Word description

Insert a synchronization barrier for the specified events into the current command queue.

Definition

USING: accessors arrays kernel opencl.ffi opencl.private
sequences specialized-arrays.instances.alien.c-types.void* ;

IN: opencl

: cl-barrier-events ( event/events -- )
    [ (current-cl-queue) handle>> ] dip dup sequence?
    [ 1array ] unless [ handle>> ] void*-array{ } map-as
    [ length ] keep clEnqueueWaitForEvents cl-success ; inline