Source position: ctgles2.pas line 7738
type TglGetActiveUniform = procedure(
program_: GLuint;
index_: GLuint;
bufSize: GLsizei;
length: PGLsizei;
size: PGLint;
type_: PGLenum;
name_: PGLchar
);