-- This file was automatically generated.
{-# LANGUAGE ScopedTypeVariables, PatternSynonyms #-}
module Graphics.GL.Raw.Extension.NV.GeometryProgram4 (
  -- * Extension Support
    gl_NV_geometry_program4

  -- * GL_NV_geometry_program4
  , glFramebufferTextureEXT
  , glFramebufferTextureFaceEXT
  , glFramebufferTextureLayerEXT
  , glProgramVertexLimitNV
  , pattern GL_FRAMEBUFFER_ATTACHMENT_LAYERED_EXT
  , pattern GL_FRAMEBUFFER_ATTACHMENT_TEXTURE_LAYER_EXT
  , pattern GL_FRAMEBUFFER_INCOMPLETE_LAYER_COUNT_EXT
  , pattern GL_FRAMEBUFFER_INCOMPLETE_LAYER_TARGETS_EXT
  , pattern GL_GEOMETRY_INPUT_TYPE_EXT
  , pattern GL_GEOMETRY_OUTPUT_TYPE_EXT
  , pattern GL_GEOMETRY_PROGRAM_NV
  , pattern GL_GEOMETRY_VERTICES_OUT_EXT
  , pattern GL_LINES_ADJACENCY_EXT
  , pattern GL_LINE_STRIP_ADJACENCY_EXT
  , pattern GL_MAX_GEOMETRY_TEXTURE_IMAGE_UNITS_EXT
  , pattern GL_MAX_PROGRAM_OUTPUT_VERTICES_NV
  , pattern GL_MAX_PROGRAM_TOTAL_OUTPUT_COMPONENTS_NV
  , pattern GL_PROGRAM_POINT_SIZE_EXT
  , pattern GL_TRIANGLES_ADJACENCY_EXT
  , pattern GL_TRIANGLE_STRIP_ADJACENCY_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_NV_geometry_program4 :: Bool
gl_NV_geometry_program4 = member "GL_NV_geometry_program4" extensions

glFramebufferTextureFaceEXT :: MonadIO m => GLenum -> GLenum -> GLuint -> GLint -> GLenum -> m ()
glFramebufferTextureFaceEXT = ffienumenumuintintenumIOV glFramebufferTextureFaceEXTFunPtr

glFramebufferTextureFaceEXTFunPtr :: FunPtr (GLenum -> GLenum -> GLuint -> GLint -> GLenum -> IO ())
glFramebufferTextureFaceEXTFunPtr = unsafePerformIO (getProcAddress "glFramebufferTextureFaceEXT")

{-# NOINLINE glFramebufferTextureFaceEXTFunPtr #-}

glProgramVertexLimitNV :: MonadIO m => GLenum -> GLint -> m ()
glProgramVertexLimitNV = ffienumintIOV glProgramVertexLimitNVFunPtr

glProgramVertexLimitNVFunPtr :: FunPtr (GLenum -> GLint -> IO ())
glProgramVertexLimitNVFunPtr = unsafePerformIO (getProcAddress "glProgramVertexLimitNV")

{-# NOINLINE glProgramVertexLimitNVFunPtr #-}

pattern GL_GEOMETRY_PROGRAM_NV = 0x8C26 :: GLenum

pattern GL_MAX_PROGRAM_OUTPUT_VERTICES_NV = 0x8C27 :: GLenum

pattern GL_MAX_PROGRAM_TOTAL_OUTPUT_COMPONENTS_NV = 0x8C28 :: GLenum