-- This file was automatically generated.
{-# LANGUAGE ScopedTypeVariables, PatternSynonyms #-}
module Graphics.GL.Raw.Extension.ThreeDFX.Tbuffer (
  -- * Extension Support
    gl_3DFX_tbuffer

  -- * GL_3DFX_tbuffer
  , glTbufferMask3DFX
) 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_3DFX_tbuffer :: Bool
gl_3DFX_tbuffer = member "GL_3DFX_tbuffer" extensions

glTbufferMask3DFX :: MonadIO m => GLuint -> m ()
glTbufferMask3DFX = ffiuintIOV glTbufferMask3DFXFunPtr

glTbufferMask3DFXFunPtr :: FunPtr (GLuint -> IO ())
glTbufferMask3DFXFunPtr = unsafePerformIO (getProcAddress "glTbufferMask3DFX")

{-# NOINLINE glTbufferMask3DFXFunPtr #-}