Fixes a bug in `game-update-scores' which you should never actually see,
since a player shouldn't become ready if the game's already been won.
But this was exposed by another bug, so I might as well fix it.
(state (player-state player)))
(cond ((and (zerop score) (eql state :playing))
(setf (player-state player) :losing))
- ((member state '(:playing :starting))
+ ((member state '(:playing :starting :ready))
(incf remaining)
(setf found player)))))
(changed game :scores :players players)