diff options
author | Joris Guyonvarch | 2015-03-08 13:26:52 +0100 |
---|---|---|
committer | Joris Guyonvarch | 2015-03-08 13:29:01 +0100 |
commit | 97e494a7c5a105bba6a48f5025e71a376fc8673d (patch) | |
tree | 9cd83b9fedfa4787e6237fadce4dfd2d43faa0d6 /src/Update/Update.elm | |
parent | 6c1f5e10631a3f66f4c85a45b6f28ffd366105c5 (diff) |
Save round durations
Diffstat (limited to 'src/Update/Update.elm')
-rw-r--r-- | src/Update/Update.elm | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/src/Update/Update.elm b/src/Update/Update.elm index ef85670..7cf4dee 100644 --- a/src/Update/Update.elm +++ b/src/Update/Update.elm @@ -13,6 +13,7 @@ import Model.Vec2 (..) import Model.Config (otherConfig) import Model.Cloud (..) import Model.Game (..) +import Model.Round (Round) import Utils.Geometry (..) import Utils.Physics (getNewPosAndSpeed) @@ -30,7 +31,7 @@ update input game = | time <- 0 , currentScore <- 0 , cloud <- initCloud - , scores <- game.currentScore :: game.scores + , rounds <- (Round game.time game.currentScore) :: game.rounds } else let newTime = game.time + input.delta |