uniform-slot-type ( uniform -- type )

Vocabulary

gpu.render.private

Inputs

uniform

an object

Outputs

type

an object

Definition

USING: accessors combinators gpu.render gpu.textures kernel math
sequences ;

IN: gpu.render.private

: uniform-slot-type ( uniform -- type )
    dup dim>>
    [ drop sequence ] [
        uniform-type>> {
            { bool-uniform [ boolean ] }
            { uint-uniform [ integer ] }
            { int-uniform [ integer ] }
            { float-uniform [ float ] }
            { texture-uniform [ texture ] }
            [ drop sequence ]
        } case
    ] if ;