moonscript/tests/outputs/funcs.lua
2012-01-13 21:24:46 -08:00

110 lines
1.6 KiB
Lua

local x
x = function()
return print(what)
end
local _
_ = function() end
_ = function()
return function()
return function() end
end
end
go(to(the(barn)))
open(function()
return the(function()
return door
end)
end)
open(function()
the(door)
local hello
hello = function()
return my(func)
end
end)
local h
h = function()
return hi
end
eat(function() end, world);
(function() end)()
x = function(...) end
hello()
hello.world()
_ = hello().something
_ = what()["ofefe"]
what()(the()(heck()))
_ = function(a, b, c, d, e) end
_ = function(a, a, a, a, a)
return print(a)
end
_ = function(x)
if x == nil then
x = 23023
end
end
_ = function(x)
if x == nil then
x = function(y)
if y == nil then
y = function() end
end
end
end
end
_ = function(x)
if x == nil then
if something then
x = yeah
else
x = no
end
end
end
local something
something = function(hello, world)
if hello == nil then
hello = 100
end
if world == nil then
world = function(x)
if x == nil then
x = [[yeah cool]]
end
return print("eat rice")
end
end
return print(hello)
end
_ = function(self, x, y) end
_ = function(self, x, y)
self.x, self.y = x, y
end
_ = function(self, x)
if x == nil then
x = 1
end
end
_ = function(self, x, y, z)
if x == nil then
x = 1
end
if z == nil then
z = "hello world"
end
self.x, self.z = x, z
end
x(function() end)
y(function()
return 1
end)
z(function()
return 1, "hello", "world"
end)
k(function()
if yes then
return
else
return
end
end)