From 4db3a68efec079bdb8723f377929bfa05860bdc2 Mon Sep 17 00:00:00 2001 From: Griffin Smith Date: Fri, 20 Sep 2019 13:14:55 -0400 Subject: Add doors and an open command Add a Door entity and an Open command, which necessitated supporting the direction prompt. Currently nothing actually puts doors on the map, which puts a slight damper on actually testing this out. --- src/Xanthous/Entities/RawTypes.hs | 5 +++++ 1 file changed, 5 insertions(+) (limited to 'src/Xanthous/Entities/RawTypes.hs') diff --git a/src/Xanthous/Entities/RawTypes.hs b/src/Xanthous/Entities/RawTypes.hs index 1546d85e4562..94f650545325 100644 --- a/src/Xanthous/Entities/RawTypes.hs +++ b/src/Xanthous/Entities/RawTypes.hs @@ -36,7 +36,12 @@ data CreatureType = CreatureType via WithOptions '[ FieldLabelModifier '[Drop 1] ] CreatureType makeFieldsNoPrefix ''CreatureType + +instance Arbitrary CreatureType where + arbitrary = genericArbitrary + -------------------------------------------------------------------------------- + data ItemType = ItemType { _name :: Text , _description :: Text -- cgit 1.4.1