Make Placement into a product type

2025-09-02 12:31:55 +01:00
parent dc13c61dca
commit f278af0f30
29 changed files with 168 additions and 168 deletions
@@ -85,7 +85,7 @@ data Placement
        , _plMID :: Maybe Int
        , _plIDCont :: World -> Placement -> Maybe Placement
        }
-    | RandomPlacement {_unRandomPlacement :: State StdGen Placement}
+--    | RandomPlacement {_unRandomPlacement :: State StdGen Placement}

 {- The '_rmPolys' lists which polygons should be cut out to form the indestructible walls of the room.
 Link pairs contain a position and rotation to attach to another room;