Move toward implementing chasms

2025-07-30 00:01:07 +01:00
parent fa377171a4
commit 210171fbc9
10 changed files with 327 additions and 317 deletions
@@ -55,6 +55,7 @@ data PSType
    | PutNothing
    | PutUsingGenParams (World -> (World, PSType))
    | PutID {_putID :: Int}
+    | PutChasm {_putChasmPoly :: [Point2]}

 -- maybe there is a monadic implementation of this?
 -- add room effect for any placement spot?