{-# LANGUAGE CPP, ScopedTypeVariables, PatternSynonyms #-}
module Graphics.GL.Ext.MESA.ResizeBuffers (
gl_MESA_resize_buffers
, glResizeBuffersMESA
) 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_MESA_resize_buffers :: Bool
gl_MESA_resize_buffers :: Bool
gl_MESA_resize_buffers = String -> Set String -> Bool
forall a. Ord a => a -> Set a -> Bool
member String
"GL_MESA_resize_buffers" Set String
extensions
{-# NOINLINE gl_MESA_resize_buffers #-}
glResizeBuffersMESA :: MonadIO m => m ()
glResizeBuffersMESA :: forall (m :: * -> *). MonadIO m => m ()
glResizeBuffersMESA = FunPtr (IO ()) -> m ()
forall (m :: * -> *). MonadIO m => FunPtr (IO ()) -> m ()
ffiIOV FunPtr (IO ())
glResizeBuffersMESAFunPtr
glResizeBuffersMESAFunPtr :: FunPtr (IO ())
glResizeBuffersMESAFunPtr :: FunPtr (IO ())
glResizeBuffersMESAFunPtr = IO (FunPtr (IO ())) -> FunPtr (IO ())
forall a. IO a -> a
unsafePerformIO (String -> IO (FunPtr (IO ()))
forall a. String -> IO (FunPtr a)
getProcAddress String
"glResizeBuffersMESA")
{-# NOINLINE glResizeBuffersMESAFunPtr #-}