OpenGL 2.13.1.0 → 2.13.1.1
raw patch · 4 files changed
+22/−3 lines, 4 filesdep ~OpenGLRawPVP: minor bump suggested
API additions: PVP suggests at least a minor version bump
Dependency ranges changed: OpenGLRaw
API changes (from Hackage documentation)
+ Graphics.Rendering.OpenGL.GL.Shaders.Uniform: instance Graphics.Rendering.OpenGL.GL.Shaders.Uniform.UniformComponent Graphics.Rendering.OpenGL.Raw.Types.GLdouble
Files
- CHANGELOG.md +6/−0
- OpenGL.cabal +2/−2
- src/Graphics/Rendering/OpenGL/GL/Framebuffer.hs +1/−1
- src/Graphics/Rendering/OpenGL/GL/Shaders/Uniform.hs +13/−0
CHANGELOG.md view
@@ -1,3 +1,9 @@+2.13.1.1+--------+* Aftermath for the `glClearNamedFramebufferfi` chaos in the OpenGL registry,+ see the corresponding+ [issue](https://www.khronos.org/bugzilla/show_bug.cgi?id=1394) on Khronos.+ 2.13.1.0 -------- * Added `extensionSupported`.
OpenGL.cabal view
@@ -1,5 +1,5 @@ name: OpenGL-version: 2.13.1.0+version: 2.13.1.1 synopsis: A binding for the OpenGL graphics system description: A Haskell binding for the OpenGL graphics system (GL, version 4.5) and its@@ -155,7 +155,7 @@ transformers >= 0.2 && < 0.5, ObjectName >= 1.1 && < 1.2, StateVar >= 1.1 && < 1.2,- OpenGLRaw >= 2.5.5 && < 2.7,+ OpenGLRaw >= 2.6.1 && < 2.7, GLURaw >= 1.3 && < 1.6 default-language: Haskell2010 other-extensions:
src/Graphics/Rendering/OpenGL/GL/Framebuffer.hs view
@@ -388,7 +388,7 @@ ClearStencilBuffer s -> with s $ glClearNamedFramebufferiv f gl_STENCIL 0 ClearDepthAndStencilBuffers d s ->- glClearNamedFramebufferfi f gl_DEPTH_STENCIL d s+ glClearNamedFramebufferfi f gl_DEPTH_STENCIL 0 d s where f = framebufferID fbo --------------------------------------------------------------------------------
src/Graphics/Rendering/OpenGL/GL/Shaders/Uniform.hs view
@@ -120,6 +120,19 @@ uniform3v (UniformLocation ul) = glUniform3fv ul uniform4v (UniformLocation ul) = glUniform4fv ul +instance UniformComponent GLdouble where+ uniform1 (UniformLocation ul) = glUniform1d ul+ uniform2 (UniformLocation ul) = glUniform2d ul+ uniform3 (UniformLocation ul) = glUniform3d ul+ uniform4 (UniformLocation ul) = glUniform4d ul++ getUniform (Program p) (UniformLocation ul) = glGetUniformdv p ul . castPtr++ uniform1v (UniformLocation ul) = glUniform1dv ul+ uniform2v (UniformLocation ul) = glUniform2dv ul+ uniform3v (UniformLocation ul) = glUniform3dv ul+ uniform4v (UniformLocation ul) = glUniform4dv ul+ -------------------------------------------------------------------------------- class Uniform a where