From b4c3367c63459607f0919e77998d5405634e2003 Mon Sep 17 00:00:00 2001
From: Matthias Schiffer <matthias@gamezock.de>
Date: Thu, 25 Feb 2010 02:15:26 +0100
Subject: Added texture loading

---
 Tank.hs | 9 +++++----
 1 file changed, 5 insertions(+), 4 deletions(-)

(limited to 'Tank.hs')

diff --git a/Tank.hs b/Tank.hs
index 54322cf..28f286c 100644
--- a/Tank.hs
+++ b/Tank.hs
@@ -4,8 +4,9 @@ module Tank ( Tank(..)
 import Data.Fixed
 
 data Tank = Tank
-          { posx :: !Micro
-          , posy :: !Micro
-          , dir  :: !Micro
-          , aim  :: !Micro
+          { posx  :: !Micro
+          , posy  :: !Micro
+          , dir   :: !Micro
+          , aim   :: !Micro
+          , speed :: !Micro
           } deriving Show
-- 
cgit v1.2.3