module Graphics.GL.Ext.NV.ReadBuffer (
gl_NV_read_buffer
, glReadBufferNV
, pattern GL_READ_BUFFER_NV
) 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_NV_read_buffer :: Bool
gl_NV_read_buffer = member "GL_NV_read_buffer" extensions
glReadBufferNV :: MonadIO m => GLenum -> m ()
glReadBufferNV = ffienumIOV glReadBufferNVFunPtr
glReadBufferNVFunPtr :: FunPtr (GLenum -> IO ())
glReadBufferNVFunPtr = unsafePerformIO (getProcAddress "glReadBufferNV")
pattern GL_READ_BUFFER_NV = 0x0C02