{-# LANGUAGE CPP, ScopedTypeVariables, PatternSynonyms #-}
module Graphics.GL.Ext.EXT.CopyImage (
gl_EXT_copy_image
, glCopyImageSubDataEXT
) 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_copy_image :: Bool
gl_EXT_copy_image :: Bool
gl_EXT_copy_image = [Char] -> Set [Char] -> Bool
forall a. Ord a => a -> Set a -> Bool
member "GL_EXT_copy_image" Set [Char]
extensions
{-# NOINLINE gl_EXT_copy_image #-}
glCopyImageSubDataEXT :: MonadIO m => GLuint -> GLenum -> GLint -> GLint -> GLint -> GLint -> GLuint -> GLenum -> GLint -> GLint -> GLint -> GLint -> GLsizei -> GLsizei -> GLsizei -> m ()
glCopyImageSubDataEXT :: GLuint
-> GLuint
-> GLint
-> GLint
-> GLint
-> GLint
-> GLuint
-> GLuint
-> GLint
-> GLint
-> GLint
-> GLint
-> GLint
-> GLint
-> GLint
-> m ()
glCopyImageSubDataEXT = FunPtr
(GLuint
-> GLuint
-> GLint
-> GLint
-> GLint
-> GLint
-> GLuint
-> GLuint
-> GLint
-> GLint
-> GLint
-> GLint
-> GLint
-> GLint
-> GLint
-> IO ())
-> GLuint
-> GLuint
-> GLint
-> GLint
-> GLint
-> GLint
-> GLuint
-> GLuint
-> GLint
-> GLint
-> GLint
-> GLint
-> GLint
-> GLint
-> GLint
-> m ()
forall (m :: * -> *).
MonadIO m =>
FunPtr
(GLuint
-> GLuint
-> GLint
-> GLint
-> GLint
-> GLint
-> GLuint
-> GLuint
-> GLint
-> GLint
-> GLint
-> GLint
-> GLint
-> GLint
-> GLint
-> IO ())
-> GLuint
-> GLuint
-> GLint
-> GLint
-> GLint
-> GLint
-> GLuint
-> GLuint
-> GLint
-> GLint
-> GLint
-> GLint
-> GLint
-> GLint
-> GLint
-> m ()
ffiuintenumintintintintuintenumintintintintsizeisizeisizeiIOV FunPtr
(GLuint
-> GLuint
-> GLint
-> GLint
-> GLint
-> GLint
-> GLuint
-> GLuint
-> GLint
-> GLint
-> GLint
-> GLint
-> GLint
-> GLint
-> GLint
-> IO ())
glCopyImageSubDataEXTFunPtr
glCopyImageSubDataEXTFunPtr :: FunPtr (GLuint -> GLenum -> GLint -> GLint -> GLint -> GLint -> GLuint -> GLenum -> GLint -> GLint -> GLint -> GLint -> GLsizei -> GLsizei -> GLsizei -> IO ())
glCopyImageSubDataEXTFunPtr :: FunPtr
(GLuint
-> GLuint
-> GLint
-> GLint
-> GLint
-> GLint
-> GLuint
-> GLuint
-> GLint
-> GLint
-> GLint
-> GLint
-> GLint
-> GLint
-> GLint
-> IO ())
glCopyImageSubDataEXTFunPtr = IO
(FunPtr
(GLuint
-> GLuint
-> GLint
-> GLint
-> GLint
-> GLint
-> GLuint
-> GLuint
-> GLint
-> GLint
-> GLint
-> GLint
-> GLint
-> GLint
-> GLint
-> IO ()))
-> FunPtr
(GLuint
-> GLuint
-> GLint
-> GLint
-> GLint
-> GLint
-> GLuint
-> GLuint
-> GLint
-> GLint
-> GLint
-> GLint
-> GLint
-> GLint
-> GLint
-> IO ())
forall a. IO a -> a
unsafePerformIO ([Char]
-> IO
(FunPtr
(GLuint
-> GLuint
-> GLint
-> GLint
-> GLint
-> GLint
-> GLuint
-> GLuint
-> GLint
-> GLint
-> GLint
-> GLint
-> GLint
-> GLint
-> GLint
-> IO ()))
forall a. [Char] -> IO (FunPtr a)
getProcAddress "glCopyImageSubDataEXT")
{-# NOINLINE glCopyImageSubDataEXTFunPtr #-}