LÖVE

Code: Select all

function hi()l={"h";"i";}io.write(l[1]..""..l[2]);io.write", world";end;hi()

Code: Select all

debug.setmetatable(0, {__mul=function(j, f)if type(j)=="function"then j,f=f,j end for i=1,j do f(i,j)end return j end})

range = 1, 5
* function (i)
	print("Hi",i)
end
* print

Code: Select all

Hi  1
Hi  2
Hi  3
Hi  4
Hi  5

Code: Select all

-- set metatable for the number type
debug.setmetatable(0, { __mul = function(number, func) --override multiply operator to accept a function * number
    if type(number) == "function" then
        number, func = func, number -- arguments were in backward order
    end
    for i=1, number do
        func(i, number) -- pass in current index and maximum index
    end
    return number
end})

__unused = print * 5

Code: Select all

function extend(entity, component)
  for k, v in pairs(component)
    if k != '_init' and entity[k] == nil then entity[k] = v end
  end
  if component._init then component._init(entity) end
  return entity
end

function entity(body)
  local object = { extend=extend }
  if body then
    object:extend(body)
  end
  return object
end

local example_component = {
  x = 0, y = 0, w = 0, h = 0
  _init = function(self)
    print("do stuff here")
  end,
}

local Player = entity():extent(example_component)