Allow creation of items via typed command

This commit is contained in:
2022-06-19 11:04:16 +01:00
parent 075d4b1164
commit 6cc29813d8
7 changed files with 61 additions and 39 deletions
+3 -3
View File
@@ -64,7 +64,7 @@ data CraftType
| TIMEMODULE
| SIZEMODULE
| GRAVITYMODULE
deriving (Eq,Ord,Show,Enum)
deriving (Eq,Ord,Show,Enum,Read)
-- TODO make this an enum somehow...?
data ItemBaseType
@@ -164,7 +164,7 @@ data ItemBaseType
| MEDKIT Int
| CRAFT CraftType
--
deriving (Eq,Ord,Show)
deriving (Eq,Ord,Show,Read)
data ItemModuleType
= EMPTYMODULE
@@ -193,7 +193,7 @@ data Detector
= ITEMDETECTOR
| CREATUREDETECTOR
| WALLDETECTOR
deriving (Eq,Ord,Show)
deriving (Eq,Ord,Show,Read)
data ModuleSlot
= ModBullet