Source position: ctgles2.pas line 7864
type TglGetActiveUniformBlockiv = procedure(
program_: GLuint;
uniformBlockIndex: GLuint;
pname: GLenum;
params: PGLint
);