From 35131f9f6613d52d2873ca32df7c767782f221b4 Mon Sep 17 00:00:00 2001
From: Ian Farmer <ian.farmer@luaj.org>
Date: Wed, 5 Sep 2007 03:02:57 +0000
Subject: [PATCH] Fix "factorial" function in test case that was not actually
 factorial function.

---
 src/test/res/calls-expected.out |   4 ++--
 src/test/res/calls.lua          |   8 ++++----
 src/test/res/calls.luac         | Bin 839 -> 843 bytes
 3 files changed, 6 insertions(+), 6 deletions(-)

diff --git a/src/test/res/calls-expected.out b/src/test/res/calls-expected.out
index efcced8d..00e6f2ba 100644
--- a/src/test/res/calls-expected.out
+++ b/src/test/res/calls-expected.out
@@ -1,4 +1,4 @@
-15
-15
+120
+120
 1.2246467991473532E-16
 1.2246467991473532E-16
diff --git a/src/test/res/calls.lua b/src/test/res/calls.lua
index f9d8aa2f..236ad84a 100644
--- a/src/test/res/calls.lua
+++ b/src/test/res/calls.lua
@@ -4,15 +4,15 @@ local function f(x)
 end
 
 local function factorial(i)
-	local function helper(sum, n)
+	local function helper(product, n)
 		if n <= 0 then
-			return sum
+			return product
 		else
 			-- tail call to a nested Lua function
-			return helper(n + sum, n - 1)
+			return helper(n * product, n - 1)
 		end
 	end
-	return helper(0, i)
+	return helper(1, i)
 end
 
 local result1 = factorial(5)
diff --git a/src/test/res/calls.luac b/src/test/res/calls.luac
index 4cad7222601f3e69dc8ac3585df7a8cdea6a6347..5048e1d1966c1a09ba7673321c5e1e81e327d83c 100644
GIT binary patch
delta 37
tcmX@kcA9NNEhEzh`^oi;I*jKguVIYk=3ro8C@9KLDNQcfEWl*W2mtmM3%URR

delta 33
pcmX@jcARZPEh7^H!{mBK9mX@0*D%JivoJ6)6qn|17GW}H1OTU_2-yGt