Source position: ctgl.pas line 8486
type TglGetActiveSubroutineUniformiv = procedure(
program_: GLuint;
shadertype: GLenum;
index_: GLuint;
pname: GLenum;
values: PGLint
);