{-# LANGUAGE CPP, ScopedTypeVariables, PatternSynonyms #-}
module Graphics.GL.Ext.NV.BindlessMultiDrawIndirect (
gl_NV_bindless_multi_draw_indirect
, glMultiDrawArraysIndirectBindlessNV
, glMultiDrawElementsIndirectBindlessNV
) 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_bindless_multi_draw_indirect :: Bool
gl_NV_bindless_multi_draw_indirect :: Bool
gl_NV_bindless_multi_draw_indirect = [Char] -> Set [Char] -> Bool
forall a. Ord a => a -> Set a -> Bool
member "GL_NV_bindless_multi_draw_indirect" Set [Char]
extensions
{-# NOINLINE gl_NV_bindless_multi_draw_indirect #-}
glMultiDrawArraysIndirectBindlessNV :: MonadIO m => GLenum -> Ptr () -> GLsizei -> GLsizei -> GLint -> m ()
glMultiDrawArraysIndirectBindlessNV :: GLenum -> Ptr () -> GLsizei -> GLsizei -> GLsizei -> m ()
glMultiDrawArraysIndirectBindlessNV = FunPtr (GLenum -> Ptr () -> GLsizei -> GLsizei -> GLsizei -> IO ())
-> GLenum -> Ptr () -> GLsizei -> GLsizei -> GLsizei -> m ()
forall (m :: * -> *).
MonadIO m =>
FunPtr (GLenum -> Ptr () -> GLsizei -> GLsizei -> GLsizei -> IO ())
-> GLenum -> Ptr () -> GLsizei -> GLsizei -> GLsizei -> m ()
ffienumPtrVsizeisizeiintIOV FunPtr (GLenum -> Ptr () -> GLsizei -> GLsizei -> GLsizei -> IO ())
glMultiDrawArraysIndirectBindlessNVFunPtr
glMultiDrawArraysIndirectBindlessNVFunPtr :: FunPtr (GLenum -> Ptr () -> GLsizei -> GLsizei -> GLint -> IO ())
glMultiDrawArraysIndirectBindlessNVFunPtr :: FunPtr (GLenum -> Ptr () -> GLsizei -> GLsizei -> GLsizei -> IO ())
glMultiDrawArraysIndirectBindlessNVFunPtr = IO
(FunPtr
(GLenum -> Ptr () -> GLsizei -> GLsizei -> GLsizei -> IO ()))
-> FunPtr
(GLenum -> Ptr () -> GLsizei -> GLsizei -> GLsizei -> IO ())
forall a. IO a -> a
unsafePerformIO ([Char]
-> IO
(FunPtr
(GLenum -> Ptr () -> GLsizei -> GLsizei -> GLsizei -> IO ()))
forall a. [Char] -> IO (FunPtr a)
getProcAddress "glMultiDrawArraysIndirectBindlessNV")
{-# NOINLINE glMultiDrawArraysIndirectBindlessNVFunPtr #-}
glMultiDrawElementsIndirectBindlessNV :: MonadIO m => GLenum -> GLenum -> Ptr () -> GLsizei -> GLsizei -> GLint -> m ()
glMultiDrawElementsIndirectBindlessNV :: GLenum -> GLenum -> Ptr () -> GLsizei -> GLsizei -> GLsizei -> m ()
glMultiDrawElementsIndirectBindlessNV = FunPtr
(GLenum
-> GLenum -> Ptr () -> GLsizei -> GLsizei -> GLsizei -> IO ())
-> GLenum
-> GLenum
-> Ptr ()
-> GLsizei
-> GLsizei
-> GLsizei
-> m ()
forall (m :: * -> *).
MonadIO m =>
FunPtr
(GLenum
-> GLenum -> Ptr () -> GLsizei -> GLsizei -> GLsizei -> IO ())
-> GLenum
-> GLenum
-> Ptr ()
-> GLsizei
-> GLsizei
-> GLsizei
-> m ()
ffienumenumPtrVsizeisizeiintIOV FunPtr
(GLenum
-> GLenum -> Ptr () -> GLsizei -> GLsizei -> GLsizei -> IO ())
glMultiDrawElementsIndirectBindlessNVFunPtr
glMultiDrawElementsIndirectBindlessNVFunPtr :: FunPtr (GLenum -> GLenum -> Ptr () -> GLsizei -> GLsizei -> GLint -> IO ())
glMultiDrawElementsIndirectBindlessNVFunPtr :: FunPtr
(GLenum
-> GLenum -> Ptr () -> GLsizei -> GLsizei -> GLsizei -> IO ())
glMultiDrawElementsIndirectBindlessNVFunPtr = IO
(FunPtr
(GLenum
-> GLenum -> Ptr () -> GLsizei -> GLsizei -> GLsizei -> IO ()))
-> FunPtr
(GLenum
-> GLenum -> Ptr () -> GLsizei -> GLsizei -> GLsizei -> IO ())
forall a. IO a -> a
unsafePerformIO ([Char]
-> IO
(FunPtr
(GLenum
-> GLenum -> Ptr () -> GLsizei -> GLsizei -> GLsizei -> IO ()))
forall a. [Char] -> IO (FunPtr a)
getProcAddress "glMultiDrawElementsIndirectBindlessNV")
{-# NOINLINE glMultiDrawElementsIndirectBindlessNVFunPtr #-}