Skip to content

Commit 53c694c

Browse files
svenpannesvenpanne
committed
Updated OpenGL registry to fdaa98e456. Bumped version to 3.3.4.1.
The commit after that changes the schema, see: KhronosGroup/OpenGL-Registry#335 KhronosGroup/OpenGL-Registry#343 To follow these changes, we will need to massage the registry processor accordingly, but this will be done later.
1 parent c0ea239 commit 53c694c

File tree

8 files changed

+141
-50
lines changed

8 files changed

+141
-50
lines changed

‎CHANGELOG.md‎

Lines changed: 3 additions & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -1,6 +1,8 @@
11
3.3.4.1
22
-------
3-
* Relaxed upper version bound for `bytestring`.
3+
* Updated OpenGL registry to fdaa98e456.
4+
* Relaxed upper version bounds for `bytestring` and `transformers`.
5+
* Fixed OpenBSD build.
46

57
3.3.4.0
68
-------

‎OpenGLRaw.cabal‎

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -1,5 +1,5 @@
11
name: OpenGLRaw
2-
version: 3.3.4.0
2+
version: 3.3.4.1
33
synopsis: A raw binding for the OpenGL graphics system
44
description:
55
OpenGLRaw is a raw Haskell binding for the OpenGL 4.6 graphics system and

‎RegistryProcessor/OpenGL-Registry‎

‎src/Graphics/GL/Functions/F01.hs‎

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -1245,7 +1245,7 @@ ptr_glBindParameterEXT = unsafePerformIO $ getCommand "glBindParameterEXT"
12451245

12461246
glBindProgramARB
12471247
:: MonadIO m
1248-
=> GLenum -- ^ @target@ of type [ProgramTargetARB](Graphics-GL-Groups.html#ProgramTargetARB).
1248+
=> GLenum -- ^ @target@ of type [ProgramTarget](Graphics-GL-Groups.html#ProgramTarget).
12491249
-> GLuint -- ^ @program@.
12501250
-> m ()
12511251
glBindProgramARB v1 v2 = liftIO $ dyn19 ptr_glBindProgramARB v1 v2

‎src/Graphics/GL/Functions/F12.hs‎

Lines changed: 7 additions & 7 deletions
Original file line numberDiff line numberDiff line change
@@ -155,7 +155,7 @@ ptr_glGetProgramEnvParameterIuivNV = unsafePerformIO $ getCommand "glGetProgramE
155155

156156
glGetProgramEnvParameterdvARB
157157
:: MonadIO m
158-
=> GLenum -- ^ @target@ of type [ProgramTargetARB](Graphics-GL-Groups.html#ProgramTargetARB).
158+
=> GLenum -- ^ @target@ of type [ProgramTarget](Graphics-GL-Groups.html#ProgramTarget).
159159
-> GLuint -- ^ @index@.
160160
-> Ptr GLdouble -- ^ @params@ pointing to @4@ elements of type @GLdouble@.
161161
-> m ()
@@ -169,7 +169,7 @@ ptr_glGetProgramEnvParameterdvARB = unsafePerformIO $ getCommand "glGetProgramEn
169169

170170
glGetProgramEnvParameterfvARB
171171
:: MonadIO m
172-
=> GLenum -- ^ @target@ of type [ProgramTargetARB](Graphics-GL-Groups.html#ProgramTargetARB).
172+
=> GLenum -- ^ @target@ of type [ProgramTarget](Graphics-GL-Groups.html#ProgramTarget).
173173
-> GLuint -- ^ @index@.
174174
-> Ptr GLfloat -- ^ @params@ pointing to @4@ elements of type @GLfloat@.
175175
-> m ()
@@ -243,7 +243,7 @@ ptr_glGetProgramLocalParameterIuivNV = unsafePerformIO $ getCommand "glGetProgra
243243

244244
glGetProgramLocalParameterdvARB
245245
:: MonadIO m
246-
=> GLenum -- ^ @target@ of type [ProgramTargetARB](Graphics-GL-Groups.html#ProgramTargetARB).
246+
=> GLenum -- ^ @target@ of type [ProgramTarget](Graphics-GL-Groups.html#ProgramTarget).
247247
-> GLuint -- ^ @index@.
248248
-> Ptr GLdouble -- ^ @params@ pointing to @4@ elements of type @GLdouble@.
249249
-> m ()
@@ -257,7 +257,7 @@ ptr_glGetProgramLocalParameterdvARB = unsafePerformIO $ getCommand "glGetProgram
257257

258258
glGetProgramLocalParameterfvARB
259259
:: MonadIO m
260-
=> GLenum -- ^ @target@ of type [ProgramTargetARB](Graphics-GL-Groups.html#ProgramTargetARB).
260+
=> GLenum -- ^ @target@ of type [ProgramTarget](Graphics-GL-Groups.html#ProgramTarget).
261261
-> GLuint -- ^ @index@.
262262
-> Ptr GLfloat -- ^ @params@ pointing to @4@ elements of type @GLfloat@.
263263
-> m ()
@@ -523,8 +523,8 @@ ptr_glGetProgramStageiv = unsafePerformIO $ getCommand "glGetProgramStageiv"
523523

524524
glGetProgramStringARB
525525
:: MonadIO m
526-
=> GLenum -- ^ @target@ of type [ProgramTargetARB](Graphics-GL-Groups.html#ProgramTargetARB).
527-
-> GLenum -- ^ @pname@ of type [ProgramStringPropertyARB](Graphics-GL-Groups.html#ProgramStringPropertyARB).
526+
=> GLenum -- ^ @target@ of type [ProgramTarget](Graphics-GL-Groups.html#ProgramTarget).
527+
-> GLenum -- ^ @pname@ of type [ProgramStringProperty](Graphics-GL-Groups.html#ProgramStringProperty).
528528
-> Ptr a -- ^ @string@ pointing to @COMPSIZE(target,pname)@ elements of type @a@.
529529
-> m ()
530530
glGetProgramStringARB v1 v2 v3 = liftIO $ dyn250 ptr_glGetProgramStringARB v1 v2 v3
@@ -580,7 +580,7 @@ ptr_glGetProgramiv = unsafePerformIO $ getCommand "glGetProgramiv"
580580

581581
glGetProgramivARB
582582
:: MonadIO m
583-
=> GLenum -- ^ @target@ of type [ProgramTargetARB](Graphics-GL-Groups.html#ProgramTargetARB).
583+
=> GLenum -- ^ @target@ of type [ProgramTarget](Graphics-GL-Groups.html#ProgramTarget).
584584
-> GLenum -- ^ @pname@ of type [ProgramPropertyARB](Graphics-GL-Groups.html#ProgramPropertyARB).
585585
-> Ptr GLint -- ^ @params@ pointing to @1@ element of type @GLint@.
586586
-> m ()

‎src/Graphics/GL/Functions/F20.hs‎

Lines changed: 10 additions & 10 deletions
Original file line numberDiff line numberDiff line change
@@ -1206,7 +1206,7 @@ ptr_glProgramBufferParametersfvNV = unsafePerformIO $ getCommand "glProgramBuffe
12061206
-- | The vector equivalent of this command is 'glProgramEnvParameter4dvARB'.
12071207
glProgramEnvParameter4dARB
12081208
:: MonadIO m
1209-
=> GLenum -- ^ @target@ of type [ProgramTargetARB](Graphics-GL-Groups.html#ProgramTargetARB).
1209+
=> GLenum -- ^ @target@ of type [ProgramTarget](Graphics-GL-Groups.html#ProgramTarget).
12101210
-> GLuint -- ^ @index@.
12111211
-> GLdouble -- ^ @x@.
12121212
-> GLdouble -- ^ @y@.
@@ -1223,7 +1223,7 @@ ptr_glProgramEnvParameter4dARB = unsafePerformIO $ getCommand "glProgramEnvParam
12231223

12241224
glProgramEnvParameter4dvARB
12251225
:: MonadIO m
1226-
=> GLenum -- ^ @target@ of type [ProgramTargetARB](Graphics-GL-Groups.html#ProgramTargetARB).
1226+
=> GLenum -- ^ @target@ of type [ProgramTarget](Graphics-GL-Groups.html#ProgramTarget).
12271227
-> GLuint -- ^ @index@.
12281228
-> Ptr GLdouble -- ^ @params@ pointing to @4@ elements of type @GLdouble@.
12291229
-> m ()
@@ -1238,7 +1238,7 @@ ptr_glProgramEnvParameter4dvARB = unsafePerformIO $ getCommand "glProgramEnvPara
12381238
-- | The vector equivalent of this command is 'glProgramEnvParameter4fvARB'.
12391239
glProgramEnvParameter4fARB
12401240
:: MonadIO m
1241-
=> GLenum -- ^ @target@ of type [ProgramTargetARB](Graphics-GL-Groups.html#ProgramTargetARB).
1241+
=> GLenum -- ^ @target@ of type [ProgramTarget](Graphics-GL-Groups.html#ProgramTarget).
12421242
-> GLuint -- ^ @index@.
12431243
-> GLfloat -- ^ @x@.
12441244
-> GLfloat -- ^ @y@.
@@ -1255,7 +1255,7 @@ ptr_glProgramEnvParameter4fARB = unsafePerformIO $ getCommand "glProgramEnvParam
12551255

12561256
glProgramEnvParameter4fvARB
12571257
:: MonadIO m
1258-
=> GLenum -- ^ @target@ of type [ProgramTargetARB](Graphics-GL-Groups.html#ProgramTargetARB).
1258+
=> GLenum -- ^ @target@ of type [ProgramTarget](Graphics-GL-Groups.html#ProgramTarget).
12591259
-> GLuint -- ^ @index@.
12601260
-> Ptr GLfloat -- ^ @params@ pointing to @4@ elements of type @GLfloat@.
12611261
-> m ()
@@ -1333,7 +1333,7 @@ ptr_glProgramEnvParameterI4uivNV = unsafePerformIO $ getCommand "glProgramEnvPar
13331333

13341334
glProgramEnvParameters4fvEXT
13351335
:: MonadIO m
1336-
=> GLenum -- ^ @target@ of type [ProgramTargetARB](Graphics-GL-Groups.html#ProgramTargetARB).
1336+
=> GLenum -- ^ @target@ of type [ProgramTarget](Graphics-GL-Groups.html#ProgramTarget).
13371337
-> GLuint -- ^ @index@.
13381338
-> GLsizei -- ^ @count@.
13391339
-> Ptr GLfloat -- ^ @params@ pointing to @count*4@ elements of type @GLfloat@.
@@ -1379,7 +1379,7 @@ ptr_glProgramEnvParametersI4uivNV = unsafePerformIO $ getCommand "glProgramEnvPa
13791379
-- | The vector equivalent of this command is 'glProgramLocalParameter4dvARB'.
13801380
glProgramLocalParameter4dARB
13811381
:: MonadIO m
1382-
=> GLenum -- ^ @target@ of type [ProgramTargetARB](Graphics-GL-Groups.html#ProgramTargetARB).
1382+
=> GLenum -- ^ @target@ of type [ProgramTarget](Graphics-GL-Groups.html#ProgramTarget).
13831383
-> GLuint -- ^ @index@.
13841384
-> GLdouble -- ^ @x@.
13851385
-> GLdouble -- ^ @y@.
@@ -1396,7 +1396,7 @@ ptr_glProgramLocalParameter4dARB = unsafePerformIO $ getCommand "glProgramLocalP
13961396

13971397
glProgramLocalParameter4dvARB
13981398
:: MonadIO m
1399-
=> GLenum -- ^ @target@ of type [ProgramTargetARB](Graphics-GL-Groups.html#ProgramTargetARB).
1399+
=> GLenum -- ^ @target@ of type [ProgramTarget](Graphics-GL-Groups.html#ProgramTarget).
14001400
-> GLuint -- ^ @index@.
14011401
-> Ptr GLdouble -- ^ @params@ pointing to @4@ elements of type @GLdouble@.
14021402
-> m ()
@@ -1411,7 +1411,7 @@ ptr_glProgramLocalParameter4dvARB = unsafePerformIO $ getCommand "glProgramLocal
14111411
-- | The vector equivalent of this command is 'glProgramLocalParameter4fvARB'.
14121412
glProgramLocalParameter4fARB
14131413
:: MonadIO m
1414-
=> GLenum -- ^ @target@ of type [ProgramTargetARB](Graphics-GL-Groups.html#ProgramTargetARB).
1414+
=> GLenum -- ^ @target@ of type [ProgramTarget](Graphics-GL-Groups.html#ProgramTarget).
14151415
-> GLuint -- ^ @index@.
14161416
-> GLfloat -- ^ @x@.
14171417
-> GLfloat -- ^ @y@.
@@ -1428,7 +1428,7 @@ ptr_glProgramLocalParameter4fARB = unsafePerformIO $ getCommand "glProgramLocalP
14281428

14291429
glProgramLocalParameter4fvARB
14301430
:: MonadIO m
1431-
=> GLenum -- ^ @target@ of type [ProgramTargetARB](Graphics-GL-Groups.html#ProgramTargetARB).
1431+
=> GLenum -- ^ @target@ of type [ProgramTarget](Graphics-GL-Groups.html#ProgramTarget).
14321432
-> GLuint -- ^ @index@.
14331433
-> Ptr GLfloat -- ^ @params@ pointing to @4@ elements of type @GLfloat@.
14341434
-> m ()
@@ -1506,7 +1506,7 @@ ptr_glProgramLocalParameterI4uivNV = unsafePerformIO $ getCommand "glProgramLoca
15061506

15071507
glProgramLocalParameters4fvEXT
15081508
:: MonadIO m
1509-
=> GLenum -- ^ @target@ of type [ProgramTargetARB](Graphics-GL-Groups.html#ProgramTargetARB).
1509+
=> GLenum -- ^ @target@ of type [ProgramTarget](Graphics-GL-Groups.html#ProgramTarget).
15101510
-> GLuint -- ^ @index@.
15111511
-> GLsizei -- ^ @count@.
15121512
-> Ptr GLfloat -- ^ @params@ pointing to @count*4@ elements of type @GLfloat@.

‎src/Graphics/GL/Functions/F21.hs‎

Lines changed: 2 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -316,8 +316,8 @@ ptr_glProgramPathFragmentInputGenNV = unsafePerformIO $ getCommand "glProgramPat
316316

317317
glProgramStringARB
318318
:: MonadIO m
319-
=> GLenum -- ^ @target@ of type [ProgramTargetARB](Graphics-GL-Groups.html#ProgramTargetARB).
320-
-> GLenum -- ^ @format@ of type [ProgramFormatARB](Graphics-GL-Groups.html#ProgramFormatARB).
319+
=> GLenum -- ^ @target@ of type [ProgramTarget](Graphics-GL-Groups.html#ProgramTarget).
320+
-> GLenum -- ^ @format@ of type [ProgramFormat](Graphics-GL-Groups.html#ProgramFormat).
321321
-> GLsizei -- ^ @len@.
322322
-> Ptr a -- ^ @string@ pointing to @len@ elements of type @a@.
323323
-> m ()

0 commit comments

Comments
 (0)