paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-04-09 08:30:54 +02:00
Code Issues Packages Projects Releases Wiki Activity

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

Browse Source 
git-svn-id: trunk@36273 -
This commit is contained in:
marco 2017-05-20 10:21:37 +00:00
parent 8a7de4a4d3
commit 86cea6b3ef
1 changed files with 3 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
packages/opengl/src/glext.pp
View File

@ -5088,6 +5088,7 @@ var
glGetBufferParameteri64v: procedure(target: GLenum; pname: GLenum; params: PGLint64); extdecl;
glProgramParameteri: procedure(_program: GLuint; pname: GLenum; value: 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;
@ -11281,6 +11282,8 @@ begin
if not Assigned(glProgramParameteri) then allOK := false;
glFramebufferTexture := wglGetProcAddress('glFramebufferTexture');
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_provoking_vertex(true) then allOK := false;
if not Load_GL_ARB_sync(true) then allOK := false;