this might have been the toilet bug

This commit is contained in:
nek0 2018-11-13 00:56:18 +01:00
parent a991f2436b
commit 9e077cec16

View file

@ -107,6 +107,20 @@ convertTileToImg mat = fromLists conversion
Just ImgEmpty
| otherwise ->
Nothing
Kitc
| any
(\(rr, cc) -> M.safeGet (irow + rr) (icol + cc) mat == Just Door)
[(1, 0), (-1, 0), (0, 1), (0, -1)] ->
Just ImgEmpty
| otherwise ->
Nothing
Toil
| any
(\(rr, cc) -> M.safeGet (irow + rr) (icol + cc) mat == Just Door)
[(1, 0), (-1, 0), (0, 1), (0, -1)] ->
Just ImgEmpty
| otherwise ->
Nothing
_ ->
Nothing