From bbed50ff27a1d4c656a8876f277fe1d8dcfb5f3f Mon Sep 17 00:00:00 2001
From: Sebastian Krzyszkowiak
Date: Tue, 18 Jun 2019 01:43:11 +0200
Subject: SLUDGE: implement `random` built-in

---
 engines/sludge/builtin.cpp | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'engines/sludge/builtin.cpp')

diff --git a/engines/sludge/builtin.cpp b/engines/sludge/builtin.cpp
index 1030643788..185ff1a23c 100644
--- a/engines/sludge/builtin.cpp
+++ b/engines/sludge/builtin.cpp
@@ -698,7 +698,7 @@ builtIn(random) {
 	trimStack(fun->stack);
 	if (num <= 0)
 		num = 1;
-	fun->reg.setVariable(SVT_INT, 0 /*rand() % num*/); //TODO:false value
+	fun->reg.setVariable(SVT_INT, g_sludge->getRandomSource()->getRandomNumber(num - 1));
 	return BR_CONTINUE;
 }
 
-- 
cgit v1.2.3