DarkWiiPlayer

#!/bin/lua

local lib = {}

function lib.pair(init)
  local variable = init
  return function()
    return variable
  end, function(value)
    variable = value

DarkWiiPlayer

<style>
	* {
		margin: 0;
		padding: 0;
	}
	svg.template {
		height: 0em;
		width: 0em;
		display: block;
	}

DarkWiiPlayer

import min from math

levenshtein = (a, b) ->
  c = {nil, nil, nil, nil, nil}
  p = {nil, nil, nil, nil, nil}
  for i=1,#a+1
    c[i]=i-1 -- Distance to ""
  for i=1,#b
    p,c = c,p
    c[1] = i -- Distance from ""

DarkWiiPlayer

local mod = {}

local meta = {
	__call = function(tab, ...)
		if not tab.func then
			tab.func = tab.loader()
		end

		tab.func(...)
	end

DarkWiiPlayer

env = do
	local env
	env = _ENV
	setmetatable {}, {
		__index: (key) =>
			env[key] or (...) ->
				@.tag(key, ...)
	}

DarkWiiPlayer

--- Vector objects with several mathematical operations
-- @author DarkWiiPlayer
-- @license MIT
-- luacheck: ignore 4.1

local transformation, array4 = require "classes.transformation"

local ffi = require "ffi"

local sin, cos = math.sin, math.cos

DarkWiiPlayer

moonscript = require "moonscript"

moonscript.loadstring('print "\\nHere I am!"', 'string', 't', setmetatable({}, {
	__index: (key) =>
		print "index", key
		for key, value in pairs debug.getinfo 2
			print '', key, value
		print debug.traceback()
}))()

DarkWiiPlayer

#!/usr/bin/env luajit

local c = require 'ansicolors'
local pegasus = require 'pegasus'
local http = require 'socket.http'

local ip = http.request('http://darkwiiplayer.com/api/ip')

math.randomseed(os.time())

DarkWiiPlayer

local ffi = require 'ffi'

local intidx_fnc do
	if ffi.abi('le') then
		function intidx_fnc(n)
			if n<1 or n>4 then
				error("wrong index", 2)
			end
			return n-1
		end

DarkWiiPlayer

---	An abstract implementation of an object pool
--	@usage
--	local pool = require("pool"){
--		initialize = function(elem) elem.name = "John Doe"; return elem end;
--		max = 50;
--	}
--	local elem = pool:get() -- Creates a new element because pool is empty
--	print(elem.x) --> John Doe --	pool:put(elem) -- Puts element back into pool --- You know, the thing that this is all about, the pool class -- @type pool

local math = require "math"