Broken implementation of window colours, move towards stencil ceilings

2025-10-29 21:48:09 +00:00
parent 40c1907689
commit c2e5aaa7a0
17 changed files with 76 additions and 85 deletions
@@ -32,7 +32,7 @@ updateEdgesWall is w =
    hack w'
        | null is = w'
        | otherwise =
-            (foldMap Sum $ w' ^.. cWorld . incGraph . each . each . seObstacles . to length)
+            foldMap Sum (w' ^.. cWorld . incGraph . each . each . seObstacles . to length)
                `seq` w'

 updateEdgesWall' :: S.Set (Int, Int) -> World -> World