Fix four bugs: ForIn body dropped, step max error, setLuaVersion case, Lua52 refs

Author: levno-710

src/prometheus/pipeline.lua

@@ -133,7 +133,7 @@ function Pipeline:setLuaVersion(luaVersion)
 		luaVersion = luaVersion;
 	});
 	self.unparser = Unparser:new({
-		luaVersion = luaVersion;
+		LuaVersion = luaVersion;
 	});
 	self.conventions = conventions;
 end

src/prometheus/step.lua

@@ -55,7 +55,7 @@ function Step:new(settings)
 
 			if data.max then
 				if  settingValue > data.max then
-					logger:error(string.format("Invalid value for the Setting \"%s\" of the Step \"%s\". The biggest allowed value is %d", key, self.Name, data.min));
+					logger:error(string.format("Invalid value for the Setting \"%s\" of the Step \"%s\". The biggest allowed value is %d", key, self.Name, data.max));
 				end
 			end
 

src/prometheus/steps/SplitStrings.lua

@@ -167,7 +167,7 @@ end
 
 local function generateCustomFunctionLiteral(parentScope, variant)
 	local parser = Parser:new({
-		LuaVersion = LuaVersion.Lua52;
+		LuaVersion = LuaVersion.Lua51;
 	});
 
 	-- Custom Function Type 1
@@ -190,7 +190,7 @@ end
 
 local function generateGlobalCustomFunctionDeclaration(ast, data)
 	local parser = Parser:new({
-		LuaVersion = LuaVersion.Lua52;
+		LuaVersion = LuaVersion.Lua51;
 	});
 
 	-- Custom Function Type 1

src/prometheus/visitast.lua

@@ -139,7 +139,7 @@ function visitStatement(statement, previsit, postvisit, data)
 		for i, expression in ipairs(statement.expressions) do
 			statement.expressions[i] = visitExpression(expression, previsit, postvisit, data);
 		end
-		visitBlock(statement.body, previsit, postvisit, data, false);
+		statement.body = visitBlock(statement.body, previsit, postvisit, data, false);
 	elseif(statement.kind == AstKind.IfStatement) then
 		statement.condition = visitExpression(statement.condition, previsit, postvisit, data);
 		statement.body = visitBlock(statement.body, previsit, postvisit, data, false);