Make obstacles block pathing

2022-06-30 23:59:07 +01:00
parent 56b063544c
commit ed33b4ff2b
7 changed files with 18 additions and 37 deletions
@@ -22,6 +22,7 @@ data EdgeObstacle
    = BlockObstacle
    | DoorObstacle
    | AutoDoorObstacle
+    | WallObstacle
  deriving (Eq,Ord,Show,Bounded,Enum)

 makeLenses ''PathGraph