typescript-to-lua 1.3.4 → 1.4.2

package/dist/lualib/Await.lua

@@ -1,4 +1,4 @@
-function __TS__AsyncAwaiter(generator)
+local function __TS__AsyncAwaiter(generator)
     return __TS__New(
         __TS__Promise,
         function(____, resolve, reject)
@@ -15,9 +15,9 @@ function __TS__AsyncAwaiter(generator)
             function fulfilled(self, value)
                 local success, errorOrErrorHandler, resultOrError = coroutine.resume(asyncCoroutine, value)
                 if success then
-                    step(_G, resultOrError, errorOrErrorHandler)
+                    step(nil, resultOrError, errorOrErrorHandler)
                 else
-                    reject(_G, errorOrErrorHandler)
+                    reject(nil, errorOrErrorHandler)
                 end
             end
             function rejected(self, handler)
@@ -26,42 +26,42 @@ function __TS__AsyncAwaiter(generator)
                         local success, hasReturnedOrError, returnedValue = pcall(handler, value)
                         if success then
                             if hasReturnedOrError then
-                                resolve(_G, returnedValue)
+                                resolve(nil, returnedValue)
                             else
-                                step(_G, hasReturnedOrError, handler)
+                                step(nil, hasReturnedOrError, handler)
                             end
                         else
-                            reject(_G, hasReturnedOrError)
+                            reject(nil, hasReturnedOrError)
                         end
                     end
                 else
                     return function(____, value)
-                        reject(_G, value)
+                        reject(nil, value)
                     end
                 end
             end
             function step(self, result, errorHandler)
                 if coroutine.status(asyncCoroutine) == "dead" then
-                    resolve(_G, result)
+                    resolve(nil, result)
                 else
-                    local ____self_1 = adopt(_G, result)
+                    local ____self_1 = adopt(nil, result)
                     ____self_1["then"](
                         ____self_1,
                         fulfilled,
-                        rejected(_G, errorHandler)
+                        rejected(nil, errorHandler)
                     )
                 end
             end
             asyncCoroutine = coroutine.create(generator)
             local success, errorOrErrorHandler, resultOrError = coroutine.resume(asyncCoroutine)
             if success then
-                step(_G, resultOrError, errorOrErrorHandler)
+                step(nil, resultOrError, errorOrErrorHandler)
             else
-                reject(_G, errorOrErrorHandler)
+                reject(nil, errorOrErrorHandler)
             end
         end
     )
 end
-function __TS__Await(errorHandler, thing)
+local function __TS__Await(errorHandler, thing)
     return coroutine.yield(errorHandler, thing)
 end

package/dist/lualib/Class.lua

@@ -1,4 +1,4 @@
-function __TS__Class(self)
+local function __TS__Class(self)
     local c = {prototype = {}}
     c.prototype.__index = c.prototype
     c.prototype.constructor = c

package/dist/lualib/ClassExtends.lua

@@ -1,4 +1,4 @@
-function __TS__ClassExtends(target, base)
+local function __TS__ClassExtends(target, base)
     target.____super = base
     local staticMetatable = setmetatable({__index = base}, base)
     setmetatable(target, staticMetatable)

package/dist/lualib/CloneDescriptor.lua

@@ -1,4 +1,4 @@
-function __TS__CloneDescriptor(____bindingPattern0)
+local function __TS__CloneDescriptor(____bindingPattern0)
     local value
     local writable
     local set

package/dist/lualib/Decorate.lua

@@ -1,4 +1,4 @@
-function __TS__Decorate(decorators, target, key, desc)
+local function __TS__Decorate(decorators, target, key, desc)
     local result = target
     do
         local i = #decorators
@@ -7,11 +7,11 @@ function __TS__Decorate(decorators, target, key, desc)
             if decorator then
                 local oldResult = result
                 if key == nil then
-                    result = decorator(_G, result)
+                    result = decorator(nil, result)
                 elseif desc == true then
                     local value = rawget(target, key)
                     local descriptor = __TS__ObjectGetOwnPropertyDescriptor(target, key) or ({configurable = true, writable = true, value = value})
-                    local desc = decorator(_G, target, key, descriptor) or descriptor
+                    local desc = decorator(nil, target, key, descriptor) or descriptor
                     local isSimpleValue = desc.configurable == true and desc.writable == true and not desc.get and not desc.set
                     if isSimpleValue then
                         rawset(target, key, desc.value)
@@ -23,9 +23,9 @@ function __TS__Decorate(decorators, target, key, desc)
                         )
                     end
                 elseif desc == false then
-                    result = decorator(_G, target, key, desc)
+                    result = decorator(nil, target, key, desc)
                 else
-                    result = decorator(_G, target, key)
+                    result = decorator(nil, target, key)
                 end
                 result = result or oldResult
             end

package/dist/lualib/DecorateParam.lua

@@ -1,3 +1,3 @@
-function __TS__DecorateParam(paramIndex, decorator)
-    return function(____, target, key) return decorator(_G, target, key, paramIndex) end
+local function __TS__DecorateParam(paramIndex, decorator)
+    return function(____, target, key) return decorator(nil, target, key, paramIndex) end
 end

package/dist/lualib/DelegatedYield.lua

@@ -1,4 +1,4 @@
-function __TS__DelegatedYield(iterable)
+local function __TS__DelegatedYield(iterable)
     if type(iterable) == "string" then
         for index = 0, #iterable - 1 do
             coroutine.yield(__TS__StringAccess(iterable, index))

package/dist/lualib/Delete.lua

@@ -1,4 +1,4 @@
-function __TS__Delete(target, key)
+local function __TS__Delete(target, key)
     local descriptors = __TS__ObjectGetOwnPropertyDescriptors(target)
     local descriptor = descriptors[key]
     if descriptor then

package/dist/lualib/Error.lua

@@ -1,78 +1,77 @@
-function __TS__GetErrorStack(self, constructor)
-    local level = 1
-    while true do
-        local info = debug.getinfo(level, "f")
-        level = level + 1
-        if not info then
-            level = 1
-            break
-        elseif info.func == constructor then
-            break
+local Error, RangeError, ReferenceError, SyntaxError, TypeError, URIError
+do
+    local function getErrorStack(self, constructor)
+        local level = 1
+        while true do
+            local info = debug.getinfo(level, "f")
+            level = level + 1
+            if not info then
+                level = 1
+                break
+            elseif info.func == constructor then
+                break
+            end
         end
+        return debug.traceback(nil, level)
     end
-    return debug.traceback(nil, level)
-end
-function __TS__WrapErrorToString(self, getDescription)
-    return function(self)
-        local description = getDescription(self)
-        local caller = debug.getinfo(3, "f")
-        if _VERSION == "Lua 5.1" or caller and caller.func ~= error then
-            return description
-        else
-            return (tostring(description) .. "\n") .. self.stack
+    local function wrapErrorToString(self, getDescription)
+        return function(self)
+            local description = getDescription(self)
+            local caller = debug.getinfo(3, "f")
+            if _VERSION == "Lua 5.1" or caller and caller.func ~= error then
+                return description
+            else
+                return (tostring(description) .. "\n") .. self.stack
+            end
         end
     end
-end
-function __TS__InitErrorClass(self, Type, name)
-    Type.name = name
-    return setmetatable(
-        Type,
-        {__call = function(____, _self, message) return __TS__New(Type, message) end}
-    )
-end
-local ____TS__InitErrorClass_3 = __TS__InitErrorClass
-local ____G_2 = _G
-____class_0 = __TS__Class()
-____class_0.name = ""
-function ____class_0.prototype.____constructor(self, message)
-    if message == nil then
-        message = ""
+    local function initErrorClass(self, Type, name)
+        Type.name = name
+        return setmetatable(
+            Type,
+            {__call = function(____, _self, message) return __TS__New(Type, message) end}
+        )
     end
-    self.message = message
-    self.name = "Error"
-    self.stack = __TS__GetErrorStack(_G, self.constructor.new)
-    local metatable = getmetatable(self)
-    if not metatable.__errorToStringPatched then
-        metatable.__errorToStringPatched = true
-        metatable.__tostring = __TS__WrapErrorToString(_G, metatable.__tostring)
+    local ____initErrorClass_2 = initErrorClass
+    local ____class_0 = __TS__Class()
+    ____class_0.name = ""
+    function ____class_0.prototype.____constructor(self, message)
+        if message == nil then
+            message = ""
+        end
+        self.message = message
+        self.name = "Error"
+        self.stack = getErrorStack(nil, self.constructor.new)
+        local metatable = getmetatable(self)
+        if not metatable.__errorToStringPatched then
+            metatable.__errorToStringPatched = true
+            metatable.__tostring = wrapErrorToString(nil, metatable.__tostring)
+        end
     end
-end
-function ____class_0.prototype.__tostring(self)
-    local ____temp_1
-    if self.message ~= "" then
-        ____temp_1 = (self.name .. ": ") .. self.message
-    else
-        ____temp_1 = self.name
+    function ____class_0.prototype.__tostring(self)
+        local ____temp_1
+        if self.message ~= "" then
+            ____temp_1 = (self.name .. ": ") .. self.message
+        else
+            ____temp_1 = self.name
+        end
+        return ____temp_1
     end
-    return ____temp_1
-end
-Error = ____TS__InitErrorClass_3(____G_2, ____class_0, "Error")
-for ____, errorName in ipairs({
-    "RangeError",
-    "ReferenceError",
-    "SyntaxError",
-    "TypeError",
-    "URIError"
-}) do
-    local ____G_7 = _G
-    local ____TS__InitErrorClass_6 = __TS__InitErrorClass
-    local ____G_5 = _G
-    local ____class_4 = __TS__Class()
-    ____class_4.name = ____class_4.name
-    __TS__ClassExtends(____class_4, Error)
-    function ____class_4.prototype.____constructor(self, ...)
-        Error.prototype.____constructor(self, ...)
-        self.name = errorName
+    Error = ____initErrorClass_2(nil, ____class_0, "Error")
+    local function createErrorClass(self, name)
+        local ____initErrorClass_4 = initErrorClass
+        local ____class_3 = __TS__Class()
+        ____class_3.name = ____class_3.name
+        __TS__ClassExtends(____class_3, Error)
+        function ____class_3.prototype.____constructor(self, ...)
+            ____class_3.____super.prototype.____constructor(self, ...)
+            self.name = name
+        end
+        return ____initErrorClass_4(nil, ____class_3, name)
     end
-    ____G_7[errorName] = ____TS__InitErrorClass_6(____G_5, ____class_4, errorName)
+    RangeError = createErrorClass(nil, "RangeError")
+    ReferenceError = createErrorClass(nil, "ReferenceError")
+    SyntaxError = createErrorClass(nil, "SyntaxError")
+    TypeError = createErrorClass(nil, "TypeError")
+    URIError = createErrorClass(nil, "URIError")
 end

package/dist/lualib/FunctionBind.lua

@@ -1,4 +1,4 @@
-function __TS__FunctionBind(fn, thisArg, ...)
+local function __TS__FunctionBind(fn, thisArg, ...)
     local boundArgs = {...}
     return function(____, ...)
         local args = {...}

package/dist/lualib/Generator.lua

@@ -1,28 +1,31 @@
-function __TS__GeneratorIterator(self)
-    return self
-end
-function __TS__GeneratorNext(self, ...)
-    local co = self.____coroutine
-    if coroutine.status(co) == "dead" then
-        return {done = true}
-    end
-    local status, value = coroutine.resume(co, ...)
-    if not status then
-        error(value, 0)
+local __TS__Generator
+do
+    local function generatorIterator(self)
+        return self
     end
-    return {
-        value = value,
-        done = coroutine.status(co) == "dead"
-    }
-end
-function __TS__Generator(fn)
-    return function(...)
-        local args = {...}
-        local argsLength = select("#", ...)
+    local function generatorNext(self, ...)
+        local co = self.____coroutine
+        if coroutine.status(co) == "dead" then
+            return {done = true}
+        end
+        local status, value = coroutine.resume(co, ...)
+        if not status then
+            error(value, 0)
+        end
         return {
-            ____coroutine = coroutine.create(function() return fn((unpack or table.unpack)(args, 1, argsLength)) end),
-            [Symbol.iterator] = __TS__GeneratorIterator,
-            next = __TS__GeneratorNext
+            value = value,
+            done = coroutine.status(co) == "dead"
         }
     end
+    function __TS__Generator(fn)
+        return function(...)
+            local args = {...}
+            local argsLength = select("#", ...)
+            return {
+                ____coroutine = coroutine.create(function() return fn((unpack or table.unpack)(args, 1, argsLength)) end),
+                [Symbol.iterator] = generatorIterator,
+                next = generatorNext
+            }
+        end
+    end
 end

package/dist/lualib/InstanceOf.lua

@@ -1,4 +1,4 @@
-function __TS__InstanceOf(obj, classTbl)
+local function __TS__InstanceOf(obj, classTbl)
     if type(classTbl) ~= "table" then
         error("Right-hand side of 'instanceof' is not an object", 0)
     end

package/dist/lualib/InstanceOfObject.lua

@@ -1,4 +1,4 @@
-function __TS__InstanceOfObject(value)
+local function __TS__InstanceOfObject(value)
     local valueType = type(value)
     return valueType == "table" or valueType == "function"
 end

package/dist/lualib/Iterator.lua

@@ -1,37 +1,40 @@
-function __TS__IteratorGeneratorStep(self)
-    local co = self.____coroutine
-    local status, value = coroutine.resume(co)
-    if not status then
-        error(value, 0)
+local __TS__Iterator
+do
+    local function iteratorGeneratorStep(self)
+        local co = self.____coroutine
+        local status, value = coroutine.resume(co)
+        if not status then
+            error(value, 0)
+        end
+        if coroutine.status(co) == "dead" then
+            return
+        end
+        return true, value
     end
-    if coroutine.status(co) == "dead" then
-        return
+    local function iteratorIteratorStep(self)
+        local result = self:next()
+        if result.done then
+            return
+        end
+        return true, result.value
     end
-    return true, value
-end
-function __TS__IteratorIteratorStep(self)
-    local result = self:next()
-    if result.done then
-        return
-    end
-    return true, result.value
-end
-function __TS__IteratorStringStep(self, index)
-    index = index + 1
-    if index > #self then
-        return
+    local function iteratorStringStep(self, index)
+        index = index + 1
+        if index > #self then
+            return
+        end
+        return index, string.sub(self, index, index)
     end
-    return index, string.sub(self, index, index)
-end
-function __TS__Iterator(iterable)
-    if type(iterable) == "string" then
-        return __TS__IteratorStringStep, iterable, 0
-    elseif iterable.____coroutine ~= nil then
-        return __TS__IteratorGeneratorStep, iterable
-    elseif iterable[Symbol.iterator] then
-        local iterator = iterable[Symbol.iterator](iterable)
-        return __TS__IteratorIteratorStep, iterator
-    else
-        return ipairs(iterable)
+    function __TS__Iterator(iterable)
+        if type(iterable) == "string" then
+            return iteratorStringStep, iterable, 0
+        elseif iterable.____coroutine ~= nil then
+            return iteratorGeneratorStep, iterable
+        elseif iterable[Symbol.iterator] then
+            local iterator = iterable[Symbol.iterator](iterable)
+            return iteratorIteratorStep, iterator
+        else
+            return ipairs(iterable)
+        end
     end
 end