{-# LANGUAGE CPP, ScopedTypeVariables, PatternSynonyms #-}
module Graphics.GL.Ext.EXT.UnpackSubimage (
gl_EXT_unpack_subimage
, pattern GL_UNPACK_ROW_LENGTH_EXT
, pattern GL_UNPACK_SKIP_PIXELS_EXT
, pattern GL_UNPACK_SKIP_ROWS_EXT
) where
import Data.Set
import Graphics.GL.Internal.Proc
gl_EXT_unpack_subimage :: Bool
gl_EXT_unpack_subimage :: Bool
gl_EXT_unpack_subimage = String -> Set String -> Bool
forall a. Ord a => a -> Set a -> Bool
member String
"GL_EXT_unpack_subimage" Set String
extensions
{-# NOINLINE gl_EXT_unpack_subimage #-}
pattern GL_UNPACK_ROW_LENGTH_EXT :: (Eq a, Num a) => a
pattern $mGL_UNPACK_ROW_LENGTH_EXT :: forall {r} {a}.
(Eq a, Num a) =>
a -> ((# #) -> r) -> ((# #) -> r) -> r
$bGL_UNPACK_ROW_LENGTH_EXT :: forall a. (Eq a, Num a) => a
GL_UNPACK_ROW_LENGTH_EXT = 0x0CF2
pattern GL_UNPACK_SKIP_PIXELS_EXT :: (Eq a, Num a) => a
pattern $mGL_UNPACK_SKIP_PIXELS_EXT :: forall {r} {a}.
(Eq a, Num a) =>
a -> ((# #) -> r) -> ((# #) -> r) -> r
$bGL_UNPACK_SKIP_PIXELS_EXT :: forall a. (Eq a, Num a) => a
GL_UNPACK_SKIP_PIXELS_EXT = 0x0CF4
pattern GL_UNPACK_SKIP_ROWS_EXT :: (Eq a, Num a) => a
pattern $mGL_UNPACK_SKIP_ROWS_EXT :: forall {r} {a}.
(Eq a, Num a) =>
a -> ((# #) -> r) -> ((# #) -> r) -> r
$bGL_UNPACK_SKIP_ROWS_EXT :: forall a. (Eq a, Num a) => a
GL_UNPACK_SKIP_ROWS_EXT = 0x0CF3