{-# LANGUAGE CPP, ScopedTypeVariables, PatternSynonyms #-}
module Graphics.GL.Ext.EXT.BlendMinmax (
gl_EXT_blend_minmax
, glBlendEquationEXT
, pattern GL_BLEND_EQUATION_EXT
, pattern GL_FUNC_ADD_EXT
, pattern GL_MAX_EXT
, pattern GL_MIN_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.Types
import System.IO.Unsafe
gl_EXT_blend_minmax :: Bool
gl_EXT_blend_minmax = member "GL_EXT_blend_minmax" extensions
{-# NOINLINE gl_EXT_blend_minmax #-}
glBlendEquationEXT :: MonadIO m => GLenum -> m ()
glBlendEquationEXT = ffienumIOV glBlendEquationEXTFunPtr
glBlendEquationEXTFunPtr :: FunPtr (GLenum -> IO ())
glBlendEquationEXTFunPtr = unsafePerformIO (getProcAddress "glBlendEquationEXT")
{-# NOINLINE glBlendEquationEXTFunPtr #-}
pattern GL_BLEND_EQUATION_EXT = 0x8009
pattern GL_FUNC_ADD_EXT = 0x8006
pattern GL_MAX_EXT = 0x8008
pattern GL_MIN_EXT = 0x8007