Changed OpenGL-Lvl to 3.30 with Tessellation-Ext

- figured out how to enable extensions refs #471 @1h
2014-03-17 17:04:30 +01:00
parent 7b8201374b
commit 5fc86af233
6 changed files with 18 additions and 7 deletions
--- a/src/Types.hs
+++ b/src/Types.hs
@ -3,7 +3,7 @@ module Types where

 import           Control.Concurrent.STM               (TQueue)
 import qualified Graphics.Rendering.OpenGL.GL         as GL
-import           Graphics.UI.SDL                      as SDL (Event, Window)
+import           Graphics.UI.SDL                      as SDL (Event, Window, Texture)
 import           Foreign.C                            (CFloat)
 import           Data.Time                            (UTCTime)
 import Linear.Matrix (M44)
@ -88,6 +88,7 @@ data GLMapState = GLMapState

 data GLState = GLState
    { _glMap               :: !GLMapState
+    , _hudTexture      :: Maybe Texture
    }

 data State = State