-- This file was automatically generated.
{-# LANGUAGE CPP, ScopedTypeVariables, PatternSynonyms #-}
module Graphics.GL.Ext.SGIS.Multisample (
  -- * Extension Support
    gl_SGIS_multisample

  -- * GL_SGIS_multisample
  , glSampleMaskSGIS
  , glSamplePatternSGIS
  , pattern GL_1PASS_SGIS
  , pattern GL_2PASS_0_SGIS
  , pattern GL_2PASS_1_SGIS
  , pattern GL_4PASS_0_SGIS
  , pattern GL_4PASS_1_SGIS
  , pattern GL_4PASS_2_SGIS
  , pattern GL_4PASS_3_SGIS
  , pattern GL_MULTISAMPLE_SGIS
  , pattern GL_SAMPLES_SGIS
  , pattern GL_SAMPLE_ALPHA_TO_MASK_SGIS
  , pattern GL_SAMPLE_ALPHA_TO_ONE_SGIS
  , pattern GL_SAMPLE_BUFFERS_SGIS
  , pattern GL_SAMPLE_MASK_INVERT_SGIS
  , pattern GL_SAMPLE_MASK_SGIS
  , pattern GL_SAMPLE_MASK_VALUE_SGIS
  , pattern GL_SAMPLE_PATTERN_SGIS
) 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

-- | Checks that the <https://cvs.khronos.org/svn/repos/ogl/trunk/doc/registry/public/specs/SGIS/multisample.txt GL_SGIS_multisample> extension is available.

gl_SGIS_multisample :: Bool
gl_SGIS_multisample :: Bool
gl_SGIS_multisample = [Char] -> Set [Char] -> Bool
forall a. Ord a => a -> Set a -> Bool
member "GL_SGIS_multisample" Set [Char]
extensions
{-# NOINLINE gl_SGIS_multisample #-}

-- | Usage: @'glSampleMaskSGIS' value invert@
--
-- The parameter @value@ is a @ClampedFloat32@.
--
-- The parameter @invert@ is a @Boolean@, one of: 'Graphics.GL.Internal.Shared.GL_FALSE', 'Graphics.GL.Internal.Shared.GL_TRUE'.
--
-- This command is an alias for 'Graphics.GL.Ext.EXT.Multisample.glSampleMaskEXT'.


glSampleMaskSGIS :: MonadIO m => GLclampf -> GLboolean -> m ()
glSampleMaskSGIS :: GLclampf -> GLboolean -> m ()
glSampleMaskSGIS = FunPtr (GLclampf -> GLboolean -> IO ())
-> GLclampf -> GLboolean -> m ()
forall (m :: * -> *).
MonadIO m =>
FunPtr (GLclampf -> GLboolean -> IO ())
-> GLclampf -> GLboolean -> m ()
fficlampfbooleanIOV FunPtr (GLclampf -> GLboolean -> IO ())
glSampleMaskSGISFunPtr

glSampleMaskSGISFunPtr :: FunPtr (GLclampf -> GLboolean -> IO ())
glSampleMaskSGISFunPtr :: FunPtr (GLclampf -> GLboolean -> IO ())
glSampleMaskSGISFunPtr = IO (FunPtr (GLclampf -> GLboolean -> IO ()))
-> FunPtr (GLclampf -> GLboolean -> IO ())
forall a. IO a -> a
unsafePerformIO ([Char] -> IO (FunPtr (GLclampf -> GLboolean -> IO ()))
forall a. [Char] -> IO (FunPtr a)
getProcAddress "glSampleMaskSGIS")

{-# NOINLINE glSampleMaskSGISFunPtr #-}

-- | Usage: @'glSamplePatternSGIS' pattern@
--
-- The parameter @pattern@ is a @SamplePatternSGIS@, one of: 'Graphics.GL.Ext.EXT.Multisample.GL_1PASS_EXT', 'Graphics.GL.Ext.SGIS.Multisample.GL_1PASS_SGIS', 'Graphics.GL.Ext.EXT.Multisample.GL_2PASS_0_EXT', 'Graphics.GL.Ext.SGIS.Multisample.GL_2PASS_0_SGIS', 'Graphics.GL.Ext.EXT.Multisample.GL_2PASS_1_EXT', 'Graphics.GL.Ext.SGIS.Multisample.GL_2PASS_1_SGIS', 'Graphics.GL.Ext.EXT.Multisample.GL_4PASS_0_EXT', 'Graphics.GL.Ext.SGIS.Multisample.GL_4PASS_0_SGIS', 'Graphics.GL.Ext.EXT.Multisample.GL_4PASS_1_EXT', 'Graphics.GL.Ext.SGIS.Multisample.GL_4PASS_1_SGIS', 'Graphics.GL.Ext.EXT.Multisample.GL_4PASS_2_EXT', 'Graphics.GL.Ext.SGIS.Multisample.GL_4PASS_2_SGIS', 'Graphics.GL.Ext.EXT.Multisample.GL_4PASS_3_EXT', 'Graphics.GL.Ext.SGIS.Multisample.GL_4PASS_3_SGIS'.
--
-- This command is an alias for 'Graphics.GL.Ext.EXT.Multisample.glSamplePatternEXT'.


glSamplePatternSGIS :: MonadIO m => GLenum -> m ()
glSamplePatternSGIS :: GLenum -> m ()
glSamplePatternSGIS = FunPtr (GLenum -> IO ()) -> GLenum -> m ()
forall (m :: * -> *).
MonadIO m =>
FunPtr (GLenum -> IO ()) -> GLenum -> m ()
ffienumIOV FunPtr (GLenum -> IO ())
glSamplePatternSGISFunPtr

glSamplePatternSGISFunPtr :: FunPtr (GLenum -> IO ())
glSamplePatternSGISFunPtr :: FunPtr (GLenum -> IO ())
glSamplePatternSGISFunPtr = IO (FunPtr (GLenum -> IO ())) -> FunPtr (GLenum -> IO ())
forall a. IO a -> a
unsafePerformIO ([Char] -> IO (FunPtr (GLenum -> IO ()))
forall a. [Char] -> IO (FunPtr a)
getProcAddress "glSamplePatternSGIS")

{-# NOINLINE glSamplePatternSGISFunPtr #-}

pattern $bGL_1PASS_SGIS :: a
$mGL_1PASS_SGIS :: forall r a. (Eq a, Num a) => a -> (Void# -> r) -> (Void# -> r) -> r
GL_1PASS_SGIS = 0x80A1

pattern $bGL_2PASS_0_SGIS :: a
$mGL_2PASS_0_SGIS :: forall r a. (Eq a, Num a) => a -> (Void# -> r) -> (Void# -> r) -> r
GL_2PASS_0_SGIS = 0x80A2

pattern $bGL_2PASS_1_SGIS :: a
$mGL_2PASS_1_SGIS :: forall r a. (Eq a, Num a) => a -> (Void# -> r) -> (Void# -> r) -> r
GL_2PASS_1_SGIS = 0x80A3

pattern $bGL_4PASS_0_SGIS :: a
$mGL_4PASS_0_SGIS :: forall r a. (Eq a, Num a) => a -> (Void# -> r) -> (Void# -> r) -> r
GL_4PASS_0_SGIS = 0x80A4

pattern $bGL_4PASS_1_SGIS :: a
$mGL_4PASS_1_SGIS :: forall r a. (Eq a, Num a) => a -> (Void# -> r) -> (Void# -> r) -> r
GL_4PASS_1_SGIS = 0x80A5

pattern $bGL_4PASS_2_SGIS :: a
$mGL_4PASS_2_SGIS :: forall r a. (Eq a, Num a) => a -> (Void# -> r) -> (Void# -> r) -> r
GL_4PASS_2_SGIS = 0x80A6

pattern $bGL_4PASS_3_SGIS :: a
$mGL_4PASS_3_SGIS :: forall r a. (Eq a, Num a) => a -> (Void# -> r) -> (Void# -> r) -> r
GL_4PASS_3_SGIS = 0x80A7

pattern $bGL_MULTISAMPLE_SGIS :: a
$mGL_MULTISAMPLE_SGIS :: forall r a. (Eq a, Num a) => a -> (Void# -> r) -> (Void# -> r) -> r
GL_MULTISAMPLE_SGIS = 0x809D

pattern $bGL_SAMPLES_SGIS :: a
$mGL_SAMPLES_SGIS :: forall r a. (Eq a, Num a) => a -> (Void# -> r) -> (Void# -> r) -> r
GL_SAMPLES_SGIS = 0x80A9

pattern $bGL_SAMPLE_ALPHA_TO_MASK_SGIS :: a
$mGL_SAMPLE_ALPHA_TO_MASK_SGIS :: forall r a. (Eq a, Num a) => a -> (Void# -> r) -> (Void# -> r) -> r
GL_SAMPLE_ALPHA_TO_MASK_SGIS = 0x809E

pattern $bGL_SAMPLE_ALPHA_TO_ONE_SGIS :: a
$mGL_SAMPLE_ALPHA_TO_ONE_SGIS :: forall r a. (Eq a, Num a) => a -> (Void# -> r) -> (Void# -> r) -> r
GL_SAMPLE_ALPHA_TO_ONE_SGIS = 0x809F

pattern $bGL_SAMPLE_BUFFERS_SGIS :: a
$mGL_SAMPLE_BUFFERS_SGIS :: forall r a. (Eq a, Num a) => a -> (Void# -> r) -> (Void# -> r) -> r
GL_SAMPLE_BUFFERS_SGIS = 0x80A8

pattern $bGL_SAMPLE_MASK_INVERT_SGIS :: a
$mGL_SAMPLE_MASK_INVERT_SGIS :: forall r a. (Eq a, Num a) => a -> (Void# -> r) -> (Void# -> r) -> r
GL_SAMPLE_MASK_INVERT_SGIS = 0x80AB

pattern $bGL_SAMPLE_MASK_SGIS :: a
$mGL_SAMPLE_MASK_SGIS :: forall r a. (Eq a, Num a) => a -> (Void# -> r) -> (Void# -> r) -> r
GL_SAMPLE_MASK_SGIS = 0x80A0

pattern $bGL_SAMPLE_MASK_VALUE_SGIS :: a
$mGL_SAMPLE_MASK_VALUE_SGIS :: forall r a. (Eq a, Num a) => a -> (Void# -> r) -> (Void# -> r) -> r
GL_SAMPLE_MASK_VALUE_SGIS = 0x80AA

pattern $bGL_SAMPLE_PATTERN_SGIS :: a
$mGL_SAMPLE_PATTERN_SGIS :: forall r a. (Eq a, Num a) => a -> (Void# -> r) -> (Void# -> r) -> r
GL_SAMPLE_PATTERN_SGIS = 0x80AC