Move towards serializing saves/loads faster

2022-08-19 11:12:43 +01:00
parent c74d3b04bf
commit 9df0fa8692
38 changed files with 542 additions and 384 deletions
@@ -28,6 +28,7 @@ generateWorldFromSeed i = do
        postGenerationProcessing $
            _gwWorld (generateLevelFromRoomList roomList initialWorld{_randGen = mkStdGen i})
                & cWorld . roomClipping .~ bounds
+                & cWorld . cwSeed .~ i

 postGenerationProcessing :: World -> World
 postGenerationProcessing w = foldl' assignPushDoors w (_doors (_cWorld w))