check-gl-shader ( shader -- shader ) (original) (raw)
check-gl-shader ( shader -- shader )
Inputs
shader | A gl-shader object |
---|
Outputs
shader | A gl-shader object |
---|
Word description
Throws an error containing the gl-shader-info-log for the shader object if it failed to compile. Otherwise, the shader object is left on the stack.
Definition
: check-gl-shader ( shader -- shader )
dup gl-shader-ok? [ dup gl-shader-info-log throw ] unless ;