Distinguishes between wall facing, directions

This commit is contained in:
Seabass 2019-10-05 13:23:25 -04:00
parent 4dbf9b00c1
commit c0a8706e3b
1 changed files with 9 additions and 2 deletions

View File

@ -1,6 +1,7 @@
module Game.Game module Game.Game
type direction =
type wallType =
| NS | NS
| EW | EW
| NE | NE
@ -9,8 +10,14 @@ type direction =
| SW | SW
| Corner | Corner
type direction =
| North
| South
| East
| West
type env = type env =
| Wall of direction | Wall of wallType
| Floor | Floor
| Trap | Trap
| Player | Player