summaryrefslogtreecommitdiffstats
path: root/src/Level.hs
diff options
context:
space:
mode:
authorMatthias Schiffer <matthias@gamezock.de>2010-03-09 03:49:15 +0100
committerMatthias Schiffer <matthias@gamezock.de>2010-03-09 03:49:15 +0100
commit7327695ca3d9aee5da1d0bc98572d877dd8c8546 (patch)
treee733714968ae0a041f76b213ffe31cca70ada6fb /src/Level.hs
parent2bb85618366681c7c97f8b36cc85a18c45beb924 (diff)
downloadhtanks-7327695ca3d9aee5da1d0bc98572d877dd8c8546.tar
htanks-7327695ca3d9aee5da1d0bc98572d877dd8c8546.zip
Moved source files to src directory
Diffstat (limited to 'src/Level.hs')
-rw-r--r--src/Level.hs18
1 files changed, 18 insertions, 0 deletions
diff --git a/src/Level.hs b/src/Level.hs
new file mode 100644
index 0000000..c99a4b5
--- /dev/null
+++ b/src/Level.hs
@@ -0,0 +1,18 @@
+module Level ( Level(..)
+ , testLevel
+ ) where
+
+import Data.List
+
+data Level = Level
+ { levelWidth :: !Int
+ , levelHeight :: !Int
+ } deriving (Show)
+
+
+
+testLevel :: Level
+testLevel = Level
+ { levelWidth = 10
+ , levelHeight = 10
+ } \ No newline at end of file