branch: master commit daaaadf5433967b1c1ca8665e209b6de4b32db76 Author: Mario Lang <ml...@delysid.org> Commit: Mario Lang <ml...@delysid.org>
Set default number of iterations to 300 Accidentally set too high in previous commit. --- packages/poker/poker.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/packages/poker/poker.el b/packages/poker/poker.el index 9bfe16b..a630baf 100644 --- a/packages/poker/poker.el +++ b/packages/poker/poker.el @@ -446,7 +446,7 @@ The optional number of OPPONENTS defaults to 1." (nth (or opponents 1) (assq (poker-starting-hand-name pocket) poker-pre-flop-starting-hands))) - (let ((wins 0) (iterations 1000)) + (let ((wins 0) (iterations 300)) (dotimes (i iterations) (let ((deck (poker-random-deck)) (players (make-vector (or opponents 1) nil)))