Source position: ctgl.pas line 8222
type TglUniform4fv = procedure(
location: GLint;
count: GLsizei;
value: PGLfloat
);