diff options
| author | Matthias Schiffer <matthias@gamezock.de> | 2010-04-10 14:17:08 +0200 |
|---|---|---|
| committer | Matthias Schiffer <matthias@gamezock.de> | 2010-04-10 14:17:08 +0200 |
| commit | 546da85814945ed2188e670ddf9c2dfd409d6241 (patch) | |
| tree | 266627f8d0de15a5507ebb441e8ad9091be10510 /src/Game.hs | |
| parent | 083619cc87aa24b6ad32b92cf40798efc11d4ff9 (diff) | |
| download | htanks-546da85814945ed2188e670ddf9c2dfd409d6241.tar htanks-546da85814945ed2188e670ddf9c2dfd409d6241.zip | |
Added player cursor
Diffstat (limited to 'src/Game.hs')
| -rw-r--r-- | src/Game.hs | 3 |
1 files changed, 0 insertions, 3 deletions
diff --git a/src/Game.hs b/src/Game.hs index 623e3ad..21fe6cd 100644 --- a/src/Game.hs +++ b/src/Game.hs @@ -8,12 +8,10 @@ module Game ( Bullet(..) import Level import Tank -import Texture import Control.Monad import Control.Monad.State import Data.Fixed -import qualified Data.Map as M data Bullet = Bullet @@ -29,7 +27,6 @@ data GameState = GameState { level :: !Level , tanks :: ![Tank] , bullets :: ![Bullet] - , textures :: !(M.Map Texture TextureObject) } deriving (Show) newtype Game a = Game (StateT GameState IO a) |