Browse Source

* add glVertexAttribDivisor, mantis #31878, patch by Julian Puhl

git-svn-id: trunk@36273 -
marco 8 years ago
parent
commit
86cea6b3ef
1 changed files with 3 additions and 0 deletions
  1. 3 0
      packages/opengl/src/glext.pp

+ 3 - 0
packages/opengl/src/glext.pp

@@ -5088,6 +5088,7 @@ var
   glGetBufferParameteri64v: procedure(target: GLenum; pname: GLenum; params: PGLint64); extdecl;
   glGetBufferParameteri64v: procedure(target: GLenum; pname: GLenum; params: PGLint64); extdecl;
   glProgramParameteri: procedure(_program: GLuint; pname: GLenum; value: GLint); extdecl;
   glProgramParameteri: procedure(_program: GLuint; pname: GLenum; value: GLint); extdecl;
   glFramebufferTexture: procedure(target: GLenum; attachment: GLenum; texture: GLuint; level: GLint); extdecl;
   glFramebufferTexture: procedure(target: GLenum; attachment: GLenum; texture: GLuint; level: GLint); extdecl;
+  glVertexAttribDivisor: procedure(index: GLuint; divisor: GLuint); extdecl;
 
 
 function Load_GL_VERSION_3_2(): Boolean;
 function Load_GL_VERSION_3_2(): Boolean;
 
 
@@ -11281,6 +11282,8 @@ begin
   if not Assigned(glProgramParameteri) then allOK := false;
   if not Assigned(glProgramParameteri) then allOK := false;
   glFramebufferTexture := wglGetProcAddress('glFramebufferTexture');
   glFramebufferTexture := wglGetProcAddress('glFramebufferTexture');
   if not Assigned(glFramebufferTexture) then allOK := false;
   if not Assigned(glFramebufferTexture) then allOK := false;
+  glVertexAttribDivisor := wglGetProcAddress('glVertexAttribDivisor');
+  if not Assigned(glVertexAttribDivisor) then allOK := false;
   if not Load_GL_ARB_draw_elements_base_vertex(true) then allOK := false;
   if not Load_GL_ARB_draw_elements_base_vertex(true) then allOK := false;
   if not Load_GL_ARB_provoking_vertex(true) then allOK := false;
   if not Load_GL_ARB_provoking_vertex(true) then allOK := false;
   if not Load_GL_ARB_sync(true) then allOK := false;
   if not Load_GL_ARB_sync(true) then allOK := false;