module Graphics.GL.Ext.EXT.PrimitiveBoundingBox (
gl_EXT_primitive_bounding_box
, glPrimitiveBoundingBoxEXT
, pattern GL_PRIMITIVE_BOUNDING_BOX_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_primitive_bounding_box :: Bool
gl_EXT_primitive_bounding_box = member "GL_EXT_primitive_bounding_box" extensions
glPrimitiveBoundingBoxEXT :: MonadIO m => GLfloat -> GLfloat -> GLfloat -> GLfloat -> GLfloat -> GLfloat -> GLfloat -> GLfloat -> m ()
glPrimitiveBoundingBoxEXT = ffifloatfloatfloatfloatfloatfloatfloatfloatIOV glPrimitiveBoundingBoxEXTFunPtr
glPrimitiveBoundingBoxEXTFunPtr :: FunPtr (GLfloat -> GLfloat -> GLfloat -> GLfloat -> GLfloat -> GLfloat -> GLfloat -> GLfloat -> IO ())
glPrimitiveBoundingBoxEXTFunPtr = unsafePerformIO (getProcAddress "glPrimitiveBoundingBoxEXT")
pattern GL_PRIMITIVE_BOUNDING_BOX_EXT = 0x92BE