{-# LANGUAGE CPP, ScopedTypeVariables, PatternSynonyms #-}
module Graphics.GL.Ext.SGIS.TextureEdgeClamp (
gl_SGIS_texture_edge_clamp
, pattern GL_CLAMP_TO_EDGE_SGIS
) where
import Data.Set
import Graphics.GL.Internal.Proc
gl_SGIS_texture_edge_clamp :: Bool
gl_SGIS_texture_edge_clamp :: Bool
gl_SGIS_texture_edge_clamp = [Char] -> Set [Char] -> Bool
forall a. Ord a => a -> Set a -> Bool
member "GL_SGIS_texture_edge_clamp" Set [Char]
extensions
{-# NOINLINE gl_SGIS_texture_edge_clamp #-}
pattern $bGL_CLAMP_TO_EDGE_SGIS :: a
$mGL_CLAMP_TO_EDGE_SGIS :: forall r a. (Eq a, Num a) => a -> (Void# -> r) -> (Void# -> r) -> r
GL_CLAMP_TO_EDGE_SGIS = 0x812F