module Graphics.Rendering.OpenGL.Raw.NV.Fence (
glGenFences,
glDeleteFences,
glSetFence,
glTestFence,
glFinishFence,
glIsFence,
glGetFenceiv,
gl_ALL_COMPLETED,
gl_FENCE_STATUS,
gl_FENCE_CONDITION
) where
import Foreign.Ptr
import Graphics.Rendering.OpenGL.Raw.Core32
import Graphics.Rendering.OpenGL.Raw.Extensions
#include "HsOpenGLRaw.h"
extensionNameString :: String
extensionNameString = "GL_NV_fence"
EXTENSION_ENTRY(glGenFences,GLsizei -> Ptr GLuint -> IO ())
EXTENSION_ENTRY(glDeleteFences,GLsizei -> Ptr GLuint -> IO ())
EXTENSION_ENTRY(glSetFence,GLuint -> GLenum -> IO ())
EXTENSION_ENTRY(glTestFence,GLuint -> IO GLboolean)
EXTENSION_ENTRY(glFinishFence,GLuint -> IO ())
EXTENSION_ENTRY(glIsFence,GLuint -> IO GLboolean)
EXTENSION_ENTRY(glGetFenceiv,GLuint -> GLenum -> Ptr GLint -> IO ())
gl_ALL_COMPLETED :: GLenum
gl_ALL_COMPLETED = 0x84F2
gl_FENCE_STATUS :: GLenum
gl_FENCE_STATUS = 0x84F3
gl_FENCE_CONDITION :: GLenum
gl_FENCE_CONDITION = 0x84F4