Source position: ctgles2.pas line 7748
type TglGetShaderSource = procedure(
shader: GLuint;
bufSize: GLsizei;
length: PGLsizei;
source: PGLchar
);