diff options
| author | Joris Guyonvarch | 2015-05-10 16:59:08 +0200 |
|---|---|---|
| committer | Joris Guyonvarch | 2015-05-10 16:59:08 +0200 |
| commit | 5af770bd99dbb57d78857236c054bc0a6dc4bdfd (patch) | |
| tree | a15a021df539302767281296c66bb8fdf2d0bae1 /src/Model/Game.elm | |
| parent | d5ec91d4d01db6f4d476522d5b14e116435ebb7d (diff) | |
Updating elm version to 0.15
Diffstat (limited to 'src/Model/Game.elm')
| -rw-r--r-- | src/Model/Game.elm | 24 |
1 files changed, 13 insertions, 11 deletions
diff --git a/src/Model/Game.elm b/src/Model/Game.elm index 3520c64..8769651 100644 --- a/src/Model/Game.elm +++ b/src/Model/Game.elm @@ -3,21 +3,23 @@ module Model.Game , initialGame ) where -import Random (..) -import Keyboard (KeyCode) -import Time (Time) +import Random exposing (..) +import Keyboard exposing (KeyCode) +import Time exposing (Time) +import Set +import Set exposing (Set) -import Model.Player (..) -import Model.Cloud (..) -import Model.Vec2 (Vec2) -import Model.Config (..) -import Model.Round (Round) -import Model.Board (initBoardSize) +import Model.Player exposing (..) +import Model.Cloud exposing (..) +import Model.Vec2 exposing (Vec2) +import Model.Config exposing (..) +import Model.Round exposing (Round) +import Model.Board exposing (initBoardSize) type alias Game = { time : Float , boardSize : Vec2 - , keysDown : List KeyCode + , keysDown : Set KeyCode , currentScore : Int , player : Player , cloud : Cloud @@ -29,7 +31,7 @@ initialGame : Seed -> Game initialGame seed = { time = 0 , boardSize = initBoardSize - , keysDown = [] + , keysDown = Set.empty , currentScore = 0 , player = initPlayer , cloud = initCloud |