Commit before adding more debugging control

2025-10-26 16:55:22 +00:00
parent 0adf3f57b4
commit c641cbaa69
8 changed files with 171 additions and 128 deletions
@@ -118,6 +118,7 @@ pairsToIncGraph pairs =
    inodes = UV.generate (length ps) (ps !!)
    ps = Set.toList $ Set.map fst pairs <> Set.map snd pairs

+-- consider updating all path edges at the end of world generation?
 obstructPathsCrossing :: S.Set EdgeObstacle -> Point2 -> Point2 -> World -> World
 obstructPathsCrossing obs s e w = w & cWorld . incGraph %~ updateincedges
  where