-- This file was automatically generated.
{-# LANGUAGE ScopedTypeVariables, PatternSynonyms #-}
module Graphics.GL.Raw.Extension.AMD.VertexShaderTessellator (
  -- * Extension Support
    gl_AMD_vertex_shader_tessellator

  -- * GL_AMD_vertex_shader_tessellator
  , glTessellationFactorAMD
  , glTessellationModeAMD
  , pattern GL_CONTINUOUS_AMD
  , pattern GL_DISCRETE_AMD
  , pattern GL_INT_SAMPLER_BUFFER_AMD
  , pattern GL_SAMPLER_BUFFER_AMD
  , pattern GL_TESSELLATION_FACTOR_AMD
  , pattern GL_TESSELLATION_MODE_AMD
  , pattern GL_UNSIGNED_INT_SAMPLER_BUFFER_AMD
) 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.Types
import System.IO.Unsafe

gl_AMD_vertex_shader_tessellator :: Bool
gl_AMD_vertex_shader_tessellator = member "GL_AMD_vertex_shader_tessellator" extensions

glTessellationFactorAMD :: MonadIO m => GLfloat -> m ()
glTessellationFactorAMD = ffifloatIOV glTessellationFactorAMDFunPtr

glTessellationFactorAMDFunPtr :: FunPtr (GLfloat -> IO ())
glTessellationFactorAMDFunPtr = unsafePerformIO (getProcAddress "glTessellationFactorAMD")

{-# NOINLINE glTessellationFactorAMDFunPtr #-}

glTessellationModeAMD :: MonadIO m => GLenum -> m ()
glTessellationModeAMD = ffienumIOV glTessellationModeAMDFunPtr

glTessellationModeAMDFunPtr :: FunPtr (GLenum -> IO ())
glTessellationModeAMDFunPtr = unsafePerformIO (getProcAddress "glTessellationModeAMD")

{-# NOINLINE glTessellationModeAMDFunPtr #-}

pattern GL_CONTINUOUS_AMD = 0x9007 :: GLenum

pattern GL_DISCRETE_AMD = 0x9006 :: GLenum

pattern GL_INT_SAMPLER_BUFFER_AMD = 0x9002 :: GLenum

pattern GL_SAMPLER_BUFFER_AMD = 0x9001 :: GLenum

pattern GL_TESSELLATION_FACTOR_AMD = 0x9005 :: GLenum

pattern GL_TESSELLATION_MODE_AMD = 0x9004 :: GLenum

pattern GL_UNSIGNED_INT_SAMPLER_BUFFER_AMD = 0x9003 :: GLenum