From d68040d87385c360719e35941ad4f0112d9d0c03 Mon Sep 17 00:00:00 2001
From: Nathanael Sensfelder <SpamShield0@MultiAgentSystems.org>
Date: Sun, 30 Aug 2020 08:52:55 +0200
Subject: Fixes random number in choice generation.

---
 data/tests/player_choices.fate | 13 +++++++++++++
 1 file changed, 13 insertions(+)

(limited to 'data')

diff --git a/data/tests/player_choices.fate b/data/tests/player_choices.fate
index 2148863..16c4250 100644
--- a/data/tests/player_choices.fate
+++ b/data/tests/player_choices.fate
@@ -95,4 +95,17 @@
 
 (assert (= (var i) 653) FAILED: Player Choice E, i: (var i))
 
+(player_choice
+   (foreach test_set e
+      (if (= (rand 0 1) 1)
+         (
+            ( Choice (var e) )
+            (
+               Chosen var e: (var e)
+            )
+         )
+      )
+   )
+)
+
 (end)
-- 
cgit v1.2.3-70-g09d2