diff options
Diffstat (limited to 'src/Xanthous/Game/Arbitrary.hs')
| -rw-r--r-- | src/Xanthous/Game/Arbitrary.hs | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/src/Xanthous/Game/Arbitrary.hs b/src/Xanthous/Game/Arbitrary.hs index 090eba634d4b..f4c83e005146 100644 --- a/src/Xanthous/Game/Arbitrary.hs +++ b/src/Xanthous/Game/Arbitrary.hs @@ -26,6 +26,7 @@ instance Arbitrary GameState where _revealedPositions <- fmap setFromList . sublistOf $ EntityMap.positions _entities _randomGen <- mkStdGen <$> arbitrary let _promptState = NoPrompt -- TODO + _activePanel <- arbitrary _debugState <- arbitrary pure $ GameState {..} |