Add Read/Show instance for Creature

2022-07-22 10:44:54 +01:00
parent 4c5218c633
commit 6b69fc1684
35 changed files with 345 additions and 225 deletions
@@ -10,4 +10,5 @@ data CreatureState = CrSt
    , _csSpState :: CrSpState
    , _csDropsOnDeath :: CreatureDropType
    }
+ deriving (Eq,Ord,Show,Read)
 makeLenses ''CreatureState