module Graphics.GL.Ext.SGIX.FlushRaster (
gl_SGIX_flush_raster
, glFlushRasterSGIX
) where
import Control.Monad.IO.Class
import Data.Set
import Foreign.Ptr
import Graphics.GL.Internal.FFI
import Graphics.GL.Internal.Proc
import System.IO.Unsafe
gl_SGIX_flush_raster :: Bool
gl_SGIX_flush_raster = member "GL_SGIX_flush_raster" extensions
glFlushRasterSGIX :: MonadIO m => m ()
glFlushRasterSGIX = ffiIOV glFlushRasterSGIXFunPtr
glFlushRasterSGIXFunPtr :: FunPtr (IO ())
glFlushRasterSGIXFunPtr = unsafePerformIO (getProcAddress "glFlushRasterSGIX")