cl_command_type>command-type ( cl_command-type -- command-type )

Vocabulary

opencl.private

Inputs

cl_command-type

an object

Outputs

command-type

an object

Definition

USING: combinators opencl opencl.ffi ;

IN: opencl.private

: cl_command_type>command-type
    ( cl_command-type -- command-type )
    {
        {
            CL_COMMAND_NDRANGE_KERNEL
            [ cl-ndrange-kernel-command ]
        }
        { CL_COMMAND_TASK [ cl-task-command ] }
        {
            CL_COMMAND_NATIVE_KERNEL
            [ cl-native-kernel-command ]
        }
        { CL_COMMAND_READ_BUFFER [ cl-read-buffer-command ] }
        { CL_COMMAND_WRITE_BUFFER [ cl-write-buffer-command ] }
        { CL_COMMAND_COPY_BUFFER [ cl-copy-buffer-command ] }
        { CL_COMMAND_READ_IMAGE [ cl-read-image-command ] }
        { CL_COMMAND_WRITE_IMAGE [ cl-write-image-command ] }
        { CL_COMMAND_COPY_IMAGE [ cl-copy-image-command ] }
        {
            CL_COMMAND_COPY_BUFFER_TO_IMAGE
            [ cl-copy-buffer-to-image-command ]
        }
        {
            CL_COMMAND_COPY_IMAGE_TO_BUFFER
            [ cl-copy-image-to-buffer-command ]
        }
        { CL_COMMAND_MAP_BUFFER [ cl-map-buffer-command ] }
        { CL_COMMAND_MAP_IMAGE [ cl-map-image-command ] }
        {
            CL_COMMAND_UNMAP_MEM_OBJECT
            [ cl-unmap-mem-object-command ]
        }
        { CL_COMMAND_MARKER [ cl-marker-command ] }
        {
            CL_COMMAND_ACQUIRE_GL_OBJECTS
            [ cl-acquire-gl-objects-command ]
        }
        {
            CL_COMMAND_RELEASE_GL_OBJECTS
            [ cl-release-gl-objects-command ]
        }
    } case ;