cl-write-buffer ( buffer-range byte-array -- )
OpenCL

Prev:	cl-queue-read-buffer ( buffer-range alien dependent-events -- event )
Next:	cl-queue-write-buffer ( buffer-range alien dependent-events -- event )

Vocabulary
opencl

Inputs

buffer-range	a cl-buffer-range
byte-array	a byte-array

Outputs
None

Word description
Synchronously write a byte-array to the specified buffer location.

Definition

USING: accessors kernel opencl.ffi opencl.private ;

IN: opencl

: cl-write-buffer ( buffer-range byte-array -- )
    [
        [ (current-cl-queue) handle>> ] dip
        [ buffer>> handle>> CL_TRUE ] [ offset>> ] [ size>> ]
        tri
    ] dip 0 f f clEnqueueWriteBuffer cl-success ; inline