{-# LANGUAGE CPP, ScopedTypeVariables, PatternSynonyms #-}
module Graphics.GL.Ext.AMD.SparseTexture (
gl_AMD_sparse_texture
, glTexStorageSparseAMD
, glTextureStorageSparseAMD
, pattern GL_MAX_SPARSE_3D_TEXTURE_SIZE_AMD
, pattern GL_MAX_SPARSE_ARRAY_TEXTURE_LAYERS
, pattern GL_MAX_SPARSE_TEXTURE_SIZE_AMD
, pattern GL_MIN_LOD_WARNING_AMD
, pattern GL_MIN_SPARSE_LEVEL_AMD
, pattern GL_TEXTURE_STORAGE_SPARSE_BIT_AMD
, pattern GL_VIRTUAL_PAGE_SIZE_X_AMD
, pattern GL_VIRTUAL_PAGE_SIZE_Y_AMD
, pattern GL_VIRTUAL_PAGE_SIZE_Z_AMD
) 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_AMD_sparse_texture :: Bool
gl_AMD_sparse_texture :: Bool
gl_AMD_sparse_texture = [Char] -> Set [Char] -> Bool
forall a. Ord a => a -> Set a -> Bool
member "GL_AMD_sparse_texture" Set [Char]
extensions
{-# NOINLINE gl_AMD_sparse_texture #-}
glTexStorageSparseAMD :: MonadIO m => GLenum -> GLenum -> GLsizei -> GLsizei -> GLsizei -> GLsizei -> GLbitfield -> m ()
glTexStorageSparseAMD :: GLenum
-> GLenum
-> GLsizei
-> GLsizei
-> GLsizei
-> GLsizei
-> GLenum
-> m ()
glTexStorageSparseAMD = FunPtr
(GLenum
-> GLenum
-> GLsizei
-> GLsizei
-> GLsizei
-> GLsizei
-> GLenum
-> IO ())
-> GLenum
-> GLenum
-> GLsizei
-> GLsizei
-> GLsizei
-> GLsizei
-> GLenum
-> m ()
forall (m :: * -> *).
MonadIO m =>
FunPtr
(GLenum
-> GLenum
-> GLsizei
-> GLsizei
-> GLsizei
-> GLsizei
-> GLenum
-> IO ())
-> GLenum
-> GLenum
-> GLsizei
-> GLsizei
-> GLsizei
-> GLsizei
-> GLenum
-> m ()
ffienumenumsizeisizeisizeisizeibitfieldIOV FunPtr
(GLenum
-> GLenum
-> GLsizei
-> GLsizei
-> GLsizei
-> GLsizei
-> GLenum
-> IO ())
glTexStorageSparseAMDFunPtr
glTexStorageSparseAMDFunPtr :: FunPtr (GLenum -> GLenum -> GLsizei -> GLsizei -> GLsizei -> GLsizei -> GLbitfield -> IO ())
glTexStorageSparseAMDFunPtr :: FunPtr
(GLenum
-> GLenum
-> GLsizei
-> GLsizei
-> GLsizei
-> GLsizei
-> GLenum
-> IO ())
glTexStorageSparseAMDFunPtr = IO
(FunPtr
(GLenum
-> GLenum
-> GLsizei
-> GLsizei
-> GLsizei
-> GLsizei
-> GLenum
-> IO ()))
-> FunPtr
(GLenum
-> GLenum
-> GLsizei
-> GLsizei
-> GLsizei
-> GLsizei
-> GLenum
-> IO ())
forall a. IO a -> a
unsafePerformIO ([Char]
-> IO
(FunPtr
(GLenum
-> GLenum
-> GLsizei
-> GLsizei
-> GLsizei
-> GLsizei
-> GLenum
-> IO ()))
forall a. [Char] -> IO (FunPtr a)
getProcAddress "glTexStorageSparseAMD")
{-# NOINLINE glTexStorageSparseAMDFunPtr #-}
glTextureStorageSparseAMD :: MonadIO m => GLuint -> GLenum -> GLenum -> GLsizei -> GLsizei -> GLsizei -> GLsizei -> GLbitfield -> m ()
glTextureStorageSparseAMD :: GLenum
-> GLenum
-> GLenum
-> GLsizei
-> GLsizei
-> GLsizei
-> GLsizei
-> GLenum
-> m ()
glTextureStorageSparseAMD = FunPtr
(GLenum
-> GLenum
-> GLenum
-> GLsizei
-> GLsizei
-> GLsizei
-> GLsizei
-> GLenum
-> IO ())
-> GLenum
-> GLenum
-> GLenum
-> GLsizei
-> GLsizei
-> GLsizei
-> GLsizei
-> GLenum
-> m ()
forall (m :: * -> *).
MonadIO m =>
FunPtr
(GLenum
-> GLenum
-> GLenum
-> GLsizei
-> GLsizei
-> GLsizei
-> GLsizei
-> GLenum
-> IO ())
-> GLenum
-> GLenum
-> GLenum
-> GLsizei
-> GLsizei
-> GLsizei
-> GLsizei
-> GLenum
-> m ()
ffiuintenumenumsizeisizeisizeisizeibitfieldIOV FunPtr
(GLenum
-> GLenum
-> GLenum
-> GLsizei
-> GLsizei
-> GLsizei
-> GLsizei
-> GLenum
-> IO ())
glTextureStorageSparseAMDFunPtr
glTextureStorageSparseAMDFunPtr :: FunPtr (GLuint -> GLenum -> GLenum -> GLsizei -> GLsizei -> GLsizei -> GLsizei -> GLbitfield -> IO ())
glTextureStorageSparseAMDFunPtr :: FunPtr
(GLenum
-> GLenum
-> GLenum
-> GLsizei
-> GLsizei
-> GLsizei
-> GLsizei
-> GLenum
-> IO ())
glTextureStorageSparseAMDFunPtr = IO
(FunPtr
(GLenum
-> GLenum
-> GLenum
-> GLsizei
-> GLsizei
-> GLsizei
-> GLsizei
-> GLenum
-> IO ()))
-> FunPtr
(GLenum
-> GLenum
-> GLenum
-> GLsizei
-> GLsizei
-> GLsizei
-> GLsizei
-> GLenum
-> IO ())
forall a. IO a -> a
unsafePerformIO ([Char]
-> IO
(FunPtr
(GLenum
-> GLenum
-> GLenum
-> GLsizei
-> GLsizei
-> GLsizei
-> GLsizei
-> GLenum
-> IO ()))
forall a. [Char] -> IO (FunPtr a)
getProcAddress "glTextureStorageSparseAMD")
{-# NOINLINE glTextureStorageSparseAMDFunPtr #-}
pattern $bGL_MAX_SPARSE_3D_TEXTURE_SIZE_AMD :: a
$mGL_MAX_SPARSE_3D_TEXTURE_SIZE_AMD :: forall r a. (Eq a, Num a) => a -> (Void# -> r) -> (Void# -> r) -> r
GL_MAX_SPARSE_3D_TEXTURE_SIZE_AMD = 0x9199
pattern $bGL_MAX_SPARSE_ARRAY_TEXTURE_LAYERS :: a
$mGL_MAX_SPARSE_ARRAY_TEXTURE_LAYERS :: forall r a. (Eq a, Num a) => a -> (Void# -> r) -> (Void# -> r) -> r
GL_MAX_SPARSE_ARRAY_TEXTURE_LAYERS = 0x919A
pattern $bGL_MAX_SPARSE_TEXTURE_SIZE_AMD :: a
$mGL_MAX_SPARSE_TEXTURE_SIZE_AMD :: forall r a. (Eq a, Num a) => a -> (Void# -> r) -> (Void# -> r) -> r
GL_MAX_SPARSE_TEXTURE_SIZE_AMD = 0x9198
pattern $bGL_MIN_LOD_WARNING_AMD :: a
$mGL_MIN_LOD_WARNING_AMD :: forall r a. (Eq a, Num a) => a -> (Void# -> r) -> (Void# -> r) -> r
GL_MIN_LOD_WARNING_AMD = 0x919C
pattern $bGL_MIN_SPARSE_LEVEL_AMD :: a
$mGL_MIN_SPARSE_LEVEL_AMD :: forall r a. (Eq a, Num a) => a -> (Void# -> r) -> (Void# -> r) -> r
GL_MIN_SPARSE_LEVEL_AMD = 0x919B
pattern $bGL_TEXTURE_STORAGE_SPARSE_BIT_AMD :: a
$mGL_TEXTURE_STORAGE_SPARSE_BIT_AMD :: forall r a. (Eq a, Num a) => a -> (Void# -> r) -> (Void# -> r) -> r
GL_TEXTURE_STORAGE_SPARSE_BIT_AMD = 0x00000001
pattern $bGL_VIRTUAL_PAGE_SIZE_X_AMD :: a
$mGL_VIRTUAL_PAGE_SIZE_X_AMD :: forall r a. (Eq a, Num a) => a -> (Void# -> r) -> (Void# -> r) -> r
GL_VIRTUAL_PAGE_SIZE_X_AMD = 0x9195
pattern $bGL_VIRTUAL_PAGE_SIZE_Y_AMD :: a
$mGL_VIRTUAL_PAGE_SIZE_Y_AMD :: forall r a. (Eq a, Num a) => a -> (Void# -> r) -> (Void# -> r) -> r
GL_VIRTUAL_PAGE_SIZE_Y_AMD = 0x9196
pattern $bGL_VIRTUAL_PAGE_SIZE_Z_AMD :: a
$mGL_VIRTUAL_PAGE_SIZE_Z_AMD :: forall r a. (Eq a, Num a) => a -> (Void# -> r) -> (Void# -> r) -> r
GL_VIRTUAL_PAGE_SIZE_Z_AMD = 0x9197