Move universe IO effects outside of world

This commit is contained in:
2022-07-23 12:53:20 +01:00
parent 2892bb25f0
commit 12fad676f2
12 changed files with 41 additions and 44 deletions
-1
View File
@@ -27,7 +27,6 @@ initialWorld = defaultWorld
, _randGen = mkStdGen 2
, _mousePos = V2 0 0
, _yourID = 0
, _sideEffects = return
, _worldEvents = SoundStart BackgroundSound (V2 0 0) foamSprayFadeOutS Nothing
: [MakeStartCloudAt (V3 x y 5) | x <- [-5,-4..5] , y <- [-5,-4..5]]
, _pressPlates = IM.empty