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

* GL_ARB_Vertex_buffer_object returned true when it should be false in some cases, mantis 12128

Browse Source 
git-svn-id: trunk@11754 -
This commit is contained in:
marco 2008-09-13 08:41:57 +00:00
parent 2e1f993232
commit bf98838366
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

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

@ -7588,7 +7588,7 @@ function load_GL_ARB_vertex_buffer_object : boolean;
var extstring:string;
begin
load_GL_ARB_vertex_buffer_object:=false;
Result:=false;
extstring := String(PChar(glGetString(GL_EXTENSIONS)));
if glext_ExtensionSupported('GL_ARB_vertex_buffer_object',extstring) then
begin
@ -7612,8 +7612,8 @@ begin
if not Assigned(glGetBufferParameterivARB) then Exit;
glGetBufferPointervARB := wglGetProcAddress('glGetBufferPointervARB');
if not Assigned(glGetBufferPointervARB) then Exit;
Result:=true;
end;
load_GL_ARB_vertex_buffer_object:=true;
end;
{$IFDEF Windows}