Source position: ctgl.pas line 8522
type TglGetProgramPipelineiv = procedure(
pipeline: GLuint;
pname: GLenum;
params: PGLint
);