Rename classtoi to classtoi-heavy; replace with new classtoi

performance/performance.lua

@@ -1,60 +1,88 @@
-local class = dofile(arg[1] or "../classtoi.lua")
+-- can be used to compare different versions: lua performance/performance.lua classtoi-light.lua classtoi.lua classtoi-heavy.lua
 
-local function time(title, f)
+-- load libs to test
+if not arg[1] then arg[1] = "../classtoi.lua" end
+
+local totest = {}
+local referencesource = arg[1]
+for i=1, #arg do
+	totest[arg[i]] = dofile(arg[i])
+end
+
+-- setup results
+local results = {}
+local function time(source, title, f)
 	collectgarbage()
 	local start = os.clock()
 	for i=0, 5e4 do f() end
-	print(title, os.clock() - start)
+	local result = os.clock() - start
+
+	if not results[title] then results[title] = {} end
+	results[title][source] = result
 end
 
-do
-	time("class creation", function()
+-- perform benchmark
+for source, class in pairs(totest) do
+	do
+		time(source, "class creation", function()
+			local A = class()
+		end)
+	end
+
+	do
 		local A = class()
-	end)
-end
 
-do
-	local A = class()
+		time(source, "instance creation", function()
+			local a = A:new()
+		end)
+	end
+
+	do
+		local A = class {
+			foo = function(self)
+				return 1
+			end
+		}
 
-	time("instance creation", function()
 		local a = A:new()
-	end)
+
+		time(source, "instance method invocation", function()
+			a:foo()
+		end)
+
+		time(source, "class method invocation", function()
+			A:foo()
+		end)
+	end
+
+	do
+		local A = class {
+			foo = function(self)
+				return 1
+			end
+		}
+
+		local B = A()
+
+		local b = B:new()
+
+		time(source, "inherited instance method invocation", function()
+			b:foo()
+		end)
+
+		time(source, "inherited class method invocation", function()
+			B:foo()
+		end)
+	end
 end
 
-do
-	local A = class {
-		foo = function(self)
-			return 1
-		end
-	}
-
-	local a = A:new()
-
-	time("instance method invocation", function()
-		a:foo()
-	end)
-
-	time("class method invocation", function()
-		A:foo()
-	end)
-end
-
-do
-	local A = class {
-		foo = function(self)
-			return 1
-		end
-	}
-
-	local B = A()
-
-	local b = B:new()
-
-	time("inherited instance method invocation", function()
-		b:foo()
-	end)
-
-	time("inherited class method invocation", function()
-		B:foo()
-	end)
+-- display results
+for test, sources in pairs(results) do
+	print(test..":")
+	for i=1, #arg do
+		local source = arg[i]
+		local result = sources[source]
+		local ratio = math.floor(result/sources[referencesource]*1000)/1000
+		print(("\t%s: %ss (x%s)"):format(source, result, ratio))
+	end
 end