diff options
| author | Griffin Smith <root@gws.fyi> | 2019-09-15T17·00-0400 |
|---|---|---|
| committer | Griffin Smith <root@gws.fyi> | 2019-09-15T21·30-0400 |
| commit | 58fce2ec1976b957c7e24a282964c62f7ddf7b02 (patch) | |
| tree | d7746cd93bcdda4faac465574ae66ea6b481d106 /src/Xanthous/Generators/Util.hs | |
| parent | 6678ac986c0ccdc2a809da4fc99de7bcc0eb21f4 (diff) | |
Progressively reveal the map to the player
As the character walks around the map, progressively reveal the entities on the map to them, using an algorithm based on well known circle-rasterizing and line-rasterizing algorithms to calculate lines of sight that are potentially obscured by walls.
Diffstat (limited to 'src/Xanthous/Generators/Util.hs')
| -rw-r--r-- | src/Xanthous/Generators/Util.hs | 8 |
1 files changed, 0 insertions, 8 deletions
diff --git a/src/Xanthous/Generators/Util.hs b/src/Xanthous/Generators/Util.hs index 6a2d27839cf6..e399ca5d4936 100644 --- a/src/Xanthous/Generators/Util.hs +++ b/src/Xanthous/Generators/Util.hs @@ -104,14 +104,6 @@ fillOuterEdgesM arr = do writeArray arr (minX, y) True writeArray arr (maxX, y) True -safeGet :: (IArray a e, Ix i) => a i e -> i -> Maybe e -safeGet arr idx = - let (minIdx, maxIdx) = bounds arr - in if idx < minIdx || idx > maxIdx - then Nothing - else Just $ arr ! idx - - cloneMArray :: forall a a' i e m. ( Ix i |