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