{-# LANGUAGE CPP, ScopedTypeVariables, PatternSynonyms #-}
module Graphics.GL.Ext.IMG.MultisampledRenderToTexture (
gl_IMG_multisampled_render_to_texture
, glFramebufferTexture2DMultisampleIMG
, glRenderbufferStorageMultisampleIMG
, pattern GL_FRAMEBUFFER_INCOMPLETE_MULTISAMPLE_IMG
, pattern GL_MAX_SAMPLES_IMG
, pattern GL_RENDERBUFFER_SAMPLES_IMG
, pattern GL_TEXTURE_SAMPLES_IMG
) 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_IMG_multisampled_render_to_texture :: Bool
gl_IMG_multisampled_render_to_texture :: Bool
gl_IMG_multisampled_render_to_texture = String -> Set String -> Bool
forall a. Ord a => a -> Set a -> Bool
member String
"GL_IMG_multisampled_render_to_texture" Set String
extensions
{-# NOINLINE gl_IMG_multisampled_render_to_texture #-}
glFramebufferTexture2DMultisampleIMG :: MonadIO m => GLenum -> GLenum -> GLenum -> GLuint -> GLint -> GLsizei -> m ()
glFramebufferTexture2DMultisampleIMG :: forall (m :: * -> *).
MonadIO m =>
GLenum -> GLenum -> GLenum -> GLenum -> GLint -> GLint -> m ()
glFramebufferTexture2DMultisampleIMG = FunPtr
(GLenum -> GLenum -> GLenum -> GLenum -> GLint -> GLint -> IO ())
-> GLenum -> GLenum -> GLenum -> GLenum -> GLint -> GLint -> m ()
forall (m :: * -> *).
MonadIO m =>
FunPtr
(GLenum -> GLenum -> GLenum -> GLenum -> GLint -> GLint -> IO ())
-> GLenum -> GLenum -> GLenum -> GLenum -> GLint -> GLint -> m ()
ffienumenumenumuintintsizeiIOV FunPtr
(GLenum -> GLenum -> GLenum -> GLenum -> GLint -> GLint -> IO ())
glFramebufferTexture2DMultisampleIMGFunPtr
glFramebufferTexture2DMultisampleIMGFunPtr :: FunPtr (GLenum -> GLenum -> GLenum -> GLuint -> GLint -> GLsizei -> IO ())
glFramebufferTexture2DMultisampleIMGFunPtr :: FunPtr
(GLenum -> GLenum -> GLenum -> GLenum -> GLint -> GLint -> IO ())
glFramebufferTexture2DMultisampleIMGFunPtr = IO
(FunPtr
(GLenum -> GLenum -> GLenum -> GLenum -> GLint -> GLint -> IO ()))
-> FunPtr
(GLenum -> GLenum -> GLenum -> GLenum -> GLint -> GLint -> IO ())
forall a. IO a -> a
unsafePerformIO (String
-> IO
(FunPtr
(GLenum -> GLenum -> GLenum -> GLenum -> GLint -> GLint -> IO ()))
forall a. String -> IO (FunPtr a)
getProcAddress String
"glFramebufferTexture2DMultisampleIMG")
{-# NOINLINE glFramebufferTexture2DMultisampleIMGFunPtr #-}
glRenderbufferStorageMultisampleIMG :: MonadIO m => GLenum -> GLsizei -> GLenum -> GLsizei -> GLsizei -> m ()
glRenderbufferStorageMultisampleIMG :: forall (m :: * -> *).
MonadIO m =>
GLenum -> GLint -> GLenum -> GLint -> GLint -> m ()
glRenderbufferStorageMultisampleIMG = FunPtr (GLenum -> GLint -> GLenum -> GLint -> GLint -> IO ())
-> GLenum -> GLint -> GLenum -> GLint -> GLint -> m ()
forall (m :: * -> *).
MonadIO m =>
FunPtr (GLenum -> GLint -> GLenum -> GLint -> GLint -> IO ())
-> GLenum -> GLint -> GLenum -> GLint -> GLint -> m ()
ffienumsizeienumsizeisizeiIOV FunPtr (GLenum -> GLint -> GLenum -> GLint -> GLint -> IO ())
glRenderbufferStorageMultisampleIMGFunPtr
glRenderbufferStorageMultisampleIMGFunPtr :: FunPtr (GLenum -> GLsizei -> GLenum -> GLsizei -> GLsizei -> IO ())
glRenderbufferStorageMultisampleIMGFunPtr :: FunPtr (GLenum -> GLint -> GLenum -> GLint -> GLint -> IO ())
glRenderbufferStorageMultisampleIMGFunPtr = IO (FunPtr (GLenum -> GLint -> GLenum -> GLint -> GLint -> IO ()))
-> FunPtr (GLenum -> GLint -> GLenum -> GLint -> GLint -> IO ())
forall a. IO a -> a
unsafePerformIO (String
-> IO
(FunPtr (GLenum -> GLint -> GLenum -> GLint -> GLint -> IO ()))
forall a. String -> IO (FunPtr a)
getProcAddress String
"glRenderbufferStorageMultisampleIMG")
{-# NOINLINE glRenderbufferStorageMultisampleIMGFunPtr #-}
pattern GL_FRAMEBUFFER_INCOMPLETE_MULTISAMPLE_IMG :: (Eq a, Num a) => a
pattern $mGL_FRAMEBUFFER_INCOMPLETE_MULTISAMPLE_IMG :: forall {r} {a}.
(Eq a, Num a) =>
a -> ((# #) -> r) -> ((# #) -> r) -> r
$bGL_FRAMEBUFFER_INCOMPLETE_MULTISAMPLE_IMG :: forall a. (Eq a, Num a) => a
GL_FRAMEBUFFER_INCOMPLETE_MULTISAMPLE_IMG = 0x9134
pattern GL_MAX_SAMPLES_IMG :: (Eq a, Num a) => a
pattern $mGL_MAX_SAMPLES_IMG :: forall {r} {a}.
(Eq a, Num a) =>
a -> ((# #) -> r) -> ((# #) -> r) -> r
$bGL_MAX_SAMPLES_IMG :: forall a. (Eq a, Num a) => a
GL_MAX_SAMPLES_IMG = 0x9135
pattern GL_RENDERBUFFER_SAMPLES_IMG :: (Eq a, Num a) => a
pattern $mGL_RENDERBUFFER_SAMPLES_IMG :: forall {r} {a}.
(Eq a, Num a) =>
a -> ((# #) -> r) -> ((# #) -> r) -> r
$bGL_RENDERBUFFER_SAMPLES_IMG :: forall a. (Eq a, Num a) => a
GL_RENDERBUFFER_SAMPLES_IMG = 0x9133
pattern GL_TEXTURE_SAMPLES_IMG :: (Eq a, Num a) => a
pattern $mGL_TEXTURE_SAMPLES_IMG :: forall {r} {a}.
(Eq a, Num a) =>
a -> ((# #) -> r) -> ((# #) -> r) -> r
$bGL_TEXTURE_SAMPLES_IMG :: forall a. (Eq a, Num a) => a
GL_TEXTURE_SAMPLES_IMG = 0x9136