Source position: ctgles2.pas line 8032
type TglActiveShaderProgramEXT = procedure(
pipeline: GLuint;
program_: GLuint
);