summaryrefslogtreecommitdiffstats
path: root/src/HTanks.hs
diff options
context:
space:
mode:
authorMatthias Schiffer <matthias@gamezock.de>2010-03-17 17:55:03 +0100
committerMatthias Schiffer <matthias@gamezock.de>2010-03-17 17:55:03 +0100
commita1294859c7512f3416612f0911946e7768d95bdd (patch)
treec4e6a7d40e4c627620c2bcba1caa0e8f32120df8 /src/HTanks.hs
parent98ae7f48c5c041cad0ffebe3793b0c74e8378512 (diff)
downloadhtanks-a1294859c7512f3416612f0911946e7768d95bdd.tar
htanks-a1294859c7512f3416612f0911946e7768d95bdd.zip
Some optimizations
Diffstat (limited to 'src/HTanks.hs')
-rw-r--r--src/HTanks.hs4
1 files changed, 2 insertions, 2 deletions
diff --git a/src/HTanks.hs b/src/HTanks.hs
index c815992..15c3ed6 100644
--- a/src/HTanks.hs
+++ b/src/HTanks.hs
@@ -32,8 +32,8 @@ main = do
[ SomePlayer $ DefaultPlayer S.empty 0 0 False
, SomePlayer $ CPUPlayer 0
]}
- gameState = GameState {level = theLevel, tanks = [ Tank 5.0 5.0 0 0 2 270 False 3 2 5
- , Tank 5.0 3.5 0 0 2 270 False 3 2 5
+ gameState = GameState {level = theLevel, tanks = [ Tank 5.0 5.0 0 0 2 270 False 3 1 5
+ , Tank 5.0 3.5 0 0 2 270 False 3 1 5
], bullets = [], textures = M.empty}
runGame gameState $ do