@@ -82,15 +82,15 @@ cases = [ Case { description = "should be able to score a game with all zeros"
82
82
, expected = Right 300
83
83
}
84
84
, Case { description = " rolls can not score negative points"
85
- , rolls = [- 1 , 0 , 0 , 0 , 0 , 0 , 0 , 0 , 0 , 0 , 0 , 0 , 0 , 0 , 0 , 0 , 0 , 0 , 0 , 0 ]
85
+ , rolls = [- 1 ]
86
86
, expected = Left $ InvalidRoll 0 (- 1 )
87
87
}
88
88
, Case { description = " a roll can not score more than 10 points"
89
- , rolls = [11 , 0 , 0 , 0 , 0 , 0 , 0 , 0 , 0 , 0 , 0 , 0 , 0 , 0 , 0 , 0 , 0 , 0 , 0 , 0 ]
89
+ , rolls = [11 ]
90
90
, expected = Left $ InvalidRoll 0 11
91
91
}
92
92
, Case { description = " two rolls in a frame can not score more than 10 points"
93
- , rolls = [5 , 6 , 0 , 0 , 0 , 0 , 0 , 0 , 0 , 0 , 0 , 0 , 0 , 0 , 0 , 0 , 0 , 0 , 0 , 0 ]
93
+ , rolls = [5 , 6 ]
94
94
, expected = Left $ InvalidRoll 1 6
95
95
}
96
96
, Case { description = " bonus roll after a strike in the last frame can not score more than 10 points"
@@ -121,7 +121,7 @@ cases = [ Case { description = "should be able to score a game with all zeros"
121
121
, rolls = [0 , 0 ]
122
122
, expected = Left IncompleteGame
123
123
}
124
- , Case { description = " a game with more than ten frames can not be scored "
124
+ , Case { description = " cannot roll if game already has ten frames"
125
125
, rolls = [0 , 0 , 0 , 0 , 0 , 0 , 0 , 0 , 0 , 0 , 0 , 0 , 0 , 0 , 0 , 0 , 0 , 0 , 0 , 0 , 0 ]
126
126
, expected = Left $ InvalidRoll 20 0
127
127
}
0 commit comments