{-# LANGUAGE CPP, ScopedTypeVariables, PatternSynonyms #-}
module Graphics.GL.Ext.EXT.Multisample (
gl_EXT_multisample
, glSampleMaskEXT
, glSamplePatternEXT
, pattern GL_1PASS_EXT
, pattern GL_2PASS_0_EXT
, pattern GL_2PASS_1_EXT
, pattern GL_4PASS_0_EXT
, pattern GL_4PASS_1_EXT
, pattern GL_4PASS_2_EXT
, pattern GL_4PASS_3_EXT
, pattern GL_MULTISAMPLE_BIT_EXT
, pattern GL_MULTISAMPLE_EXT
, pattern GL_SAMPLES_EXT
, pattern GL_SAMPLE_ALPHA_TO_MASK_EXT
, pattern GL_SAMPLE_ALPHA_TO_ONE_EXT
, pattern GL_SAMPLE_BUFFERS_EXT
, pattern GL_SAMPLE_MASK_EXT
, pattern GL_SAMPLE_MASK_INVERT_EXT
, pattern GL_SAMPLE_MASK_VALUE_EXT
, pattern GL_SAMPLE_PATTERN_EXT
) 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.Internal.Shared
import Graphics.GL.Types
import System.IO.Unsafe
gl_EXT_multisample :: Bool
gl_EXT_multisample :: Bool
gl_EXT_multisample = String -> Set String -> Bool
forall a. Ord a => a -> Set a -> Bool
member String
"GL_EXT_multisample" Set String
extensions
{-# NOINLINE gl_EXT_multisample #-}
glSampleMaskEXT :: MonadIO m => GLclampf -> GLboolean -> m ()
glSampleMaskEXT :: forall (m :: * -> *). MonadIO m => GLclampf -> GLboolean -> m ()
glSampleMaskEXT = FunPtr (GLclampf -> GLboolean -> IO ())
-> GLclampf -> GLboolean -> m ()
forall (m :: * -> *).
MonadIO m =>
FunPtr (GLclampf -> GLboolean -> IO ())
-> GLclampf -> GLboolean -> m ()
fficlampfbooleanIOV FunPtr (GLclampf -> GLboolean -> IO ())
glSampleMaskEXTFunPtr
glSampleMaskEXTFunPtr :: FunPtr (GLclampf -> GLboolean -> IO ())
glSampleMaskEXTFunPtr :: FunPtr (GLclampf -> GLboolean -> IO ())
glSampleMaskEXTFunPtr = IO (FunPtr (GLclampf -> GLboolean -> IO ()))
-> FunPtr (GLclampf -> GLboolean -> IO ())
forall a. IO a -> a
unsafePerformIO (String -> IO (FunPtr (GLclampf -> GLboolean -> IO ()))
forall a. String -> IO (FunPtr a)
getProcAddress String
"glSampleMaskEXT")
{-# NOINLINE glSampleMaskEXTFunPtr #-}
glSamplePatternEXT :: MonadIO m => GLenum -> m ()
glSamplePatternEXT :: forall (m :: * -> *). MonadIO m => GLenum -> m ()
glSamplePatternEXT = FunPtr (GLenum -> IO ()) -> GLenum -> m ()
forall (m :: * -> *).
MonadIO m =>
FunPtr (GLenum -> IO ()) -> GLenum -> m ()
ffienumIOV FunPtr (GLenum -> IO ())
glSamplePatternEXTFunPtr
glSamplePatternEXTFunPtr :: FunPtr (GLenum -> IO ())
glSamplePatternEXTFunPtr :: FunPtr (GLenum -> IO ())
glSamplePatternEXTFunPtr = IO (FunPtr (GLenum -> IO ())) -> FunPtr (GLenum -> IO ())
forall a. IO a -> a
unsafePerformIO (String -> IO (FunPtr (GLenum -> IO ()))
forall a. String -> IO (FunPtr a)
getProcAddress String
"glSamplePatternEXT")
{-# NOINLINE glSamplePatternEXTFunPtr #-}
pattern GL_1PASS_EXT :: (Eq a, Num a) => a
pattern $mGL_1PASS_EXT :: forall {r} {a}.
(Eq a, Num a) =>
a -> ((# #) -> r) -> ((# #) -> r) -> r
$bGL_1PASS_EXT :: forall a. (Eq a, Num a) => a
GL_1PASS_EXT = 0x80A1
pattern GL_2PASS_0_EXT :: (Eq a, Num a) => a
pattern $mGL_2PASS_0_EXT :: forall {r} {a}.
(Eq a, Num a) =>
a -> ((# #) -> r) -> ((# #) -> r) -> r
$bGL_2PASS_0_EXT :: forall a. (Eq a, Num a) => a
GL_2PASS_0_EXT = 0x80A2
pattern GL_2PASS_1_EXT :: (Eq a, Num a) => a
pattern $mGL_2PASS_1_EXT :: forall {r} {a}.
(Eq a, Num a) =>
a -> ((# #) -> r) -> ((# #) -> r) -> r
$bGL_2PASS_1_EXT :: forall a. (Eq a, Num a) => a
GL_2PASS_1_EXT = 0x80A3
pattern GL_4PASS_0_EXT :: (Eq a, Num a) => a
pattern $mGL_4PASS_0_EXT :: forall {r} {a}.
(Eq a, Num a) =>
a -> ((# #) -> r) -> ((# #) -> r) -> r
$bGL_4PASS_0_EXT :: forall a. (Eq a, Num a) => a
GL_4PASS_0_EXT = 0x80A4
pattern GL_4PASS_1_EXT :: (Eq a, Num a) => a
pattern $mGL_4PASS_1_EXT :: forall {r} {a}.
(Eq a, Num a) =>
a -> ((# #) -> r) -> ((# #) -> r) -> r
$bGL_4PASS_1_EXT :: forall a. (Eq a, Num a) => a
GL_4PASS_1_EXT = 0x80A5
pattern GL_4PASS_2_EXT :: (Eq a, Num a) => a
pattern $mGL_4PASS_2_EXT :: forall {r} {a}.
(Eq a, Num a) =>
a -> ((# #) -> r) -> ((# #) -> r) -> r
$bGL_4PASS_2_EXT :: forall a. (Eq a, Num a) => a
GL_4PASS_2_EXT = 0x80A6
pattern GL_4PASS_3_EXT :: (Eq a, Num a) => a
pattern $mGL_4PASS_3_EXT :: forall {r} {a}.
(Eq a, Num a) =>
a -> ((# #) -> r) -> ((# #) -> r) -> r
$bGL_4PASS_3_EXT :: forall a. (Eq a, Num a) => a
GL_4PASS_3_EXT = 0x80A7
pattern GL_MULTISAMPLE_BIT_EXT :: (Eq a, Num a) => a
pattern $mGL_MULTISAMPLE_BIT_EXT :: forall {r} {a}.
(Eq a, Num a) =>
a -> ((# #) -> r) -> ((# #) -> r) -> r
$bGL_MULTISAMPLE_BIT_EXT :: forall a. (Eq a, Num a) => a
GL_MULTISAMPLE_BIT_EXT = 0x20000000
pattern GL_SAMPLES_EXT :: (Eq a, Num a) => a
pattern $mGL_SAMPLES_EXT :: forall {r} {a}.
(Eq a, Num a) =>
a -> ((# #) -> r) -> ((# #) -> r) -> r
$bGL_SAMPLES_EXT :: forall a. (Eq a, Num a) => a
GL_SAMPLES_EXT = 0x80A9
pattern GL_SAMPLE_ALPHA_TO_MASK_EXT :: (Eq a, Num a) => a
pattern $mGL_SAMPLE_ALPHA_TO_MASK_EXT :: forall {r} {a}.
(Eq a, Num a) =>
a -> ((# #) -> r) -> ((# #) -> r) -> r
$bGL_SAMPLE_ALPHA_TO_MASK_EXT :: forall a. (Eq a, Num a) => a
GL_SAMPLE_ALPHA_TO_MASK_EXT = 0x809E
pattern GL_SAMPLE_BUFFERS_EXT :: (Eq a, Num a) => a
pattern $mGL_SAMPLE_BUFFERS_EXT :: forall {r} {a}.
(Eq a, Num a) =>
a -> ((# #) -> r) -> ((# #) -> r) -> r
$bGL_SAMPLE_BUFFERS_EXT :: forall a. (Eq a, Num a) => a
GL_SAMPLE_BUFFERS_EXT = 0x80A8
pattern GL_SAMPLE_MASK_EXT :: (Eq a, Num a) => a
pattern $mGL_SAMPLE_MASK_EXT :: forall {r} {a}.
(Eq a, Num a) =>
a -> ((# #) -> r) -> ((# #) -> r) -> r
$bGL_SAMPLE_MASK_EXT :: forall a. (Eq a, Num a) => a
GL_SAMPLE_MASK_EXT = 0x80A0
pattern GL_SAMPLE_MASK_INVERT_EXT :: (Eq a, Num a) => a
pattern $mGL_SAMPLE_MASK_INVERT_EXT :: forall {r} {a}.
(Eq a, Num a) =>
a -> ((# #) -> r) -> ((# #) -> r) -> r
$bGL_SAMPLE_MASK_INVERT_EXT :: forall a. (Eq a, Num a) => a
GL_SAMPLE_MASK_INVERT_EXT = 0x80AB
pattern GL_SAMPLE_MASK_VALUE_EXT :: (Eq a, Num a) => a
pattern $mGL_SAMPLE_MASK_VALUE_EXT :: forall {r} {a}.
(Eq a, Num a) =>
a -> ((# #) -> r) -> ((# #) -> r) -> r
$bGL_SAMPLE_MASK_VALUE_EXT :: forall a. (Eq a, Num a) => a
GL_SAMPLE_MASK_VALUE_EXT = 0x80AA
pattern GL_SAMPLE_PATTERN_EXT :: (Eq a, Num a) => a
pattern $mGL_SAMPLE_PATTERN_EXT :: forall {r} {a}.
(Eq a, Num a) =>
a -> ((# #) -> r) -> ((# #) -> r) -> r
$bGL_SAMPLE_PATTERN_EXT :: forall a. (Eq a, Num a) => a
GL_SAMPLE_PATTERN_EXT = 0x80AC