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)))

Reply via email to