module Graphics.GL.Ext.ThreeDFX.Tbuffer (
gl_3DFX_tbuffer
, glTbufferMask3DFX
) where
import Control.Monad.IO.Class
import Data.Set
import Foreign.Ptr
import Graphics.GL.Internal.FFI
import Graphics.GL.Internal.Proc
import Graphics.GL.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")