Added 3D models

src/MainLoop.hs

@@ -9,6 +9,7 @@ import Game
 import GLDriver
 import Player
 import Texture
+import Model
 
 import Control.Monad.State
 import Control.Monad.Trans
@@ -22,6 +23,7 @@ data MainState = MainState
                , time      :: !UTCTime
                , players   :: ![SomePlayer]
                , textures  :: !(M.Map Texture TextureObject)
+               , models    :: !(M.Map Model InterleavedObj)
                , gameState :: !GameState
                }