typescript-to-lua 1.1.1 → 1.2.0

package/dist/lualib/Map.lua

@@ -1,144 +1,140 @@
-Map = (function()
-    local 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])
-            end
-        else
-            local array = entries
-            for ____, kvp in ipairs(array) do
-                self:set(kvp[1], kvp[2])
-            end
-        end
+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
-    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
+    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
-            self.nextKey[key] = nil
-            self.previousKey[key] = nil
+            local value = result.value
+            self:set(value[1], value[2])
         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)
+    else
+        local array = entries
+        for ____, kvp in ipairs(array) do
+            self:set(kvp[1], kvp[2])
         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
-        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
+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
         end
-        return self
+        self.nextKey[key] = nil
+        self.previousKey[key] = nil
     end
-    Map.prototype[Symbol.iterator] = function(self)
-        return self:entries()
+    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)
     end
-    function Map.prototype.entries(self)
-        local ____ = self
-        local items = ____.items
-        local nextKey = ____.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.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
     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
-        }
+    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
-    function Map.prototype.values(self)
-        local ____ = self
-        local items = ____.items
-        local nextKey = ____.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
-    return Map
-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
+Map = Map

package/dist/lualib/Number.lua

@@ -19,7 +19,7 @@ function __TS__Number(value)
         end
         return 0 / 0
     elseif valueType == "boolean" then
-        return (value and 1) or 0
+        return value and 1 or 0
     else
         return 0 / 0
     end

package/dist/lualib/NumberIsFinite.lua

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

package/dist/lualib/NumberToString.lua

@@ -1,15 +1,13 @@
 ____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
+    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
+    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 integer, fraction = math.modf(math.abs(self))
     local result = ""
     if radix == 8 then
         result = string.format("%o", integer)

package/dist/lualib/ObjectDefineProperty.lua

@@ -1,7 +1,13 @@
 function __TS__ObjectDefineProperty(target, key, desc)
-    local luaKey = (((type(key) == "number") and (function() return key + 1 end)) or (function() return key end))()
+    local ____temp_0
+    if type(key) == "number" then
+        ____temp_0 = key + 1
+    else
+        ____temp_0 = key
+    end
+    local luaKey = ____temp_0
     local value = rawget(target, luaKey)
-    local hasGetterOrSetter = (desc.get ~= nil) or (desc.set ~= nil)
+    local hasGetterOrSetter = desc.get ~= nil or desc.set ~= nil
     local descriptor
     if hasGetterOrSetter then
         if value ~= nil then
@@ -13,13 +19,39 @@ function __TS__ObjectDefineProperty(target, key, desc)
         descriptor = desc
     else
         local valueExists = value ~= nil
+        local ____desc_set_5 = desc.set
+        local ____desc_get_6 = desc.get
+        local ____temp_1
+        if desc.configurable ~= nil then
+            ____temp_1 = desc.configurable
+        else
+            ____temp_1 = valueExists
+        end
+        local ____temp_2
+        if desc.enumerable ~= nil then
+            ____temp_2 = desc.enumerable
+        else
+            ____temp_2 = valueExists
+        end
+        local ____temp_3
+        if desc.writable ~= nil then
+            ____temp_3 = desc.writable
+        else
+            ____temp_3 = valueExists
+        end
+        local ____temp_4
+        if desc.value ~= nil then
+            ____temp_4 = desc.value
+        else
+            ____temp_4 = value
+        end
         descriptor = {
-            set = desc.set,
-            get = desc.get,
-            configurable = (((desc.configurable ~= nil) and (function() return desc.configurable end)) or (function() return valueExists end))(),
-            enumerable = (((desc.enumerable ~= nil) and (function() return desc.enumerable end)) or (function() return valueExists end))(),
-            writable = (((desc.writable ~= nil) and (function() return desc.writable end)) or (function() return valueExists end))(),
-            value = (((desc.value ~= nil) and (function() return desc.value end)) or (function() return value end))()
+            set = ____desc_set_5,
+            get = ____desc_get_6,
+            configurable = ____temp_1,
+            enumerable = ____temp_2,
+            writable = ____temp_3,
+            value = ____temp_4
         }
     end
     __TS__SetDescriptor(target, luaKey, descriptor)

package/dist/lualib/ParseFloat.lua

@@ -1,10 +1,14 @@
 function __TS__ParseFloat(numberString)
     local infinityMatch = string.match(numberString, "^%s*(-?Infinity)")
     if infinityMatch then
-        return (((__TS__StringAccess(infinityMatch, 0) == "-") and (function() return -math.huge end)) or (function() return math.huge end))()
+        local ____temp_0
+        if __TS__StringAccess(infinityMatch, 0) == "-" then
+            ____temp_0 = -math.huge
+        else
+            ____temp_0 = math.huge
+        end
+        return ____temp_0
     end
-    local number = tonumber(
-        string.match(numberString, "^%s*(-?%d+%.?%d*)")
-    )
-    return number or (0 / 0)
+    local number = tonumber(string.match(numberString, "^%s*(-?%d+%.?%d*)"))
+    return number or 0 / 0
 end

package/dist/lualib/ParseInt.lua

@@ -5,13 +5,25 @@ function __TS__ParseInt(numberString, base)
         local hexMatch = string.match(numberString, "^%s*-?0[xX]")
         if hexMatch then
             base = 16
-            numberString = ((string.match(hexMatch, "-") and (function() return "-" .. __TS__StringSubstr(numberString, #hexMatch) end)) or (function() return __TS__StringSubstr(numberString, #hexMatch) end))()
+            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
     end
-    if (base < 2) or (base > 36) then
+    if base < 2 or base > 36 then
         return 0 / 0
     end
-    local allowedDigits = (((base <= 10) and (function() return __TS__StringSubstring(__TS__parseInt_base_pattern, 0, base) end)) or (function() return __TS__StringSubstr(__TS__parseInt_base_pattern, 0, 10 + (2 * (base - 10))) 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),

package/dist/lualib/Promise.lua

@@ -31,15 +31,13 @@ function __TS__Promise.prototype.____constructor(self, executor)
         local function ____catch(e)
             self:reject(e)
         end
-        local ____try, ____hasReturned = pcall(
-            function()
-                executor(
-                    _G,
-                    __TS__FunctionBind(self.resolve, self),
-                    __TS__FunctionBind(self.reject, self)
-                )
-            end
-        )
+        local ____try, ____hasReturned = pcall(function()
+            executor(
+                _G,
+                __TS__FunctionBind(self.resolve, self),
+                __TS__FunctionBind(self.reject, self)
+            )
+        end)
         if not ____try then
             ____hasReturned, ____returnValue = ____catch(____hasReturned)
         end
@@ -66,10 +64,10 @@ function __TS__Promise.reject(reason)
     return promise
 end
 __TS__Promise.prototype["then"] = function(self, onFulfilled, onRejected)
-    local ____ = __TS__PromiseDeferred(_G)
-    local promise = ____.promise
-    local resolve = ____.resolve
-    local reject = ____.reject
+    local ____TS__PromiseDeferred_result_0 = __TS__PromiseDeferred(_G)
+    local promise = ____TS__PromiseDeferred_result_0.promise
+    local resolve = ____TS__PromiseDeferred_result_0.resolve
+    local reject = ____TS__PromiseDeferred_result_0.reject
     local isFulfilled = self.state == __TS__PromiseState.Fulfilled
     local isRejected = self.state == __TS__PromiseState.Rejected
     if onFulfilled then
@@ -141,15 +139,13 @@ function __TS__Promise.prototype.createPromiseResolvingCallback(self, f, resolve
             local function ____catch(e)
                 reject(_G, e)
             end
-            local ____try, ____hasReturned = pcall(
-                function()
-                    self:handleCallbackData(
-                        f(_G, value),
-                        resolve,
-                        reject
-                    )
-                end
-            )
+            local ____try, ____hasReturned = pcall(function()
+                self:handleCallbackData(
+                    f(_G, value),
+                    resolve,
+                    reject
+                )
+            end)
             if not ____try then
                 ____hasReturned, ____returnValue = ____catch(____hasReturned)
             end