Source position: ctgles2.pas line 7763
type TglShaderSource = procedure(
shader: GLuint;
count: GLsizei;
string_: PPGLchar;
length: PGLint
);