moonscript/spec/outputs/funcs.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)
_ = function()
  if something then
    return real_name
  end
end
d(function()
  return print("hello world")
end, 10)
d(1, 2, 3, 4, 5, 6, (function()
  if something then
    print("okay")
    return 10
  end
end)(), 10, 20)
f()()(what)(function()
  return print("srue")
end, 123)
return nil