Source position: ctgl.pas line 9196
type TglFragmentMaterialivSGIX = procedure(
face: GLenum;
pname: GLenum;
params: PGLint
);