Source position: ctgl.pas line 9193
type TglFragmentMaterialiSGIX = procedure(
face: GLenum;
pname: GLenum;
param: GLint
);