gl 0.7.5 → 0.7.6

raw patch · 13 files changed

+113/−35 lines, 13 files

Files

• CHANGELOG.markdown +8/−0
• Registry.hs +8/−2
• dist/build/autogen/Graphics/GL/Ext.hs +2/−0
• dist/build/autogen/Graphics/GL/Ext/NV/CommandList.hs +3/−3
• dist/build/autogen/Graphics/GL/Ext/OES/FixedPoint.hs +0/−16
• dist/build/autogen/Graphics/GL/Ext/OVR.hs +10/−0
• dist/build/autogen/Graphics/GL/Ext/OVR/Multiview.hs +51/−0
• dist/build/autogen/Graphics/GL/Ext/OVR/Multiview2.hs +15/−0
• dist/build/autogen/Graphics/GL/Internal/FFI.hs +10/−10
• dist/build/autogen/Graphics/GL/Standard31.hs +0/−3
• extensions.txt +2/−0
• gl.cabal +4/−1
• gl.xml too large to diff

@@ -1,3 +1,11 @@+0.7.6+-----+* Correct the type signature of `glListDrawCommandsStatesClientNV`.+* Remove `glSampleCoverageOES` from `OES_fixed_point` extension due to changes made to its specification.+* Added support for two new extensions:+  * `OVR_multiview`+  * `OVR_multiview2`+ 0.7.5 ----- * Added support for two new extensions:

@@ -128,8 +128,14 @@  clean31require :: Require -> Require clean31require require = require-  { requireEnums = "GL_BLEND_COLOR" : requireEnums require-  }+  { requireCommands = filter (`notElem` removed) $ requireCommands require+  , requireEnums = "GL_BLEND_COLOR" : requireEnums require+  } where+  removed =+    [ "glBindBufferBase"+    , "glBindBufferRange"+    , "glGetIntegeri_v"+    ]  clean44require :: Require -> Require clean44require require = require

@@ -26,6 +26,7 @@   , module Graphics.GL.Ext.NVX   , module Graphics.GL.Ext.OES   , module Graphics.GL.Ext.OML+  , module Graphics.GL.Ext.OVR   , module Graphics.GL.Ext.PGI   , module Graphics.GL.Ext.QCOM   , module Graphics.GL.Ext.REND@@ -63,6 +64,7 @@ import Graphics.GL.Ext.NVX import Graphics.GL.Ext.OES import Graphics.GL.Ext.OML+import Graphics.GL.Ext.OVR import Graphics.GL.Ext.PGI import Graphics.GL.Ext.QCOM import Graphics.GL.Ext.REND

@@ -225,10 +225,10 @@ -- | Usage: @'glListDrawCommandsStatesClientNV' list segment indirects sizes states fbos count@  -glListDrawCommandsStatesClientNV :: MonadIO m => GLuint -> GLuint -> Ptr (Ptr ()) -> Ptr () -> Ptr GLuint -> Ptr GLuint -> GLuint -> m ()-glListDrawCommandsStatesClientNV = ffiuintuintPtrPtrVPtrVPtruintPtruintuintIOV glListDrawCommandsStatesClientNVFunPtr+glListDrawCommandsStatesClientNV :: MonadIO m => GLuint -> GLuint -> Ptr (Ptr ()) -> Ptr GLsizei -> Ptr GLuint -> Ptr GLuint -> GLuint -> m ()+glListDrawCommandsStatesClientNV = ffiuintuintPtrPtrVPtrsizeiPtruintPtruintuintIOV glListDrawCommandsStatesClientNVFunPtr -glListDrawCommandsStatesClientNVFunPtr :: FunPtr (GLuint -> GLuint -> Ptr (Ptr ()) -> Ptr () -> Ptr GLuint -> Ptr GLuint -> GLuint -> IO ())+glListDrawCommandsStatesClientNVFunPtr :: FunPtr (GLuint -> GLuint -> Ptr (Ptr ()) -> Ptr GLsizei -> Ptr GLuint -> Ptr GLuint -> GLuint -> IO ()) glListDrawCommandsStatesClientNVFunPtr = unsafePerformIO (getProcAddress "glListDrawCommandsStatesClientNV")  {-# NOINLINE glListDrawCommandsStatesClientNVFunPtr #-}

@@ -89,7 +89,6 @@   , glRectxOES   , glRectxvOES   , glRotatexOES-  , glSampleCoverageOES   , glSampleCoveragexOES   , glScalexOES   , glTexCoord1xOES@@ -1163,21 +1162,6 @@ glRotatexOESFunPtr = unsafePerformIO (getProcAddress "glRotatexOES")  {-# NOINLINE glRotatexOESFunPtr #-}---- | Usage: @'glSampleCoverageOES' value invert@------ The parameter @value@ is a @ClampedFixed@.------ The parameter @invert@ is a @Boolean@, one of: 'Graphics.GL.Internal.Shared.GL_FALSE', 'Graphics.GL.Internal.Shared.GL_TRUE'.---glSampleCoverageOES :: MonadIO m => GLfixed -> GLboolean -> m ()-glSampleCoverageOES = ffifixedbooleanIOV glSampleCoverageOESFunPtr--glSampleCoverageOESFunPtr :: FunPtr (GLfixed -> GLboolean -> IO ())-glSampleCoverageOESFunPtr = unsafePerformIO (getProcAddress "glSampleCoverageOES")--{-# NOINLINE glSampleCoverageOESFunPtr #-}  -- | Usage: @'glSampleCoveragexOES' value invert@ 

@@ -0,0 +1,10 @@+-- This file was automatically generated.+{-# LANGUAGE CPP, ScopedTypeVariables, PatternSynonyms #-}+module Graphics.GL.Ext.OVR (+  -- * OVR Extensions+    module Graphics.GL.Ext.OVR.Multiview+  , module Graphics.GL.Ext.OVR.Multiview2+) where++import Graphics.GL.Ext.OVR.Multiview+import Graphics.GL.Ext.OVR.Multiview2

@@ -0,0 +1,51 @@+-- This file was automatically generated.+{-# LANGUAGE CPP, ScopedTypeVariables, PatternSynonyms #-}+module Graphics.GL.Ext.OVR.Multiview (+  -- * Extension Support+    gl_OVR_multiview++  -- * GL_OVR_multiview+  , glFramebufferTextureMultiviewOVR+  , pattern GL_FRAMEBUFFER_ATTACHMENT_TEXTURE_BASE_VIEW_INDEX_OVR+  , pattern GL_FRAMEBUFFER_ATTACHMENT_TEXTURE_NUM_VIEWS_OVR+  , pattern GL_MAX_VIEWS_OVR+) where++import Control.Monad.IO.Class+import Data.Set+import Foreign.Ptr+import Graphics.GL.Internal.FFI+import Graphics.GL.Internal.Proc+import Graphics.GL.Types+import System.IO.Unsafe++-- | Checks that the <https://www.khronos.org/registry/gles/extensions/OVR/multiview.txt GL_OVR_multiview> extension is available.++gl_OVR_multiview :: Bool+gl_OVR_multiview = member "GL_OVR_multiview" extensions+{-# NOINLINE gl_OVR_multiview #-}++-- | Usage: @'glFramebufferTextureMultiviewOVR' target attachment texture level baseViewIndex numViews@+--+-- The parameter @target@ is a @FramebufferTarget@.+--+-- The parameter @attachment@ is a @FramebufferAttachment@.+--+-- The parameter @texture@ is a @Texture@.+--+-- The parameter @level@ is a @CheckedInt32@.+++glFramebufferTextureMultiviewOVR :: MonadIO m => GLenum -> GLenum -> GLuint -> GLint -> GLint -> GLsizei -> m ()+glFramebufferTextureMultiviewOVR = ffienumenumuintintintsizeiIOV glFramebufferTextureMultiviewOVRFunPtr++glFramebufferTextureMultiviewOVRFunPtr :: FunPtr (GLenum -> GLenum -> GLuint -> GLint -> GLint -> GLsizei -> IO ())+glFramebufferTextureMultiviewOVRFunPtr = unsafePerformIO (getProcAddress "glFramebufferTextureMultiviewOVR")++{-# NOINLINE glFramebufferTextureMultiviewOVRFunPtr #-}++pattern GL_FRAMEBUFFER_ATTACHMENT_TEXTURE_BASE_VIEW_INDEX_OVR = 0x9632++pattern GL_FRAMEBUFFER_ATTACHMENT_TEXTURE_NUM_VIEWS_OVR = 0x9630++pattern GL_MAX_VIEWS_OVR = 0x9631

@@ -0,0 +1,15 @@+-- This file was automatically generated.+{-# LANGUAGE CPP, ScopedTypeVariables, PatternSynonyms #-}+module Graphics.GL.Ext.OVR.Multiview2 (+  -- * Extension Support+    gl_OVR_multiview2+) where++import Data.Set+import Graphics.GL.Internal.Proc++-- | Checks that the <https://www.khronos.org/registry/gles/extensions/OVR/multiview2.txt GL_OVR_multiview2> extension is available.++gl_OVR_multiview2 :: Bool+gl_OVR_multiview2 = member "GL_OVR_multiview2" extensions+{-# NOINLINE gl_OVR_multiview2 #-}

@@ -292,6 +292,7 @@   , ffienumenumenumuintintintIOV   , ffienumenumuintintenumIOV   , ffienumenumuintintintIOV+  , ffienumenumuintintintsizeiIOV   , ffidoubledoubledoubledoubledoubledoubleIOV   , ffifixedfixedfixedfixedfixedfixedIOV   , ffisizeiIOuint@@ -478,7 +479,7 @@   , ffiuintenumIOboolean   , ffienumuintsizeiPtrcharIOV   , ffiintushortIOV-  , ffiuintuintPtrPtrVPtrVPtruintPtruintuintIOV+  , ffiuintuintPtrPtrVPtrsizeiPtruintPtruintuintIOV   , ffiuintenumfloatIOV   , ffiuintenumintIOV   , ffienumuintsizeiPtrubyteIOV@@ -681,7 +682,6 @@   , ffiuintfloatfloatfloatIOV   , ffiPtruintPtrfloatIOV   , ffifloatbooleanIOV-  , ffifixedbooleanIOV   , fficlampxbooleanIOV   , fficlampfbooleanIOV   , ffiuintbitfieldIOV@@ -2325,6 +2325,11 @@ ffienumenumuintintintIOV :: MonadIO m => FunPtr (GLenum -> GLenum -> GLuint -> GLint -> GLint -> IO ()) -> GLenum -> GLenum -> GLuint -> GLint -> GLint -> m () ffienumenumuintintintIOV fp v0 v1 v2 v3 v4 = liftIO (dynenumenumuintintintIOV fp v0 v1 v2 v3 v4) +foreign import CALLCONV "dynamic" dynenumenumuintintintsizeiIOV :: FunPtr (GLenum -> GLenum -> GLuint -> GLint -> GLint -> GLsizei -> IO ()) -> GLenum -> GLenum -> GLuint -> GLint -> GLint -> GLsizei -> IO ()++ffienumenumuintintintsizeiIOV :: MonadIO m => FunPtr (GLenum -> GLenum -> GLuint -> GLint -> GLint -> GLsizei -> IO ()) -> GLenum -> GLenum -> GLuint -> GLint -> GLint -> GLsizei -> m ()+ffienumenumuintintintsizeiIOV fp v0 v1 v2 v3 v4 v5 = liftIO (dynenumenumuintintintsizeiIOV fp v0 v1 v2 v3 v4 v5)+ foreign import CALLCONV "dynamic" dyndoubledoubledoubledoubledoubledoubleIOV :: FunPtr (GLdouble -> GLdouble -> GLdouble -> GLdouble -> GLdouble -> GLdouble -> IO ()) -> GLdouble -> GLdouble -> GLdouble -> GLdouble -> GLdouble -> GLdouble -> IO ()  ffidoubledoubledoubledoubledoubledoubleIOV :: MonadIO m => FunPtr (GLdouble -> GLdouble -> GLdouble -> GLdouble -> GLdouble -> GLdouble -> IO ()) -> GLdouble -> GLdouble -> GLdouble -> GLdouble -> GLdouble -> GLdouble -> m ()@@ -3255,10 +3260,10 @@ ffiintushortIOV :: MonadIO m => FunPtr (GLint -> GLushort -> IO ()) -> GLint -> GLushort -> m () ffiintushortIOV fp v0 v1 = liftIO (dynintushortIOV fp v0 v1) -foreign import CALLCONV "dynamic" dynuintuintPtrPtrVPtrVPtruintPtruintuintIOV :: FunPtr (GLuint -> GLuint -> Ptr (Ptr ()) -> Ptr () -> Ptr GLuint -> Ptr GLuint -> GLuint -> IO ()) -> GLuint -> GLuint -> Ptr (Ptr ()) -> Ptr () -> Ptr GLuint -> Ptr GLuint -> GLuint -> IO ()+foreign import CALLCONV "dynamic" dynuintuintPtrPtrVPtrsizeiPtruintPtruintuintIOV :: FunPtr (GLuint -> GLuint -> Ptr (Ptr ()) -> Ptr GLsizei -> Ptr GLuint -> Ptr GLuint -> GLuint -> IO ()) -> GLuint -> GLuint -> Ptr (Ptr ()) -> Ptr GLsizei -> Ptr GLuint -> Ptr GLuint -> GLuint -> IO () -ffiuintuintPtrPtrVPtrVPtruintPtruintuintIOV :: MonadIO m => FunPtr (GLuint -> GLuint -> Ptr (Ptr ()) -> Ptr () -> Ptr GLuint -> Ptr GLuint -> GLuint -> IO ()) -> GLuint -> GLuint -> Ptr (Ptr ()) -> Ptr () -> Ptr GLuint -> Ptr GLuint -> GLuint -> m ()-ffiuintuintPtrPtrVPtrVPtruintPtruintuintIOV fp v0 v1 v2 v3 v4 v5 v6 = liftIO (dynuintuintPtrPtrVPtrVPtruintPtruintuintIOV fp v0 v1 v2 v3 v4 v5 v6)+ffiuintuintPtrPtrVPtrsizeiPtruintPtruintuintIOV :: MonadIO m => FunPtr (GLuint -> GLuint -> Ptr (Ptr ()) -> Ptr GLsizei -> Ptr GLuint -> Ptr GLuint -> GLuint -> IO ()) -> GLuint -> GLuint -> Ptr (Ptr ()) -> Ptr GLsizei -> Ptr GLuint -> Ptr GLuint -> GLuint -> m ()+ffiuintuintPtrPtrVPtrsizeiPtruintPtruintuintIOV fp v0 v1 v2 v3 v4 v5 v6 = liftIO (dynuintuintPtrPtrVPtrsizeiPtruintPtruintuintIOV fp v0 v1 v2 v3 v4 v5 v6)  foreign import CALLCONV "dynamic" dynuintenumfloatIOV :: FunPtr (GLuint -> GLenum -> GLfloat -> IO ()) -> GLuint -> GLenum -> GLfloat -> IO () @@ -4269,11 +4274,6 @@  ffifloatbooleanIOV :: MonadIO m => FunPtr (GLfloat -> GLboolean -> IO ()) -> GLfloat -> GLboolean -> m () ffifloatbooleanIOV fp v0 v1 = liftIO (dynfloatbooleanIOV fp v0 v1)--foreign import CALLCONV "dynamic" dynfixedbooleanIOV :: FunPtr (GLfixed -> GLboolean -> IO ()) -> GLfixed -> GLboolean -> IO ()--ffifixedbooleanIOV :: MonadIO m => FunPtr (GLfixed -> GLboolean -> IO ()) -> GLfixed -> GLboolean -> m ()-ffifixedbooleanIOV fp v0 v1 = liftIO (dynfixedbooleanIOV fp v0 v1)  foreign import CALLCONV "dynamic" dynclampxbooleanIOV :: FunPtr (GLclampx -> GLboolean -> IO ()) -> GLclampx -> GLboolean -> IO () 

@@ -3,8 +3,6 @@ module Graphics.GL.Standard31 (   -- * Graphics.GL.Standard31     module Graphics.GL.Standard30-  , glBindBufferBase-  , glBindBufferRange   , glCopyBufferSubData   , glDrawArraysInstanced   , glDrawElementsInstanced@@ -12,7 +10,6 @@   , glGetActiveUniformBlockiv   , glGetActiveUniformName   , glGetActiveUniformsiv-  , glGetIntegeri_v   , glGetUniformBlockIndex   , glGetUniformIndices   , glPrimitiveRestartIndex

@@ -727,6 +727,8 @@ GL_OML_resample https://cvs.khronos.org/svn/repos/ogl/trunk/doc/registry/public/specs/OML/resample.txt GL_OML_subsample https://cvs.khronos.org/svn/repos/ogl/trunk/doc/registry/public/specs/OML/subsample.txt GL_OML_wgl_sync_control https://cvs.khronos.org/svn/repos/ogl/trunk/doc/registry/public/specs/OML/wgl_sync_control.txt+GL_OVR_multiview https://www.khronos.org/registry/gles/extensions/OVR/multiview.txt+GL_OVR_multiview2 https://www.khronos.org/registry/gles/extensions/OVR/multiview2.txt GL_PGI_misc_hints https://cvs.khronos.org/svn/repos/ogl/trunk/doc/registry/public/specs/PGI/misc_hints.txt GL_PGI_vertex_hints https://cvs.khronos.org/svn/repos/ogl/trunk/doc/registry/public/specs/PGI/vertex_hints.txt GL_QCOM_alpha_test https://www.khronos.org/registry/gles/extensions/QCOM/QCOM_alpha_test.txt

@@ -1,5 +1,5 @@ name:          gl-version:       0.7.5+version:       0.7.6 synopsis:      Complete OpenGL raw bindings description:   Complete OpenGL raw bindings license:       BSD3@@ -749,6 +749,9 @@     Graphics.GL.Ext.OML.Interlace     Graphics.GL.Ext.OML.Resample     Graphics.GL.Ext.OML.Subsample+    Graphics.GL.Ext.OVR+    Graphics.GL.Ext.OVR.Multiview+    Graphics.GL.Ext.OVR.Multiview2     Graphics.GL.Ext.PGI     Graphics.GL.Ext.PGI.MiscHints     Graphics.GL.Ext.PGI.VertexHints

file too large to diff