-- This file was automatically generated.
{-# LANGUAGE ScopedTypeVariables, PatternSynonyms #-}
module Graphics.GL.Raw.Extension.EXT.TextureBuffer (
  -- * Extension Support
    gl_EXT_texture_buffer

  -- * GL_EXT_texture_buffer
  , glTexBufferEXT
  , glTexBufferRangeEXT
  , pattern GL_IMAGE_BUFFER_EXT
  , pattern GL_INT_IMAGE_BUFFER_EXT
  , pattern GL_INT_SAMPLER_BUFFER_EXT
  , pattern GL_MAX_TEXTURE_BUFFER_SIZE_EXT
  , pattern GL_SAMPLER_BUFFER_EXT
  , pattern GL_TEXTURE_BINDING_BUFFER_EXT
  , pattern GL_TEXTURE_BUFFER_BINDING_EXT
  , pattern GL_TEXTURE_BUFFER_DATA_STORE_BINDING_EXT
  , pattern GL_TEXTURE_BUFFER_EXT
  , pattern GL_TEXTURE_BUFFER_OFFSET_ALIGNMENT_EXT
  , pattern GL_TEXTURE_BUFFER_OFFSET_EXT
  , pattern GL_TEXTURE_BUFFER_SIZE_EXT
  , pattern GL_UNSIGNED_INT_IMAGE_BUFFER_EXT
  , pattern GL_UNSIGNED_INT_SAMPLER_BUFFER_EXT
) where

import Control.Monad.IO.Class
import Data.Set
import Foreign.Ptr
import Graphics.GL.Raw.Internal.FFI
import Graphics.GL.Raw.Internal.Proc
import Graphics.GL.Raw.Internal.Shared
import Graphics.GL.Raw.Types
import System.IO.Unsafe

gl_EXT_texture_buffer :: Bool
gl_EXT_texture_buffer = member "GL_EXT_texture_buffer" extensions

glTexBufferRangeEXT :: MonadIO m => GLenum -> GLenum -> GLuint -> GLintptr -> GLsizeiptr -> m ()
glTexBufferRangeEXT = ffienumenumuintintptrsizeiptrIOV glTexBufferRangeEXTFunPtr

glTexBufferRangeEXTFunPtr :: FunPtr (GLenum -> GLenum -> GLuint -> GLintptr -> GLsizeiptr -> IO ())
glTexBufferRangeEXTFunPtr = unsafePerformIO (getProcAddress "glTexBufferRangeEXT")

{-# NOINLINE glTexBufferRangeEXTFunPtr #-}

pattern GL_TEXTURE_BUFFER_BINDING_EXT = 0x8C2A :: GLenum

pattern GL_TEXTURE_BUFFER_OFFSET_ALIGNMENT_EXT = 0x919F :: GLenum

pattern GL_TEXTURE_BUFFER_OFFSET_EXT = 0x919D :: GLenum

pattern GL_TEXTURE_BUFFER_SIZE_EXT = 0x919E :: GLenum