diff options
Diffstat (limited to 'src/MainLoop.hs')
-rw-r--r-- | src/MainLoop.hs | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/src/MainLoop.hs b/src/MainLoop.hs index 94b5e9d..0ebaa53 100644 --- a/src/MainLoop.hs +++ b/src/MainLoop.hs @@ -9,10 +9,12 @@ module MainLoop ( MainState(..) import Game import GLDriver import Player +import Texture import Control.Monad.State import Control.Monad.Trans import Data.Time +import qualified Data.Map as M data MainState = MainState @@ -20,6 +22,7 @@ data MainState = MainState , driver :: !SomeDriver , time :: !UTCTime , players :: ![SomePlayer] + , textures :: !(M.Map Texture TextureObject) } newtype MainT m a = MainT (StateT MainState m a) |