-- This file was automatically generated.
{-# LANGUAGE ScopedTypeVariables, PatternSynonyms #-}
module Graphics.GL.Raw.Extension.SGIX.TagSampleBuffer (
  -- * Extension Support
    gl_SGIX_tag_sample_buffer

  -- * GL_SGIX_tag_sample_buffer
  , glTagSampleBufferSGIX
) 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 System.IO.Unsafe

gl_SGIX_tag_sample_buffer :: Bool
gl_SGIX_tag_sample_buffer = member "GL_SGIX_tag_sample_buffer" extensions

glTagSampleBufferSGIX :: MonadIO m => m ()
glTagSampleBufferSGIX = ffiIOV glTagSampleBufferSGIXFunPtr

glTagSampleBufferSGIXFunPtr :: FunPtr (IO ())
glTagSampleBufferSGIXFunPtr = unsafePerformIO (getProcAddress "glTagSampleBufferSGIX")

{-# NOINLINE glTagSampleBufferSGIXFunPtr #-}