typescript-to-lua 1.19.1 → 1.19.3

package/dist/LuaLib.d.ts

@@ -2,6 +2,7 @@ import { EmitHost } from "./transpilation";
 import * as lua from "./LuaAST";
 import { LuaTarget } from "./CompilerOptions";
 export declare enum LuaLibFeature {
+    ArrayAt = "ArrayAt",
     ArrayConcat = "ArrayConcat",
     ArrayEntries = "ArrayEntries",
     ArrayEvery = "ArrayEvery",
@@ -59,6 +60,8 @@ export declare enum LuaLibFeature {
     Number = "Number",
     NumberIsFinite = "NumberIsFinite",
     NumberIsNaN = "NumberIsNaN",
+    NumberParseInt = "ParseInt",
+    NumberParseFloat = "ParseFloat",
     NumberToString = "NumberToString",
     NumberToFixed = "NumberToFixed",
     ObjectAssign = "ObjectAssign",

package/dist/LuaLib.js

@@ -7,6 +7,7 @@ const CompilerOptions_1 = require("./CompilerOptions");
 const utils_1 = require("./utils");
 var LuaLibFeature;
 (function (LuaLibFeature) {
+    LuaLibFeature["ArrayAt"] = "ArrayAt";
     LuaLibFeature["ArrayConcat"] = "ArrayConcat";
     LuaLibFeature["ArrayEntries"] = "ArrayEntries";
     LuaLibFeature["ArrayEvery"] = "ArrayEvery";
@@ -64,6 +65,8 @@ var LuaLibFeature;
     LuaLibFeature["Number"] = "Number";
     LuaLibFeature["NumberIsFinite"] = "NumberIsFinite";
     LuaLibFeature["NumberIsNaN"] = "NumberIsNaN";
+    LuaLibFeature["NumberParseInt"] = "ParseInt";
+    LuaLibFeature["NumberParseFloat"] = "ParseFloat";
     LuaLibFeature["NumberToString"] = "NumberToString";
     LuaLibFeature["NumberToFixed"] = "NumberToFixed";
     LuaLibFeature["ObjectAssign"] = "ObjectAssign";

package/dist/lualib/5.0/ArrayAt.lua

@@ -0,0 +1,7 @@
+local function __TS__ArrayAt(self, relativeIndex)
+    local absoluteIndex = relativeIndex < 0 and table.getn(self) + relativeIndex or relativeIndex
+    if absoluteIndex >= 0 and absoluteIndex < table.getn(self) then
+        return self[absoluteIndex + 1]
+    end
+    return nil
+end

package/dist/lualib/5.0/Error.lua

@@ -1,6 +1,9 @@
 local Error, RangeError, ReferenceError, SyntaxError, TypeError, URIError
 do
     local function getErrorStack(self, constructor)
+        if debug == nil then
+            return nil
+        end
         local level = 1
         while true do
             local info = debug.getinfo(level, "f")

package/dist/lualib/5.0/lualib_bundle.lua

@@ -1,3 +1,11 @@
+local function __TS__ArrayAt(self, relativeIndex)
+    local absoluteIndex = relativeIndex < 0 and table.getn(self) + relativeIndex or relativeIndex
+    if absoluteIndex >= 0 and absoluteIndex < table.getn(self) then
+        return self[absoluteIndex + 1]
+    end
+    return nil
+end
+
 local function __TS__ArrayIsArray(value)
     return type(value) == "table" and (value[1] ~= nil or next(value) == nil)
 end
@@ -1063,6 +1071,9 @@ end
 local Error, RangeError, ReferenceError, SyntaxError, TypeError, URIError
 do
     local function getErrorStack(self, constructor)
+        if debug == nil then
+            return nil
+        end
         local level = 1
         while true do
             local info = debug.getinfo(level, "f")
@@ -1500,6 +1511,68 @@ local function __TS__NumberIsNaN(value)
     return value ~= value
 end
 
+local function __TS__StringSubstring(self, start, ____end)
+    if ____end ~= ____end then
+        ____end = 0
+    end
+    if ____end ~= nil and start > ____end then
+        start, ____end = ____end, start
+    end
+    if start >= 0 then
+        start = start + 1
+    else
+        start = 1
+    end
+    if ____end ~= nil and ____end < 0 then
+        ____end = 0
+    end
+    return string.sub(self, start, ____end)
+end
+
+local __TS__ParseInt
+do
+    local parseIntBasePattern = "0123456789aAbBcCdDeEfFgGhHiIjJkKlLmMnNoOpPqQrRsStTvVwWxXyYzZ"
+    function __TS__ParseInt(numberString, base)
+        if base == nil then
+            base = 10
+            local hexMatch = __TS__Match(numberString, "^%s*-?0[xX]")
+            if hexMatch ~= nil then
+                base = 16
+                numberString = (__TS__Match(hexMatch, "-")) and "-" .. __TS__StringSubstring(
+                    numberString,
+                    string.len(hexMatch)
+                ) or __TS__StringSubstring(
+                    numberString,
+                    string.len(hexMatch)
+                )
+            end
+        end
+        if base < 2 or base > 36 then
+            return 0 / 0
+        end
+        local allowedDigits = base <= 10 and __TS__StringSubstring(parseIntBasePattern, 0, base) or __TS__StringSubstring(parseIntBasePattern, 0, 10 + 2 * (base - 10))
+        local pattern = ("^%s*(-?[" .. allowedDigits) .. "]*)"
+        local number = tonumber((__TS__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
+
+local function __TS__ParseFloat(numberString)
+    local infinityMatch = __TS__Match(numberString, "^%s*(-?Infinity)")
+    if infinityMatch ~= nil then
+        return __TS__StringAccess(infinityMatch, 0) == "-" and -(1 / 0) or 1 / 0
+    end
+    local number = tonumber((__TS__Match(numberString, "^%s*(-?%d+%.?%d*)")))
+    return number or 0 / 0
+end
+
 local __TS__NumberToString
 do
     local radixChars = "0123456789abcdefghijklmnopqrstuvwxyz"
@@ -1677,68 +1750,6 @@ local function __TS__ObjectValues(obj)
     return result
 end
 
-local function __TS__ParseFloat(numberString)
-    local infinityMatch = __TS__Match(numberString, "^%s*(-?Infinity)")
-    if infinityMatch ~= nil then
-        return __TS__StringAccess(infinityMatch, 0) == "-" and -(1 / 0) or 1 / 0
-    end
-    local number = tonumber((__TS__Match(numberString, "^%s*(-?%d+%.?%d*)")))
-    return number or 0 / 0
-end
-
-local function __TS__StringSubstring(self, start, ____end)
-    if ____end ~= ____end then
-        ____end = 0
-    end
-    if ____end ~= nil and start > ____end then
-        start, ____end = ____end, start
-    end
-    if start >= 0 then
-        start = start + 1
-    else
-        start = 1
-    end
-    if ____end ~= nil and ____end < 0 then
-        ____end = 0
-    end
-    return string.sub(self, start, ____end)
-end
-
-local __TS__ParseInt
-do
-    local parseIntBasePattern = "0123456789aAbBcCdDeEfFgGhHiIjJkKlLmMnNoOpPqQrRsStTvVwWxXyYzZ"
-    function __TS__ParseInt(numberString, base)
-        if base == nil then
-            base = 10
-            local hexMatch = __TS__Match(numberString, "^%s*-?0[xX]")
-            if hexMatch ~= nil then
-                base = 16
-                numberString = (__TS__Match(hexMatch, "-")) and "-" .. __TS__StringSubstring(
-                    numberString,
-                    string.len(hexMatch)
-                ) or __TS__StringSubstring(
-                    numberString,
-                    string.len(hexMatch)
-                )
-            end
-        end
-        if base < 2 or base > 36 then
-            return 0 / 0
-        end
-        local allowedDigits = base <= 10 and __TS__StringSubstring(parseIntBasePattern, 0, base) or __TS__StringSubstring(parseIntBasePattern, 0, 10 + 2 * (base - 10))
-        local pattern = ("^%s*(-?[" .. allowedDigits) .. "]*)"
-        local number = tonumber((__TS__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
-
 local function __TS__PromiseAll(iterable)
     local results = {}
     local toResolve = {}
@@ -2533,6 +2544,7 @@ local function __TS__UsingAsync(self, cb, ...)
 end
 
 return {
+  __TS__ArrayAt = __TS__ArrayAt,
   __TS__ArrayConcat = __TS__ArrayConcat,
   __TS__ArrayEntries = __TS__ArrayEntries,
   __TS__ArrayEvery = __TS__ArrayEvery,
@@ -2596,6 +2608,8 @@ return {
   __TS__Number = __TS__Number,
   __TS__NumberIsFinite = __TS__NumberIsFinite,
   __TS__NumberIsNaN = __TS__NumberIsNaN,
+  __TS__ParseInt = __TS__ParseInt,
+  __TS__ParseFloat = __TS__ParseFloat,
   __TS__NumberToString = __TS__NumberToString,
   __TS__NumberToFixed = __TS__NumberToFixed,
   __TS__ObjectAssign = __TS__ObjectAssign,

package/dist/lualib/5.0/lualib_module_info.json

@@ -1,4 +1,9 @@
 {
+  "ArrayAt": {
+    "exports": [
+      "__TS__ArrayAt"
+    ]
+  },
   "ArrayConcat": {
     "exports": [
       "__TS__ArrayConcat"
@@ -376,6 +381,24 @@
       "__TS__NumberIsNaN"
     ]
   },
+  "ParseInt": {
+    "exports": [
+      "__TS__ParseInt"
+    ],
+    "dependencies": [
+      "StringSubstring",
+      "Match"
+    ]
+  },
+  "ParseFloat": {
+    "exports": [
+      "__TS__ParseFloat"
+    ],
+    "dependencies": [
+      "StringAccess",
+      "Match"
+    ]
+  },
   "NumberToString": {
     "exports": [
       "__TS__NumberToString"
@@ -441,24 +464,6 @@
       "__TS__ObjectValues"
     ]
   },
-  "ParseFloat": {
-    "exports": [
-      "__TS__ParseFloat"
-    ],
-    "dependencies": [
-      "StringAccess",
-      "Match"
-    ]
-  },
-  "ParseInt": {
-    "exports": [
-      "__TS__ParseInt"
-    ],
-    "dependencies": [
-      "StringSubstring",
-      "Match"
-    ]
-  },
   "Promise": {
     "exports": [
       "__TS__Promise"

package/dist/lualib/universal/ArrayAt.lua

@@ -0,0 +1,7 @@
+local function __TS__ArrayAt(self, relativeIndex)
+    local absoluteIndex = relativeIndex < 0 and #self + relativeIndex or relativeIndex
+    if absoluteIndex >= 0 and absoluteIndex < #self then
+        return self[absoluteIndex + 1]
+    end
+    return nil
+end

package/dist/lualib/universal/Error.lua

@@ -1,6 +1,9 @@
 local Error, RangeError, ReferenceError, SyntaxError, TypeError, URIError
 do
     local function getErrorStack(self, constructor)
+        if debug == nil then
+            return nil
+        end
         local level = 1
         while true do
             local info = debug.getinfo(level, "f")

package/dist/lualib/universal/lualib_bundle.lua

@@ -1,3 +1,11 @@
+local function __TS__ArrayAt(self, relativeIndex)
+    local absoluteIndex = relativeIndex < 0 and #self + relativeIndex or relativeIndex
+    if absoluteIndex >= 0 and absoluteIndex < #self then
+        return self[absoluteIndex + 1]
+    end
+    return nil
+end
+
 local function __TS__ArrayIsArray(value)
     return type(value) == "table" and (value[1] ~= nil or next(value) == nil)
 end
@@ -1059,6 +1067,9 @@ end
 local Error, RangeError, ReferenceError, SyntaxError, TypeError, URIError
 do
     local function getErrorStack(self, constructor)
+        if debug == nil then
+            return nil
+        end
         local level = 1
         while true do
             local info = debug.getinfo(level, "f")
@@ -1440,6 +1451,62 @@ local function __TS__NumberIsNaN(value)
     return value ~= value
 end
 
+local function __TS__StringSubstring(self, start, ____end)
+    if ____end ~= ____end then
+        ____end = 0
+    end
+    if ____end ~= nil and start > ____end then
+        start, ____end = ____end, start
+    end
+    if start >= 0 then
+        start = start + 1
+    else
+        start = 1
+    end
+    if ____end ~= nil and ____end < 0 then
+        ____end = 0
+    end
+    return string.sub(self, start, ____end)
+end
+
+local __TS__ParseInt
+do
+    local parseIntBasePattern = "0123456789aAbBcCdDeEfFgGhHiIjJkKlLmMnNoOpPqQrRsStTvVwWxXyYzZ"
+    function __TS__ParseInt(numberString, base)
+        if base == nil then
+            base = 10
+            local hexMatch = __TS__Match(numberString, "^%s*-?0[xX]")
+            if hexMatch ~= nil then
+                base = 16
+                numberString = (__TS__Match(hexMatch, "-")) and "-" .. __TS__StringSubstring(numberString, #hexMatch) or __TS__StringSubstring(numberString, #hexMatch)
+            end
+        end
+        if base < 2 or base > 36 then
+            return 0 / 0
+        end
+        local allowedDigits = base <= 10 and __TS__StringSubstring(parseIntBasePattern, 0, base) or __TS__StringSubstring(parseIntBasePattern, 0, 10 + 2 * (base - 10))
+        local pattern = ("^%s*(-?[" .. allowedDigits) .. "]*)"
+        local number = tonumber((__TS__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
+
+local function __TS__ParseFloat(numberString)
+    local infinityMatch = __TS__Match(numberString, "^%s*(-?Infinity)")
+    if infinityMatch ~= nil then
+        return __TS__StringAccess(infinityMatch, 0) == "-" and -math.huge or math.huge
+    end
+    local number = tonumber((__TS__Match(numberString, "^%s*(-?%d+%.?%d*)")))
+    return number or 0 / 0
+end
+
 local __TS__NumberToString
 do
     local radixChars = "0123456789abcdefghijklmnopqrstuvwxyz"
@@ -1614,62 +1681,6 @@ local function __TS__ObjectValues(obj)
     return result
 end
 
-local function __TS__ParseFloat(numberString)
-    local infinityMatch = __TS__Match(numberString, "^%s*(-?Infinity)")
-    if infinityMatch ~= nil then
-        return __TS__StringAccess(infinityMatch, 0) == "-" and -math.huge or math.huge
-    end
-    local number = tonumber((__TS__Match(numberString, "^%s*(-?%d+%.?%d*)")))
-    return number or 0 / 0
-end
-
-local function __TS__StringSubstring(self, start, ____end)
-    if ____end ~= ____end then
-        ____end = 0
-    end
-    if ____end ~= nil and start > ____end then
-        start, ____end = ____end, start
-    end
-    if start >= 0 then
-        start = start + 1
-    else
-        start = 1
-    end
-    if ____end ~= nil and ____end < 0 then
-        ____end = 0
-    end
-    return string.sub(self, start, ____end)
-end
-
-local __TS__ParseInt
-do
-    local parseIntBasePattern = "0123456789aAbBcCdDeEfFgGhHiIjJkKlLmMnNoOpPqQrRsStTvVwWxXyYzZ"
-    function __TS__ParseInt(numberString, base)
-        if base == nil then
-            base = 10
-            local hexMatch = __TS__Match(numberString, "^%s*-?0[xX]")
-            if hexMatch ~= nil then
-                base = 16
-                numberString = (__TS__Match(hexMatch, "-")) and "-" .. __TS__StringSubstring(numberString, #hexMatch) or __TS__StringSubstring(numberString, #hexMatch)
-            end
-        end
-        if base < 2 or base > 36 then
-            return 0 / 0
-        end
-        local allowedDigits = base <= 10 and __TS__StringSubstring(parseIntBasePattern, 0, base) or __TS__StringSubstring(parseIntBasePattern, 0, 10 + 2 * (base - 10))
-        local pattern = ("^%s*(-?[" .. allowedDigits) .. "]*)"
-        local number = tonumber((__TS__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
-
 local function __TS__PromiseAll(iterable)
     local results = {}
     local toResolve = {}
@@ -2473,6 +2484,7 @@ local function __TS__UsingAsync(self, cb, ...)
 end
 
 return {
+  __TS__ArrayAt = __TS__ArrayAt,
   __TS__ArrayConcat = __TS__ArrayConcat,
   __TS__ArrayEntries = __TS__ArrayEntries,
   __TS__ArrayEvery = __TS__ArrayEvery,
@@ -2536,6 +2548,8 @@ return {
   __TS__Number = __TS__Number,
   __TS__NumberIsFinite = __TS__NumberIsFinite,
   __TS__NumberIsNaN = __TS__NumberIsNaN,
+  __TS__ParseInt = __TS__ParseInt,
+  __TS__ParseFloat = __TS__ParseFloat,
   __TS__NumberToString = __TS__NumberToString,
   __TS__NumberToFixed = __TS__NumberToFixed,
   __TS__ObjectAssign = __TS__ObjectAssign,

package/dist/lualib/universal/lualib_module_info.json

@@ -1,4 +1,9 @@
 {
+  "ArrayAt": {
+    "exports": [
+      "__TS__ArrayAt"
+    ]
+  },
   "ArrayConcat": {
     "exports": [
       "__TS__ArrayConcat"
@@ -382,6 +387,24 @@
       "__TS__NumberIsNaN"
     ]
   },
+  "ParseInt": {
+    "exports": [
+      "__TS__ParseInt"
+    ],
+    "dependencies": [
+      "StringSubstring",
+      "Match"
+    ]
+  },
+  "ParseFloat": {
+    "exports": [
+      "__TS__ParseFloat"
+    ],
+    "dependencies": [
+      "StringAccess",
+      "Match"
+    ]
+  },
   "NumberToString": {
     "exports": [
       "__TS__NumberToString"
@@ -447,24 +470,6 @@
       "__TS__ObjectValues"
     ]
   },
-  "ParseFloat": {
-    "exports": [
-      "__TS__ParseFloat"
-    ],
-    "dependencies": [
-      "StringAccess",
-      "Match"
-    ]
-  },
-  "ParseInt": {
-    "exports": [
-      "__TS__ParseInt"
-    ],
-    "dependencies": [
-      "StringSubstring",
-      "Match"
-    ]
-  },
   "Promise": {
     "exports": [
       "__TS__Promise"

package/dist/transformation/builtins/array.js

@@ -60,6 +60,8 @@ function transformArrayPrototypeCall(context, node, calledMethod) {
     const [caller, params] = (0, call_1.transformCallAndArguments)(context, calledMethod.expression, node.arguments, signature);
     const expressionName = calledMethod.name.text;
     switch (expressionName) {
+        case "at":
+            return (0, lualib_1.transformLuaLibFunction)(context, lualib_1.LuaLibFeature.ArrayAt, node, caller, ...params);
         case "concat":
             return (0, lualib_1.transformLuaLibFunction)(context, lualib_1.LuaLibFeature.ArrayConcat, node, caller, ...params);
         case "entries":

package/dist/transformation/builtins/number.js

@@ -30,6 +30,10 @@ function transformNumberConstructorCall(context, node, calledMethod) {
             return (0, lualib_1.transformLuaLibFunction)(context, lualib_1.LuaLibFeature.NumberIsNaN, node, ...parameters);
         case "isFinite":
             return (0, lualib_1.transformLuaLibFunction)(context, lualib_1.LuaLibFeature.NumberIsFinite, node, ...parameters);
+        case "parseInt":
+            return (0, lualib_1.transformLuaLibFunction)(context, lualib_1.LuaLibFeature.NumberParseInt, node, ...parameters);
+        case "parseFloat":
+            return (0, lualib_1.transformLuaLibFunction)(context, lualib_1.LuaLibFeature.NumberParseFloat, node, ...parameters);
         default:
             context.diagnostics.push((0, diagnostics_1.unsupportedProperty)(calledMethod.name, "Number", methodName));
     }

package/package.json

@@ -1,6 +1,6 @@
 {
     "name": "typescript-to-lua",
-    "version": "1.19.1",
+    "version": "1.19.3",
     "description": "A generic TypeScript to Lua transpiler. Write your code in TypeScript and publish Lua!",
     "repository": "https://github.com/TypeScriptToLua/TypeScriptToLua",
     "homepage": "https://typescripttolua.github.io/",