typescript-to-lua 1.10.0-beta.0 → 1.10.1

package/dist/lualib/5.0/Generator.lua

@@ -25,7 +25,7 @@ do
             local args = arg
             local argsLength = __TS__CountVarargs(unpack(arg))
             return {
-                ____coroutine = coroutine.create(function() return fn(__TS__Spread(__TS__Unpack(nil, args, 1, argsLength))) end),
+                ____coroutine = coroutine.create(function() return fn(__TS__Unpack(args, 1, argsLength)) end),
                 [Symbol.iterator] = generatorIterator,
                 next = generatorNext
             }

package/dist/lualib/5.0/SparseArraySpread.lua

@@ -1,3 +1,3 @@
 local function __TS__SparseArraySpread(sparseArray)
-    return unpack(nil, sparseArray, 1, sparseArray.sparseLength)
+    return __TS__Unpack(sparseArray, 1, sparseArray.sparseLength)
 end

package/dist/lualib/5.0/Unpack.lua

@@ -1 +1,18 @@
-local __TS__Unpack = unpack
+local function __TS__Unpack(list, i, j)
+    if i == 1 and j == nil then
+        return unpack(nil, list)
+    else
+        if j == nil then
+            j = table.getn(list)
+        end
+        local slice = {}
+        do
+            local n = i
+            while n <= j do
+                slice[n - i + 1] = list[n]
+                n = n + 1
+            end
+        end
+        return unpack(slice)
+    end
+end

package/dist/lualib/5.0/lualib_bundle.lua

@@ -1184,24 +1184,25 @@ local function __TS__DelegatedYield(iterable)
     end
 end
 
-local function __TS__Spread(iterable)
-    local arr = {}
-    if type(iterable) == "string" then
-        for i = 0, string.len(iterable) - 1 do
-            arr[i + 1] = __TS__StringAccess(iterable, i)
-        end
+local function __TS__Unpack(list, i, j)
+    if i == 1 and j == nil then
+        return unpack(nil, list)
     else
-        local len = 0
-        for ____, item in __TS__Iterator(iterable) do
-            len = len + 1
-            arr[len] = item
+        if j == nil then
+            j = table.getn(list)
+        end
+        local slice = {}
+        do
+            local n = i
+            while n <= j do
+                slice[n - i + 1] = list[n]
+                n = n + 1
+            end
         end
+        return unpack(slice)
     end
-    return unpack(arr)
 end
 
-local __TS__Unpack = unpack
-
 local __TS__Generator
 do
     local function generatorIterator(self)
@@ -1229,7 +1230,7 @@ do
             local args = arg
             local argsLength = __TS__CountVarargs(unpack(arg))
             return {
-                ____coroutine = coroutine.create(function() return fn(__TS__Spread(__TS__Unpack(nil, args, 1, argsLength))) end),
+                ____coroutine = coroutine.create(function() return fn(__TS__Unpack(args, 1, argsLength)) end),
                 [Symbol.iterator] = generatorIterator,
                 next = generatorNext
             }
@@ -2069,7 +2070,7 @@ local function __TS__SparseArrayPush(sparseArray, ...)
 end
 
 local function __TS__SparseArraySpread(sparseArray)
-    return unpack(nil, sparseArray, 1, sparseArray.sparseLength)
+    return __TS__Unpack(sparseArray, 1, sparseArray.sparseLength)
 end
 
 local WeakMap
@@ -2217,6 +2218,22 @@ local function __TS__SourceMapTraceBack(fileName, sourceMap)
     end
 end
 
+local function __TS__Spread(iterable)
+    local arr = {}
+    if type(iterable) == "string" then
+        for i = 0, string.len(iterable) - 1 do
+            arr[i + 1] = __TS__StringAccess(iterable, i)
+        end
+    else
+        local len = 0
+        for ____, item in __TS__Iterator(iterable) do
+            len = len + 1
+            arr[len] = item
+        end
+    end
+    return unpack(arr)
+end
+
 local function __TS__StringCharAt(self, pos)
     if pos ~= pos then
         pos = 0

package/dist/lualib/5.0/lualib_module_info.json

@@ -254,7 +254,6 @@
       "__TS__Generator"
     ],
     "dependencies": [
-      "Spread",
       "Symbol",
       "CountVarargs",
       "Unpack"
@@ -518,6 +517,9 @@
   "SparseArraySpread": {
     "exports": [
       "__TS__SparseArraySpread"
+    ],
+    "dependencies": [
+      "Unpack"
     ]
   },
   "WeakMap": {

package/dist/transformation/utils/diagnostics.js

@@ -57,7 +57,7 @@ exports.annotationRemoved = createErrorDiagnosticFactory((kind) => `'@${kind}' h
     `See https://typescripttolua.github.io/docs/advanced/compiler-annotations#${kind.toLowerCase()} for more information.`);
 exports.annotationDeprecated = createWarningDiagnosticFactory((kind) => `'@${kind}' is deprecated and will be removed in a future update. Please update your code before upgrading to the next release, otherwise your project will no longer compile. ` +
     `See https://typescripttolua.github.io/docs/advanced/compiler-annotations#${kind.toLowerCase()} for more information.`);
-exports.truthyOnlyConditionalValue = createWarningDiagnosticFactory("Numbers and strings will always evaluate to true in Lua. Explicitly check the value with ===.");
+exports.truthyOnlyConditionalValue = createWarningDiagnosticFactory("Only false and nil evaluate to 'false' in Lua, everything else is considered 'true'. Explicitly compare the value with ===.");
 exports.notAllowedOptionalAssignment = createErrorDiagnosticFactory("The left-hand side of an assignment expression may not be an optional property access.");
 exports.awaitMustBeInAsyncFunction = createErrorDiagnosticFactory("Await can only be used inside async functions.");
 exports.unsupportedBuiltinOptionalCall = createErrorDiagnosticFactory("Optional calls are not supported for builtin or language extension functions.");

package/dist/transformation/visitors/conditional.js

@@ -76,6 +76,10 @@ function transformIfStatement(statement, context) {
 }
 exports.transformIfStatement = transformIfStatement;
 function checkOnlyTruthyCondition(condition, context) {
+    if (context.options.strictNullChecks === false)
+        return; // This check is not valid if everything could implicitly be nil
+    if (ts.isElementAccessExpression(condition))
+        return; // Array index could always implicitly return nil
     if (!(0, typescript_1.canBeFalsy)(context, context.checker.getTypeAtLocation(condition))) {
         context.diagnostics.push((0, diagnostics_1.truthyOnlyConditionalValue)(condition));
     }

package/dist/transpilation/resolve.js

@@ -260,11 +260,11 @@ function isBuildModeLibrary(program) {
 function findRequiredPaths(code) {
     // Find all require("<path>") paths in a lua code string
     const paths = [];
-    const pattern = /(^|\s|;|=|\()require\("(.+?)"\)/g;
+    const pattern = /(^|\s|;|=|\()require\s*\(?(["|'])(.+?)\2\)?/g;
     // eslint-disable-next-line @typescript-eslint/ban-types
     let match;
     while ((match = pattern.exec(code))) {
-        paths.push(match[2]);
+        paths.push(match[3]);
     }
     return paths;
 }
@@ -272,7 +272,7 @@ function replaceRequireInCode(file, originalRequire, newRequire) {
     const requirePath = (0, utils_1.formatPathToLuaPath)(newRequire.replace(".lua", ""));
     // Escape special characters to prevent the regex from breaking...
     const escapedRequire = originalRequire.replace(/[-/\\^$*+?.()|[\]{}]/g, "\\$&");
-    file.code = file.code.replace(new RegExp(`(^|\\s|;|=|\\()require\\("${escapedRequire}"\\)`), `$1require("${requirePath}")`);
+    file.code = file.code.replace(new RegExp(`(^|\\s|;|=|\\()require\\s*\\(?["|']${escapedRequire}["|']\\)?`), `$1require("${requirePath}")`);
 }
 function replaceRequireInSourceMap(file, originalRequire, newRequire) {
     const requirePath = (0, utils_1.formatPathToLuaPath)(newRequire.replace(".lua", ""));

package/package.json

@@ -1,6 +1,6 @@
 {
     "name": "typescript-to-lua",
-    "version": "1.10.0-beta.0",
+    "version": "1.10.1",
     "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/",
@@ -65,7 +65,7 @@
         "javascript-stringify": "^2.0.1",
         "jest": "^28.1.3",
         "jest-circus": "^29.0.1",
-        "lua-types": "^2.13.0-beta.0",
+        "lua-types": "^2.13.0",
         "lua-wasm-bindings": "^0.3.1",
         "prettier": "^2.3.2",
         "ts-jest": "^28.0.8",

package/dist/lualib/ArrayConcat.lua

@@ -1,22 +0,0 @@
-local function __TS__ArrayConcat(self, ...)
-    local items = {...}
-    local result = {}
-    local len = 0
-    for i = 1, #self do
-        len = len + 1
-        result[len] = self[i]
-    end
-    for i = 1, #items do
-        local item = items[i]
-        if __TS__ArrayIsArray(item) then
-            for j = 1, #item do
-                len = len + 1
-                result[len] = item[j]
-            end
-        else
-            len = len + 1
-            result[len] = item
-        end
-    end
-    return result
-end

package/dist/lualib/ArrayEntries.lua

@@ -1,13 +0,0 @@
-local function __TS__ArrayEntries(array)
-    local key = 0
-    return {
-        [Symbol.iterator] = function(self)
-            return self
-        end,
-        next = function(self)
-            local result = {done = array[key + 1] == nil, value = {key, array[key + 1]}}
-            key = key + 1
-            return result
-        end
-    }
-end

package/dist/lualib/ArrayEvery.lua

@@ -1,8 +0,0 @@
-local function __TS__ArrayEvery(self, callbackfn, thisArg)
-    for i = 1, #self do
-        if not callbackfn(thisArg, self[i], i - 1, self) then
-            return false
-        end
-    end
-    return true
-end

package/dist/lualib/ArrayFilter.lua

@@ -1,11 +0,0 @@
-local function __TS__ArrayFilter(self, callbackfn, thisArg)
-    local result = {}
-    local len = 0
-    for i = 1, #self do
-        if callbackfn(thisArg, self[i], i - 1, self) then
-            len = len + 1
-            result[len] = self[i]
-        end
-    end
-    return result
-end

package/dist/lualib/ArrayFind.lua

@@ -1,9 +0,0 @@
-local function __TS__ArrayFind(self, predicate, thisArg)
-    for i = 1, #self do
-        local elem = self[i]
-        if predicate(thisArg, elem, i - 1, self) then
-            return elem
-        end
-    end
-    return nil
-end

package/dist/lualib/ArrayFindIndex.lua

@@ -1,8 +0,0 @@
-local function __TS__ArrayFindIndex(self, callbackFn, thisArg)
-    for i = 1, #self do
-        if callbackFn(thisArg, self[i], i - 1, self) then
-            return i - 1
-        end
-    end
-    return -1
-end

package/dist/lualib/ArrayFlat.lua

@@ -1,27 +0,0 @@
-local function __TS__ArrayFlat(self, depth)
-    if depth == nil then
-        depth = 1
-    end
-    local result = {}
-    local len = 0
-    for i = 1, #self do
-        local value = self[i]
-        if depth > 0 and __TS__ArrayIsArray(value) then
-            local toAdd
-            if depth == 1 then
-                toAdd = value
-            else
-                toAdd = __TS__ArrayFlat(value, depth - 1)
-            end
-            for j = 1, #toAdd do
-                local val = toAdd[j]
-                len = len + 1
-                result[len] = val
-            end
-        else
-            len = len + 1
-            result[len] = value
-        end
-    end
-    return result
-end

package/dist/lualib/ArrayFlatMap.lua

@@ -1,17 +0,0 @@
-local function __TS__ArrayFlatMap(self, callback, thisArg)
-    local result = {}
-    local len = 0
-    for i = 1, #self do
-        local value = callback(thisArg, self[i], i - 1, self)
-        if __TS__ArrayIsArray(value) then
-            for j = 1, #value do
-                len = len + 1
-                result[len] = value[j]
-            end
-        else
-            len = len + 1
-            result[len] = value
-        end
-    end
-    return result
-end

package/dist/lualib/ArrayForEach.lua

@@ -1,5 +0,0 @@
-local function __TS__ArrayForEach(self, callbackFn, thisArg)
-    for i = 1, #self do
-        callbackFn(thisArg, self[i], i - 1, self)
-    end
-end

package/dist/lualib/ArrayFrom.lua

@@ -1,29 +0,0 @@
-local __TS__ArrayFrom
-do
-    local function arrayLikeStep(self, index)
-        index = index + 1
-        if index > self.length then
-            return
-        end
-        return index, self[index]
-    end
-    local function arrayLikeIterator(arr)
-        if type(arr.length) == "number" then
-            return arrayLikeStep, arr, 0
-        end
-        return __TS__Iterator(arr)
-    end
-    function __TS__ArrayFrom(arrayLike, mapFn, thisArg)
-        local result = {}
-        if mapFn == nil then
-            for ____, v in arrayLikeIterator(arrayLike) do
-                result[#result + 1] = v
-            end
-        else
-            for i, v in arrayLikeIterator(arrayLike) do
-                result[#result + 1] = mapFn(thisArg, v, i - 1)
-            end
-        end
-        return result
-    end
-end

package/dist/lualib/ArrayIncludes.lua

@@ -1,19 +0,0 @@
-local function __TS__ArrayIncludes(self, searchElement, fromIndex)
-    if fromIndex == nil then
-        fromIndex = 0
-    end
-    local len = #self
-    local k = fromIndex
-    if fromIndex < 0 then
-        k = len + fromIndex
-    end
-    if k < 0 then
-        k = 0
-    end
-    for i = k + 1, len do
-        if self[i] == searchElement then
-            return true
-        end
-    end
-    return false
-end

package/dist/lualib/ArrayIndexOf.lua

@@ -1,24 +0,0 @@
-local function __TS__ArrayIndexOf(self, searchElement, fromIndex)
-    if fromIndex == nil then
-        fromIndex = 0
-    end
-    local len = #self
-    if len == 0 then
-        return -1
-    end
-    if fromIndex >= len then
-        return -1
-    end
-    if fromIndex < 0 then
-        fromIndex = len + fromIndex
-        if fromIndex < 0 then
-            fromIndex = 0
-        end
-    end
-    for i = fromIndex + 1, len do
-        if self[i] == searchElement then
-            return i - 1
-        end
-    end
-    return -1
-end

package/dist/lualib/ArrayIsArray.lua

@@ -1,3 +0,0 @@
-local function __TS__ArrayIsArray(value)
-    return type(value) == "table" and (value[1] ~= nil or next(value) == nil)
-end

package/dist/lualib/ArrayJoin.lua

@@ -1,10 +0,0 @@
-local function __TS__ArrayJoin(self, separator)
-    if separator == nil then
-        separator = ","
-    end
-    local parts = {}
-    for i = 1, #self do
-        parts[i] = tostring(self[i])
-    end
-    return table.concat(parts, separator)
-end

package/dist/lualib/ArrayMap.lua

@@ -1,7 +0,0 @@
-local function __TS__ArrayMap(self, callbackfn, thisArg)
-    local result = {}
-    for i = 1, #self do
-        result[i] = callbackfn(thisArg, self[i], i - 1, self)
-    end
-    return result
-end

package/dist/lualib/ArrayPush.lua

@@ -1,9 +0,0 @@
-local function __TS__ArrayPush(self, ...)
-    local items = {...}
-    local len = #self
-    for i = 1, #items do
-        len = len + 1
-        self[len] = items[i]
-    end
-    return len
-end

package/dist/lualib/ArrayPushArray.lua

@@ -1,8 +0,0 @@
-local function __TS__ArrayPushArray(self, items)
-    local len = #self
-    for i = 1, #items do
-        len = len + 1
-        self[len] = items[i]
-    end
-    return len
-end

package/dist/lualib/ArrayReduce.lua

@@ -1,23 +0,0 @@
-local function __TS__ArrayReduce(self, callbackFn, ...)
-    local len = #self
-    local k = 0
-    local accumulator = nil
-    if select("#", ...) ~= 0 then
-        accumulator = ...
-    elseif len > 0 then
-        accumulator = self[1]
-        k = 1
-    else
-        error("Reduce of empty array with no initial value", 0)
-    end
-    for i = k + 1, len do
-        accumulator = callbackFn(
-            nil,
-            accumulator,
-            self[i],
-            i - 1,
-            self
-        )
-    end
-    return accumulator
-end

package/dist/lualib/ArrayReduceRight.lua

@@ -1,23 +0,0 @@
-local function __TS__ArrayReduceRight(self, callbackFn, ...)
-    local len = #self
-    local k = len - 1
-    local accumulator = nil
-    if select("#", ...) ~= 0 then
-        accumulator = ...
-    elseif len > 0 then
-        accumulator = self[k + 1]
-        k = k - 1
-    else
-        error("Reduce of empty array with no initial value", 0)
-    end
-    for i = k + 1, 1, -1 do
-        accumulator = callbackFn(
-            nil,
-            accumulator,
-            self[i],
-            i - 1,
-            self
-        )
-    end
-    return accumulator
-end

package/dist/lualib/ArrayReverse.lua

@@ -1,12 +0,0 @@
-local function __TS__ArrayReverse(self)
-    local i = 1
-    local j = #self
-    while i < j do
-        local temp = self[j]
-        self[j] = self[i]
-        self[i] = temp
-        i = i + 1
-        j = j - 1
-    end
-    return self
-end

package/dist/lualib/ArraySetLength.lua

@@ -1,12 +0,0 @@
-local function __TS__ArraySetLength(self, length)
-    if length < 0 or length ~= length or length == math.huge or math.floor(length) ~= length then
-        error(
-            "invalid array length: " .. tostring(length),
-            0
-        )
-    end
-    for i = length + 1, #self do
-        self[i] = nil
-    end
-    return length
-end

package/dist/lualib/ArraySlice.lua

@@ -1,43 +0,0 @@
-local function __TS__ArraySlice(self, first, last)
-    local len = #self
-    local ____first_0 = first
-    if ____first_0 == nil then
-        ____first_0 = 0
-    end
-    first = ____first_0
-    if first < 0 then
-        first = len + first
-        if first < 0 then
-            first = 0
-        end
-    else
-        if first > len then
-            first = len
-        end
-    end
-    local ____last_1 = last
-    if ____last_1 == nil then
-        ____last_1 = len
-    end
-    last = ____last_1
-    if last < 0 then
-        last = len + last
-        if last < 0 then
-            last = 0
-        end
-    else
-        if last > len then
-            last = len
-        end
-    end
-    local out = {}
-    first = first + 1
-    last = last + 1
-    local n = 1
-    while first < last do
-        out[n] = self[first]
-        first = first + 1
-        n = n + 1
-    end
-    return out
-end

package/dist/lualib/ArraySome.lua

@@ -1,8 +0,0 @@
-local function __TS__ArraySome(self, callbackfn, thisArg)
-    for i = 1, #self do
-        if callbackfn(thisArg, self[i], i - 1, self) then
-            return true
-        end
-    end
-    return false
-end

package/dist/lualib/ArraySort.lua

@@ -1,11 +0,0 @@
-local function __TS__ArraySort(self, compareFn)
-    if compareFn ~= nil then
-        table.sort(
-            self,
-            function(a, b) return compareFn(nil, a, b) < 0 end
-        )
-    else
-        table.sort(self)
-    end
-    return self
-end