Move machine destruction to external function

2022-07-14 12:48:52 +01:00
parent 79791d0df2
commit f05d284312
7 changed files with 57 additions and 23 deletions
@@ -0,0 +1,13 @@
+module Dodge.Data.Object where
+
+data Object
+    = ObTerminal
+    | ObCreature
+    | ObMachine
+    | ObWall
+    | ObDoor
+    | ObButton
+    | ObForegroundShape
+    | ObLightSource
+    | ObProp
+  deriving (Eq,Show,Ord,Read,Enum,Bounded)