-- This file was automatically generated.
{-# LANGUAGE ScopedTypeVariables, PatternSynonyms #-}
module Graphics.GL.Raw.Extension.NV.DrawTexture (
  -- * Extension Support
    gl_NV_draw_texture

  -- * GL_NV_draw_texture
  , glDrawTextureNV
) where

import Control.Monad.IO.Class
import Data.Set
import Foreign.Ptr
import Graphics.GL.Raw.Internal.FFI
import Graphics.GL.Raw.Internal.Proc
import Graphics.GL.Raw.Types
import System.IO.Unsafe

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

gl_NV_draw_texture :: Bool
gl_NV_draw_texture = member "GL_NV_draw_texture" extensions
{-# NOINLINE gl_NV_draw_texture #-}

-- | Usage: @'glDrawTextureNV' texture sampler x0 y0 x1 y1 z s0 t0 s1 t1@


glDrawTextureNV :: MonadIO m => GLuint -> GLuint -> GLfloat -> GLfloat -> GLfloat -> GLfloat -> GLfloat -> GLfloat -> GLfloat -> GLfloat -> GLfloat -> m ()
glDrawTextureNV = ffiuintuintfloatfloatfloatfloatfloatfloatfloatfloatfloatIOV glDrawTextureNVFunPtr

glDrawTextureNVFunPtr :: FunPtr (GLuint -> GLuint -> GLfloat -> GLfloat -> GLfloat -> GLfloat -> GLfloat -> GLfloat -> GLfloat -> GLfloat -> GLfloat -> IO ())
glDrawTextureNVFunPtr = unsafePerformIO (getProcAddress "glDrawTextureNV")

{-# NOINLINE glDrawTextureNVFunPtr #-}