gl: fix build for gles (still not work on android)

[d2df-sdl.git] / src / nogl / noGL.pas

diff --git a/src/nogl/noGL.pas b/src/nogl/noGL.pas
index 68c74ad874f0c9c1085a894ff6f39827b4918390..90735c340c1af3096ac4b542ef852320b8d434af 100644 (file)
--- a/src/nogl/noGL.pas
+++ b/src/nogl/noGL.pas
@@ -42,6 +42,7 @@ interface
     TGLclampx   = GLclampx;
 
   const
+    GL_NO_ERROR = 0;
     GL_NEAREST = $2600;
     GL_DEPTH_TEST = $0B71;
     GL_SCISSOR_TEST = $0C11;
@@ -56,6 +57,7 @@ interface
     GL_ZERO = $0;
     GL_POINTS = $0000;
     GL_LINES = $0001;
+    GL_LINE_LOOP = $0002;
     GL_DST_COLOR = $0306;
     GL_SRC_COLOR = $0300;
     GL_ONE_MINUS_DST_COLOR = $0307;
@@ -124,6 +126,7 @@ interface
     GL_VERSION = $1F02;
     GL_EXTENSIONS = $1F03;
     GL_SHADING_LANGUAGE_VERSION = $8B8C;
+    GL_MAX_TEXTURE_SIZE = $0D33;
 
 //  const
 //    GL_CULL_FACE = $0B44;
@@ -148,6 +151,7 @@ interface
   procedure glDisable(cap: GLenum);
   function  glIsEnabled(cap: GLenum): GLboolean;
   function  glGetString(name: GLenum): PChar;
+  function  glGetError: GLenum;
   procedure glClearColor(red, green, blue, alpha: GLclampf);
   procedure glClear(mask: GLbitfield);
   procedure glAlphaFunc(func: GLenum; ref: GLclampf);
@@ -170,6 +174,7 @@ interface
 
   procedure glReadPixels(x, y: GLint; width, height: GLsizei; format, atype: GLenum; pixels: Pointer);
 
+  procedure glOrtho (left, right, bottom, top, near, far: GLfloat);
   procedure glLoadIdentity;
   procedure glScissor(x, y: GLint; width, height: GLsizei);
   procedure glViewport(x, y: GLint; width, height: GLsizei);