added pointsAccounted field to GameState

This commit is contained in:
Jonathan Lamothe 2019-09-14 00:09:28 -04:00
parent 1a25c0dc92
commit 926a125692

View File

@ -55,6 +55,7 @@ module Mtlstats.Types (
awayScore, awayScore,
overtimeFlag, overtimeFlag,
dataVerified, dataVerified,
pointsAccounted,
-- ** CreatePlayerState Lenses -- ** CreatePlayerState Lenses
cpsNumber, cpsNumber,
cpsName, cpsName,
@ -194,6 +195,7 @@ data GameState = GameState
-- ^ Indicates whether or not the game went into overtime -- ^ Indicates whether or not the game went into overtime
, _dataVerified :: Bool , _dataVerified :: Bool
-- ^ Set to 'True' when the user confirms the entered data -- ^ Set to 'True' when the user confirms the entered data
, _pointsAccounted :: Int
} deriving (Eq, Show) } deriving (Eq, Show)
-- | The type of game -- | The type of game
@ -479,6 +481,7 @@ newGameState = GameState
, _awayScore = Nothing , _awayScore = Nothing
, _overtimeFlag = Nothing , _overtimeFlag = Nothing
, _dataVerified = False , _dataVerified = False
, _pointsAccounted = 0
} }
-- | Constructor for a 'CreatePlayerState' -- | Constructor for a 'CreatePlayerState'