typescript-to-lua 1.3.3 → 1.4.1

package/dist/lualib/Map.lua

@@ -1,140 +1,142 @@
-Map = __TS__Class()
-Map.name = "Map"
-function Map.prototype.____constructor(self, entries)
-    self[Symbol.toStringTag] = "Map"
-    self.items = {}
-    self.size = 0
-    self.nextKey = {}
-    self.previousKey = {}
-    if entries == nil then
-        return
-    end
-    local iterable = entries
-    if iterable[Symbol.iterator] then
-        local iterator = iterable[Symbol.iterator](iterable)
-        while true do
-            local result = iterator:next()
-            if result.done then
-                break
-            end
-            local value = result.value
-            self:set(value[1], value[2])
+local Map
+do
+    Map = __TS__Class()
+    Map.name = "Map"
+    function Map.prototype.____constructor(self, entries)
+        self[Symbol.toStringTag] = "Map"
+        self.items = {}
+        self.size = 0
+        self.nextKey = {}
+        self.previousKey = {}
+        if entries == nil then
+            return
         end
-    else
-        local array = entries
-        for ____, kvp in ipairs(array) do
-            self:set(kvp[1], kvp[2])
+        local iterable = entries
+        if iterable[Symbol.iterator] then
+            local iterator = iterable[Symbol.iterator](iterable)
+            while true do
+                local result = iterator:next()
+                if result.done then
+                    break
+                end
+                local value = result.value
+                self:set(value[1], value[2])
+            end
+        else
+            local array = entries
+            for ____, kvp in ipairs(array) do
+                self:set(kvp[1], kvp[2])
+            end
         end
     end
-end
-function Map.prototype.clear(self)
-    self.items = {}
-    self.nextKey = {}
-    self.previousKey = {}
-    self.firstKey = nil
-    self.lastKey = nil
-    self.size = 0
-end
-function Map.prototype.delete(self, key)
-    local contains = self:has(key)
-    if contains then
-        self.size = self.size - 1
-        local next = self.nextKey[key]
-        local previous = self.previousKey[key]
-        if next and previous then
-            self.nextKey[previous] = next
-            self.previousKey[next] = previous
-        elseif next then
-            self.firstKey = next
-            self.previousKey[next] = nil
-        elseif previous then
-            self.lastKey = previous
-            self.nextKey[previous] = nil
-        else
-            self.firstKey = nil
-            self.lastKey = nil
+    function Map.prototype.clear(self)
+        self.items = {}
+        self.nextKey = {}
+        self.previousKey = {}
+        self.firstKey = nil
+        self.lastKey = nil
+        self.size = 0
+    end
+    function Map.prototype.delete(self, key)
+        local contains = self:has(key)
+        if contains then
+            self.size = self.size - 1
+            local next = self.nextKey[key]
+            local previous = self.previousKey[key]
+            if next and previous then
+                self.nextKey[previous] = next
+                self.previousKey[next] = previous
+            elseif next then
+                self.firstKey = next
+                self.previousKey[next] = nil
+            elseif previous then
+                self.lastKey = previous
+                self.nextKey[previous] = nil
+            else
+                self.firstKey = nil
+                self.lastKey = nil
+            end
+            self.nextKey[key] = nil
+            self.previousKey[key] = nil
         end
-        self.nextKey[key] = nil
-        self.previousKey[key] = nil
+        self.items[key] = nil
+        return contains
     end
-    self.items[key] = nil
-    return contains
-end
-function Map.prototype.forEach(self, callback)
-    for ____, key in __TS__Iterator(self:keys()) do
-        callback(_G, self.items[key], key, self)
+    function Map.prototype.forEach(self, callback)
+        for ____, key in __TS__Iterator(self:keys()) do
+            callback(nil, self.items[key], key, self)
+        end
     end
-end
-function Map.prototype.get(self, key)
-    return self.items[key]
-end
-function Map.prototype.has(self, key)
-    return self.nextKey[key] ~= nil or self.lastKey == key
-end
-function Map.prototype.set(self, key, value)
-    local isNewValue = not self:has(key)
-    if isNewValue then
-        self.size = self.size + 1
+    function Map.prototype.get(self, key)
+        return self.items[key]
     end
-    self.items[key] = value
-    if self.firstKey == nil then
-        self.firstKey = key
-        self.lastKey = key
-    elseif isNewValue then
-        self.nextKey[self.lastKey] = key
-        self.previousKey[key] = self.lastKey
-        self.lastKey = key
+    function Map.prototype.has(self, key)
+        return self.nextKey[key] ~= nil or self.lastKey == key
     end
-    return self
-end
-Map.prototype[Symbol.iterator] = function(self)
-    return self:entries()
-end
-function Map.prototype.entries(self)
-    local ____temp_0 = self
-    local items = ____temp_0.items
-    local nextKey = ____temp_0.nextKey
-    local key = self.firstKey
-    return {
-        [Symbol.iterator] = function(self)
-            return self
-        end,
-        next = function(self)
-            local result = {done = not key, value = {key, items[key]}}
-            key = nextKey[key]
-            return result
+    function Map.prototype.set(self, key, value)
+        local isNewValue = not self:has(key)
+        if isNewValue then
+            self.size = self.size + 1
         end
-    }
-end
-function Map.prototype.keys(self)
-    local nextKey = self.nextKey
-    local key = self.firstKey
-    return {
-        [Symbol.iterator] = function(self)
-            return self
-        end,
-        next = function(self)
-            local result = {done = not key, value = key}
-            key = nextKey[key]
-            return result
+        self.items[key] = value
+        if self.firstKey == nil then
+            self.firstKey = key
+            self.lastKey = key
+        elseif isNewValue then
+            self.nextKey[self.lastKey] = key
+            self.previousKey[key] = self.lastKey
+            self.lastKey = key
         end
-    }
-end
-function Map.prototype.values(self)
-    local ____temp_1 = self
-    local items = ____temp_1.items
-    local nextKey = ____temp_1.nextKey
-    local key = self.firstKey
-    return {
-        [Symbol.iterator] = function(self)
-            return self
-        end,
-        next = function(self)
-            local result = {done = not key, value = items[key]}
-            key = nextKey[key]
-            return result
-        end
-    }
+        return self
+    end
+    Map.prototype[Symbol.iterator] = function(self)
+        return self:entries()
+    end
+    function Map.prototype.entries(self)
+        local ____temp_0 = self
+        local items = ____temp_0.items
+        local nextKey = ____temp_0.nextKey
+        local key = self.firstKey
+        return {
+            [Symbol.iterator] = function(self)
+                return self
+            end,
+            next = function(self)
+                local result = {done = not key, value = {key, items[key]}}
+                key = nextKey[key]
+                return result
+            end
+        }
+    end
+    function Map.prototype.keys(self)
+        local nextKey = self.nextKey
+        local key = self.firstKey
+        return {
+            [Symbol.iterator] = function(self)
+                return self
+            end,
+            next = function(self)
+                local result = {done = not key, value = key}
+                key = nextKey[key]
+                return result
+            end
+        }
+    end
+    function Map.prototype.values(self)
+        local ____temp_1 = self
+        local items = ____temp_1.items
+        local nextKey = ____temp_1.nextKey
+        local key = self.firstKey
+        return {
+            [Symbol.iterator] = function(self)
+                return self
+            end,
+            next = function(self)
+                local result = {done = not key, value = items[key]}
+                key = nextKey[key]
+                return result
+            end
+        }
+    end
+    Map[Symbol.species] = Map
 end
-Map[Symbol.species] = Map
-Map = Map

package/dist/lualib/MathAtan2.lua

@@ -1 +1 @@
-__TS__MathAtan2 = math.atan2 or math.atan
+local __TS__MathAtan2 = math.atan2 or math.atan

package/dist/lualib/MathSign.lua

@@ -1,4 +1,4 @@
-function __TS__MathSign(val)
+local function __TS__MathSign(val)
     if val > 0 then
         return 1
     elseif val < 0 then

package/dist/lualib/New.lua

@@ -1,4 +1,4 @@
-function __TS__New(target, ...)
+local function __TS__New(target, ...)
     local instance = setmetatable({}, target.prototype)
     instance:____constructor(...)
     return instance

package/dist/lualib/Number.lua

@@ -1,4 +1,4 @@
-function __TS__Number(value)
+local function __TS__Number(value)
     local valueType = type(value)
     if valueType == "number" then
         return value

package/dist/lualib/NumberIsFinite.lua

@@ -1,3 +1,3 @@
-function __TS__NumberIsFinite(value)
+local function __TS__NumberIsFinite(value)
     return type(value) == "number" and value == value and value ~= math.huge and value ~= -math.huge
 end

package/dist/lualib/NumberIsNaN.lua

@@ -1,3 +1,3 @@
-function __TS__NumberIsNaN(value)
+local function __TS__NumberIsNaN(value)
     return value ~= value
 end

package/dist/lualib/NumberToString.lua

@@ -1,41 +1,44 @@
-____radixChars = "0123456789abcdefghijklmnopqrstuvwxyz"
-function __TS__NumberToString(self, radix)
-    if radix == nil or radix == 10 or self == math.huge or self == -math.huge or self ~= self then
-        return tostring(self)
+local __TS__NumberToString
+do
+    local radixChars = "0123456789abcdefghijklmnopqrstuvwxyz"
+    function __TS__NumberToString(self, radix)
+        if radix == nil or radix == 10 or self == math.huge or self == -math.huge or self ~= self then
+            return tostring(self)
+        end
+        radix = math.floor(radix)
+        if radix < 2 or radix > 36 then
+            error("toString() radix argument must be between 2 and 36", 0)
+        end
+        local integer, fraction = math.modf(math.abs(self))
+        local result = ""
+        if radix == 8 then
+            result = string.format("%o", integer)
+        elseif radix == 16 then
+            result = string.format("%x", integer)
+        else
+            repeat
+                do
+                    result = __TS__StringAccess(radixChars, integer % radix) .. result
+                    integer = math.floor(integer / radix)
+                end
+            until not (integer ~= 0)
+        end
+        if fraction ~= 0 then
+            result = result .. "."
+            local delta = 1e-16
+            repeat
+                do
+                    fraction = fraction * radix
+                    delta = delta * radix
+                    local digit = math.floor(fraction)
+                    result = result .. __TS__StringAccess(radixChars, digit)
+                    fraction = fraction - digit
+                end
+            until not (fraction >= delta)
+        end
+        if self < 0 then
+            result = "-" .. result
+        end
+        return result
     end
-    radix = math.floor(radix)
-    if radix < 2 or radix > 36 then
-        error("toString() radix argument must be between 2 and 36", 0)
-    end
-    local integer, fraction = math.modf(math.abs(self))
-    local result = ""
-    if radix == 8 then
-        result = string.format("%o", integer)
-    elseif radix == 16 then
-        result = string.format("%x", integer)
-    else
-        repeat
-            do
-                result = __TS__StringAccess(____radixChars, integer % radix) .. result
-                integer = math.floor(integer / radix)
-            end
-        until not (integer ~= 0)
-    end
-    if fraction ~= 0 then
-        result = result .. "."
-        local delta = 1e-16
-        repeat
-            do
-                fraction = fraction * radix
-                delta = delta * radix
-                local digit = math.floor(fraction)
-                result = result .. __TS__StringAccess(____radixChars, digit)
-                fraction = fraction - digit
-            end
-        until not (fraction >= delta)
-    end
-    if self < 0 then
-        result = "-" .. result
-    end
-    return result
 end

package/dist/lualib/ObjectAssign.lua

@@ -1,4 +1,4 @@
-function __TS__ObjectAssign(to, ...)
+local function __TS__ObjectAssign(to, ...)
     local sources = {...}
     if to == nil then
         return to

package/dist/lualib/ObjectDefineProperty.lua

@@ -1,4 +1,4 @@
-function __TS__ObjectDefineProperty(target, key, desc)
+local function __TS__ObjectDefineProperty(target, key, desc)
     local ____temp_0
     if type(key) == "number" then
         ____temp_0 = key + 1

package/dist/lualib/ObjectEntries.lua

@@ -1,4 +1,4 @@
-function __TS__ObjectEntries(obj)
+local function __TS__ObjectEntries(obj)
     local result = {}
     for key in pairs(obj) do
         result[#result + 1] = {key, obj[key]}

package/dist/lualib/ObjectFromEntries.lua

@@ -1,4 +1,4 @@
-function __TS__ObjectFromEntries(entries)
+local function __TS__ObjectFromEntries(entries)
     local obj = {}
     local iterable = entries
     if iterable[Symbol.iterator] then

package/dist/lualib/ObjectGetOwnPropertyDescriptor.lua

@@ -1,4 +1,4 @@
-function __TS__ObjectGetOwnPropertyDescriptor(object, key)
+local function __TS__ObjectGetOwnPropertyDescriptor(object, key)
     local metatable = getmetatable(object)
     if not metatable then
         return

package/dist/lualib/ObjectGetOwnPropertyDescriptors.lua

@@ -1,4 +1,4 @@
-function __TS__ObjectGetOwnPropertyDescriptors(object)
+local function __TS__ObjectGetOwnPropertyDescriptors(object)
     local metatable = getmetatable(object)
     if not metatable then
         return {}

package/dist/lualib/ObjectKeys.lua

@@ -1,4 +1,4 @@
-function __TS__ObjectKeys(obj)
+local function __TS__ObjectKeys(obj)
     local result = {}
     for key in pairs(obj) do
         result[#result + 1] = key

package/dist/lualib/ObjectRest.lua

@@ -1,4 +1,4 @@
-function __TS__ObjectRest(target, usedProperties)
+local function __TS__ObjectRest(target, usedProperties)
     local result = {}
     for property in pairs(target) do
         if not usedProperties[property] then

package/dist/lualib/ObjectValues.lua

@@ -1,4 +1,4 @@
-function __TS__ObjectValues(obj)
+local function __TS__ObjectValues(obj)
     local result = {}
     for key in pairs(obj) do
         result[#result + 1] = obj[key]

package/dist/lualib/ParseFloat.lua

@@ -1,4 +1,4 @@
-function __TS__ParseFloat(numberString)
+local function __TS__ParseFloat(numberString)
     local infinityMatch = string.match(numberString, "^%s*(-?Infinity)")
     if infinityMatch then
         local ____temp_0

package/dist/lualib/ParseInt.lua

@@ -1,40 +1,43 @@
-__TS__parseInt_base_pattern = "0123456789aAbBcCdDeEfFgGhHiIjJkKlLmMnNoOpPqQrRsStTvVwWxXyYzZ"
-function __TS__ParseInt(numberString, base)
-    if base == nil then
-        base = 10
-        local hexMatch = string.match(numberString, "^%s*-?0[xX]")
-        if hexMatch then
-            base = 16
-            local ____string_match_result__0_0
-            if string.match(hexMatch, "-") then
-                ____string_match_result__0_0 = "-" .. __TS__StringSubstr(numberString, #hexMatch)
-            else
-                ____string_match_result__0_0 = __TS__StringSubstr(numberString, #hexMatch)
+local __TS__ParseInt
+do
+    local parseIntBasePattern = "0123456789aAbBcCdDeEfFgGhHiIjJkKlLmMnNoOpPqQrRsStTvVwWxXyYzZ"
+    function __TS__ParseInt(numberString, base)
+        if base == nil then
+            base = 10
+            local hexMatch = string.match(numberString, "^%s*-?0[xX]")
+            if hexMatch then
+                base = 16
+                local ____string_match_result__0_0
+                if string.match(hexMatch, "-") then
+                    ____string_match_result__0_0 = "-" .. __TS__StringSubstr(numberString, #hexMatch)
+                else
+                    ____string_match_result__0_0 = __TS__StringSubstr(numberString, #hexMatch)
+                end
+                numberString = ____string_match_result__0_0
             end
-            numberString = ____string_match_result__0_0
         end
-    end
-    if base < 2 or base > 36 then
-        return 0 / 0
-    end
-    local ____temp_1
-    if base <= 10 then
-        ____temp_1 = __TS__StringSubstring(__TS__parseInt_base_pattern, 0, base)
-    else
-        ____temp_1 = __TS__StringSubstr(__TS__parseInt_base_pattern, 0, 10 + 2 * (base - 10))
-    end
-    local allowedDigits = ____temp_1
-    local pattern = ("^%s*(-?[" .. allowedDigits) .. "]*)"
-    local number = tonumber(
-        string.match(numberString, pattern),
-        base
-    )
-    if number == nil then
-        return 0 / 0
-    end
-    if number >= 0 then
-        return math.floor(number)
-    else
-        return math.ceil(number)
+        if base < 2 or base > 36 then
+            return 0 / 0
+        end
+        local ____temp_1
+        if base <= 10 then
+            ____temp_1 = __TS__StringSubstring(parseIntBasePattern, 0, base)
+        else
+            ____temp_1 = __TS__StringSubstr(parseIntBasePattern, 0, 10 + 2 * (base - 10))
+        end
+        local allowedDigits = ____temp_1
+        local pattern = ("^%s*(-?[" .. allowedDigits) .. "]*)"
+        local number = tonumber(
+            string.match(numberString, pattern),
+            base
+        )
+        if number == nil then
+            return 0 / 0
+        end
+        if number >= 0 then
+            return math.floor(number)
+        else
+            return math.ceil(number)
+        end
     end
 end