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

+ recentish TinyGL of MorphOS supports glCopyTexImage2D()

Browse Source 
git-svn-id: trunk@15343 -
This commit is contained in:
Károly Balogh 2010-05-29 17:53:31 +00:00
parent 8ea5a59438
commit 066b8616c0
1 changed files with 4 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
packages/opengl/src/tinygl.inc
View File

@ -314,6 +314,9 @@ syscall sysvbase TinyGLBase 1216;
procedure _GLColorMask(gcl: pointer; red, green, blue, alpha: GLboolean);
syscall sysvbase TinyGLBase 1282;
procedure _GLCopyTexImage2D(gcl: pointer; target: GLenum; level: GLint; internalFormat: GLenum; x, y: GLint; width, height: GLsizei; border: GLint); inline;
syscall sysvbase TinyGLBase 1402;
{$ENDIF GL_UNIT}
@ -369,9 +372,7 @@ end;
procedure glCopyTexImage2D(target: GLenum; level: GLint; internalFormat: GLenum; x, y: GLint; width, height: GLsizei; border: GLint); inline;
begin
{$WARNING glCopyTexImage2D is dummy.}
// DUMMY, FIX ME!!!
// TinyGL doesn't support this yet.
_GLCopyTexImage2D(tglContext, target, level, internalFormat, x, y, width, height, border);
end;
procedure glCullFace(mode: GLenum); inline;