Source position: glext.pp line 5149
type GLDEBUGPROC = procedure(
source: GLenum;
_type: GLenum;
id: GLuint;
severity: GLenum;
length: GLsizei;
message: PGLchar;
userParam: PGLvoid
);