module Graphics.GL.Ext.NV.PolygonMode (
gl_NV_polygon_mode
, glPolygonModeNV
, pattern GL_FILL_NV
, pattern GL_LINE_NV
, pattern GL_POINT_NV
, pattern GL_POLYGON_MODE_NV
, pattern GL_POLYGON_OFFSET_LINE_NV
, pattern GL_POLYGON_OFFSET_POINT_NV
) 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_NV_polygon_mode :: Bool
gl_NV_polygon_mode = member "GL_NV_polygon_mode" extensions
glPolygonModeNV :: MonadIO m => GLenum -> GLenum -> m ()
glPolygonModeNV = ffienumenumIOV glPolygonModeNVFunPtr
glPolygonModeNVFunPtr :: FunPtr (GLenum -> GLenum -> IO ())
glPolygonModeNVFunPtr = unsafePerformIO (getProcAddress "glPolygonModeNV")
pattern GL_FILL_NV = 0x1B02
pattern GL_LINE_NV = 0x1B01
pattern GL_POINT_NV = 0x1B00
pattern GL_POLYGON_MODE_NV = 0x0B40
pattern GL_POLYGON_OFFSET_LINE_NV = 0x2A02
pattern GL_POLYGON_OFFSET_POINT_NV = 0x2A01