make test compile with latest opengl version

This commit is contained in:
Andreas Rumpf
2016-07-30 09:46:27 +02:00
parent a8edf67a28
commit 2605c8c4ce
3 changed files with 3 additions and 3 deletions

View File

@@ -6,7 +6,7 @@ export
opengl
type
EGL* = object of E_Base
EGL* = object of Exception
EGL_code* = object of EGL
code*: EGL_err
EGL_err {.pure.} = enum

View File

@@ -8,7 +8,7 @@ type
TShaderType* {.pure.} = enum
frag = GL_FRAGMENT_SHADER,
vert = GL_VERTEX_SHADER
E_Shader* = object of E_Base
E_Shader* = object of Exception
E_UnknownShaderType* = object of E_Shader
converter pathToShaderType*(s: string): TShaderType =

View File

@@ -25,7 +25,7 @@ proc whiteTex*(): TTex =
setTexParams()
var pixel = [255'u8, 255'u8, 255'u8, 255'u8]
?glTexImage2D(GLtexture2D, 0, GL_RGBA, 1, 1, 0, GL_BGRA, cGLUnsignedByte, pixel[0].addr)
?glTexImage2D(GLtexture2D, 0, GLint GL_RGBA, 1, 1, 0, GL_BGRA, cGLUnsignedByte, pixel[0].addr)
?glBindTexture(GLtexture2D, 0)
result = gWhiteTex