justin/loop
1
0
Fork 0
Code Issues Pull Requests 1 Packages Projects Releases Wiki Activity

Move towards serializing saves/loads faster

Browse Source
This commit is contained in:
justin
2022-08-19 11:12:43 +01:00
parent c74d3b04bf
commit 9df0fa8692
38 changed files with 542 additions and 384 deletions
Download Patch File Download Diff File Expand all files Collapse all files
src/Dodge/Save.hs
+1 -1
View File
@@ -47,7 +47,7 @@ saveSlotPath QuicksaveSlot = "saveSlot/QuickSave"
saveSlotPath (LevelStartSlot i) = "saveSlot/LevelStart" ++ show i
saveWorldInSlot :: SaveSlot -> Universe -> Universe
saveWorldInSlot slot u = tryConcEffect False "ASDF" (writeSaveSlot slot u) u
saveWorldInSlot slot u = tryConcEffect False "SAVING" (writeSaveSlot slot u) u
reloadLevelStart :: Universe -> Universe
reloadLevelStart = loadSaveSlot (LevelStartSlot 0)