typescript-to-lua 1.13.0 → 1.13.2

package/dist/lualib/universal/SourceMapTraceBack.lua

@@ -9,7 +9,7 @@ local function __TS__SourceMapTraceBack(fileName, sourceMap)
             if thread == nil and message == nil and level == nil then
                 trace = originalTraceback()
             elseif __TS__StringIncludes(_VERSION, "Lua 5.0") then
-                trace = originalTraceback((("[Level " .. tostring(level)) .. "] ") .. message)
+                trace = originalTraceback((("[Level " .. tostring(level)) .. "] ") .. tostring(message))
             else
                 trace = originalTraceback(thread, message, level)
             end
@@ -18,12 +18,12 @@ local function __TS__SourceMapTraceBack(fileName, sourceMap)
             end
             local function replacer(____, file, srcFile, line)
                 local fileSourceMap = _G.__TS__sourcemap[file]
-                if fileSourceMap and fileSourceMap[line] then
+                if fileSourceMap ~= nil and fileSourceMap[line] ~= nil then
                     local data = fileSourceMap[line]
                     if type(data) == "number" then
                         return (srcFile .. ":") .. tostring(data)
                     end
-                    return (tostring(data.file) .. ":") .. tostring(data.line)
+                    return (data.file .. ":") .. tostring(data.line)
                 end
                 return (file .. ":") .. line
             end
@@ -34,14 +34,14 @@ local function __TS__SourceMapTraceBack(fileName, sourceMap)
             )
             local function stringReplacer(____, file, line)
                 local fileSourceMap = _G.__TS__sourcemap[file]
-                if fileSourceMap and fileSourceMap[line] then
+                if fileSourceMap ~= nil and fileSourceMap[line] ~= nil then
                     local chunkName = __TS__Match(file, "%[string \"([^\"]+)\"%]")
                     local sourceName = string.gsub(chunkName, ".lua$", ".ts")
                     local data = fileSourceMap[line]
                     if type(data) == "number" then
                         return (sourceName .. ":") .. tostring(data)
                     end
-                    return (tostring(data.file) .. ":") .. tostring(data.line)
+                    return (data.file .. ":") .. tostring(data.line)
                 end
                 return (file .. ":") .. line
             end

package/dist/lualib/universal/StringReplace.lua

@@ -7,13 +7,7 @@ do
             return source
         end
         local before = sub(source, 1, startPos - 1)
-        local ____temp_0
-        if type(replaceValue) == "string" then
-            ____temp_0 = replaceValue
-        else
-            ____temp_0 = replaceValue(nil, searchValue, startPos - 1, source)
-        end
-        local replacement = ____temp_0
+        local replacement = type(replaceValue) == "string" and replaceValue or replaceValue(nil, searchValue, startPos - 1, source)
         local after = sub(source, endPos + 1)
         return (before .. replacement) .. after
     end

package/dist/lualib/universal/SymbolRegistry.lua

@@ -13,5 +13,6 @@ do
                 return key
             end
         end
+        return nil
     end
 end

package/dist/lualib/universal/lualib_bundle.lua

@@ -762,13 +762,7 @@ local function __TS__AsyncAwaiter(generator)
         function(____, resolve, reject)
             local adopt, fulfilled, step, resolved, asyncCoroutine
             function adopt(self, value)
-                local ____temp_0
-                if __TS__InstanceOf(value, __TS__Promise) then
-                    ____temp_0 = value
-                else
-                    ____temp_0 = __TS__Promise.resolve(value)
-                end
-                return ____temp_0
+                return __TS__InstanceOf(value, __TS__Promise) and value or __TS__Promise.resolve(value)
             end
             function fulfilled(self, value)
                 local success, resultOrError = coroutine.resume(asyncCoroutine, value)
@@ -785,8 +779,8 @@ local function __TS__AsyncAwaiter(generator)
                 if coroutine.status(asyncCoroutine) == "dead" then
                     resolve(nil, result)
                 else
-                    local ____self_1 = adopt(nil, result)
-                    ____self_1["then"](____self_1, fulfilled, reject)
+                    local ____self_0 = adopt(nil, result)
+                    ____self_0["then"](____self_0, fulfilled, reject)
                 end
             end
             resolved = false
@@ -795,8 +789,8 @@ local function __TS__AsyncAwaiter(generator)
                 asyncCoroutine,
                 function(____, v)
                     resolved = true
-                    local ____self_2 = adopt(nil, v)
-                    ____self_2["then"](____self_2, resolve, reject)
+                    local ____self_1 = adopt(nil, v)
+                    ____self_1["then"](____self_1, resolve, reject)
                 end
             )
             if success then
@@ -903,7 +897,7 @@ do
             local descriptors = rawget(metatable, "_descriptors")
             if descriptors then
                 local descriptor = descriptors[key]
-                if descriptor then
+                if descriptor ~= nil then
                     if descriptor.get then
                         return descriptor.get(self)
                     end
@@ -919,7 +913,7 @@ do
             local descriptors = rawget(metatable, "_descriptors")
             if descriptors then
                 local descriptor = descriptors[key]
-                if descriptor then
+                if descriptor ~= nil then
                     if descriptor.set then
                         descriptor.set(self, value)
                     else
@@ -972,7 +966,7 @@ local function __TS__Decorate(decorators, target, key, desc)
         local i = #decorators
         while i >= 0 do
             local decorator = decorators[i + 1]
-            if decorator then
+            if decorator ~= nil then
                 local oldResult = result
                 if key == nil then
                     result = decorator(nil, result)
@@ -1045,7 +1039,7 @@ do
             if isClassicLua or caller and caller.func ~= error then
                 return description
             else
-                return (tostring(description) .. "\n") .. self.stack
+                return (description .. "\n") .. tostring(self.stack)
             end
         end
     end
@@ -1056,7 +1050,7 @@ do
             {__call = function(____, _self, message) return __TS__New(Type, message) end}
         )
     end
-    local ____initErrorClass_2 = initErrorClass
+    local ____initErrorClass_1 = initErrorClass
     local ____class_0 = __TS__Class()
     ____class_0.name = ""
     function ____class_0.prototype.____constructor(self, message)
@@ -1067,31 +1061,25 @@ do
         self.name = "Error"
         self.stack = getErrorStack(nil, self.constructor.new)
         local metatable = getmetatable(self)
-        if not metatable.__errorToStringPatched then
+        if metatable and not metatable.__errorToStringPatched then
             metatable.__errorToStringPatched = true
             metatable.__tostring = wrapErrorToString(nil, metatable.__tostring)
         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
-        end
-        return ____temp_1
+        return self.message ~= "" and (self.name .. ": ") .. self.message or self.name
     end
-    Error = ____initErrorClass_2(nil, ____class_0, "Error")
+    Error = ____initErrorClass_1(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, ...)
+        local ____initErrorClass_3 = initErrorClass
+        local ____class_2 = __TS__Class()
+        ____class_2.name = ____class_2.name
+        __TS__ClassExtends(____class_2, Error)
+        function ____class_2.prototype.____constructor(self, ...)
+            ____class_2.____super.prototype.____constructor(self, ...)
             self.name = name
         end
-        return ____initErrorClass_4(nil, ____class_3, name)
+        return ____initErrorClass_3(nil, ____class_2, name)
     end
     RangeError = createErrorClass(nil, "RangeError")
     ReferenceError = createErrorClass(nil, "ReferenceError")
@@ -1261,13 +1249,13 @@ do
             self.size = self.size - 1
             local next = self.nextKey[key]
             local previous = self.previousKey[key]
-            if next and previous then
+            if next ~= nil and previous ~= nil then
                 self.nextKey[previous] = next
                 self.previousKey[next] = previous
-            elseif next then
+            elseif next ~= nil then
                 self.firstKey = next
                 self.previousKey[next] = nil
-            elseif previous then
+            elseif previous ~= nil then
                 self.lastKey = previous
                 self.nextKey[previous] = nil
             else
@@ -1453,13 +1441,7 @@ do
 end
 
 local function __TS__ObjectDefineProperty(target, key, desc)
-    local ____temp_0
-    if type(key) == "number" then
-        ____temp_0 = key + 1
-    else
-        ____temp_0 = key
-    end
-    local luaKey = ____temp_0
+    local luaKey = type(key) == "number" and key + 1 or key
     local value = rawget(target, luaKey)
     local hasGetterOrSetter = desc.get ~= nil or desc.set ~= nil
     local descriptor
@@ -1473,39 +1455,39 @@ local 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
+        local ____desc_set_4 = desc.set
+        local ____desc_get_5 = desc.get
+        local ____temp_0
         if desc.configurable ~= nil then
-            ____temp_1 = desc.configurable
+            ____temp_0 = desc.configurable
         else
-            ____temp_1 = valueExists
+            ____temp_0 = valueExists
         end
-        local ____temp_2
+        local ____temp_1
         if desc.enumerable ~= nil then
-            ____temp_2 = desc.enumerable
+            ____temp_1 = desc.enumerable
         else
-            ____temp_2 = valueExists
+            ____temp_1 = valueExists
         end
-        local ____temp_3
+        local ____temp_2
         if desc.writable ~= nil then
-            ____temp_3 = desc.writable
+            ____temp_2 = desc.writable
         else
-            ____temp_3 = valueExists
+            ____temp_2 = valueExists
         end
-        local ____temp_4
+        local ____temp_3
         if desc.value ~= nil then
-            ____temp_4 = desc.value
+            ____temp_3 = desc.value
         else
-            ____temp_4 = value
+            ____temp_3 = value
         end
         descriptor = {
-            set = ____desc_set_5,
-            get = ____desc_get_6,
-            configurable = ____temp_1,
-            enumerable = ____temp_2,
-            writable = ____temp_3,
-            value = ____temp_4
+            set = ____desc_set_4,
+            get = ____desc_get_5,
+            configurable = ____temp_0,
+            enumerable = ____temp_1,
+            writable = ____temp_2,
+            value = ____temp_3
         }
     end
     __TS__SetDescriptor(target, luaKey, descriptor)
@@ -1575,14 +1557,8 @@ end
 
 local function __TS__ParseFloat(numberString)
     local infinityMatch = __TS__Match(numberString, "^%s*(-?Infinity)")
-    if infinityMatch then
-        local ____temp_0
-        if __TS__StringAccess(infinityMatch, 0) == "-" then
-            ____temp_0 = -math.huge
-        else
-            ____temp_0 = math.huge
-        end
-        return ____temp_0
+    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
@@ -1613,27 +1589,15 @@ do
         if base == nil then
             base = 10
             local hexMatch = __TS__Match(numberString, "^%s*-?0[xX]")
-            if hexMatch then
+            if hexMatch ~= nil then
                 base = 16
-                local ____TS__Match_result__0_0
-                if __TS__Match(hexMatch, "-") then
-                    ____TS__Match_result__0_0 = "-" .. __TS__StringSubstring(numberString, #hexMatch)
-                else
-                    ____TS__Match_result__0_0 = __TS__StringSubstring(numberString, #hexMatch)
-                end
-                numberString = ____TS__Match_result__0_0
+                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 ____temp_1
-        if base <= 10 then
-            ____temp_1 = __TS__StringSubstring(parseIntBasePattern, 0, base)
-        else
-            ____temp_1 = __TS__StringSubstring(parseIntBasePattern, 0, 10 + 2 * (base - 10))
-        end
-        local allowedDigits = ____temp_1
+        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),
@@ -1872,13 +1836,13 @@ do
             self.size = self.size - 1
             local next = self.nextKey[value]
             local previous = self.previousKey[value]
-            if next and previous then
+            if next ~= nil and previous ~= nil then
                 self.nextKey[previous] = next
                 self.previousKey[next] = previous
-            elseif next then
+            elseif next ~= nil then
                 self.firstKey = next
                 self.previousKey[next] = nil
-            elseif previous then
+            elseif previous ~= nil then
                 self.lastKey = previous
                 self.nextKey[previous] = nil
             else
@@ -2066,7 +2030,7 @@ local function __TS__SourceMapTraceBack(fileName, sourceMap)
             if thread == nil and message == nil and level == nil then
                 trace = originalTraceback()
             elseif __TS__StringIncludes(_VERSION, "Lua 5.0") then
-                trace = originalTraceback((("[Level " .. tostring(level)) .. "] ") .. message)
+                trace = originalTraceback((("[Level " .. tostring(level)) .. "] ") .. tostring(message))
             else
                 trace = originalTraceback(thread, message, level)
             end
@@ -2075,12 +2039,12 @@ local function __TS__SourceMapTraceBack(fileName, sourceMap)
             end
             local function replacer(____, file, srcFile, line)
                 local fileSourceMap = _G.__TS__sourcemap[file]
-                if fileSourceMap and fileSourceMap[line] then
+                if fileSourceMap ~= nil and fileSourceMap[line] ~= nil then
                     local data = fileSourceMap[line]
                     if type(data) == "number" then
                         return (srcFile .. ":") .. tostring(data)
                     end
-                    return (tostring(data.file) .. ":") .. tostring(data.line)
+                    return (data.file .. ":") .. tostring(data.line)
                 end
                 return (file .. ":") .. line
             end
@@ -2091,14 +2055,14 @@ local function __TS__SourceMapTraceBack(fileName, sourceMap)
             )
             local function stringReplacer(____, file, line)
                 local fileSourceMap = _G.__TS__sourcemap[file]
-                if fileSourceMap and fileSourceMap[line] then
+                if fileSourceMap ~= nil and fileSourceMap[line] ~= nil then
                     local chunkName = __TS__Match(file, "%[string \"([^\"]+)\"%]")
                     local sourceName = string.gsub(chunkName, ".lua$", ".ts")
                     local data = fileSourceMap[line]
                     if type(data) == "number" then
                         return (sourceName .. ":") .. tostring(data)
                     end
-                    return (tostring(data.file) .. ":") .. tostring(data.line)
+                    return (data.file .. ":") .. tostring(data.line)
                 end
                 return (file .. ":") .. line
             end
@@ -2218,13 +2182,7 @@ do
             return source
         end
         local before = sub(source, 1, startPos - 1)
-        local ____temp_0
-        if type(replaceValue) == "string" then
-            ____temp_0 = replaceValue
-        else
-            ____temp_0 = replaceValue(nil, searchValue, startPos - 1, source)
-        end
-        local replacement = ____temp_0
+        local replacement = type(replaceValue) == "string" and replaceValue or replaceValue(nil, searchValue, startPos - 1, source)
         local after = sub(source, endPos + 1)
         return (before .. replacement) .. after
     end
@@ -2379,6 +2337,7 @@ do
                 return key
             end
         end
+        return nil
     end
 end
 

package/dist/transformation/builtins/array.js

@@ -55,6 +55,7 @@ function transformSingleElementArrayPush(context, node, caller, param) {
     return expressionIsUsed ? lengthExpression : lua.createNilLiteral();
 }
 function transformArrayPrototypeCall(context, node, calledMethod) {
+    var _a, _b, _c;
     const signature = context.checker.getResolvedSignature(node);
     const [caller, params] = (0, call_1.transformCallAndArguments)(context, calledMethod.expression, node.arguments, signature);
     const expressionName = calledMethod.name.text;
@@ -65,9 +66,9 @@ function transformArrayPrototypeCall(context, node, calledMethod) {
             return (0, lualib_1.transformLuaLibFunction)(context, lualib_1.LuaLibFeature.ArrayEntries, node, caller);
         case "push":
             if (node.arguments.length === 1) {
-                const param = params[0];
+                const param = (_a = params[0]) !== null && _a !== void 0 ? _a : lua.createNilLiteral();
                 if ((0, lua_ast_1.isUnpackCall)(param)) {
-                    return (0, lualib_1.transformLuaLibFunction)(context, lualib_1.LuaLibFeature.ArrayPushArray, node, caller, param.params[0]);
+                    return (0, lualib_1.transformLuaLibFunction)(context, lualib_1.LuaLibFeature.ArrayPushArray, node, caller, (_b = param.params[0]) !== null && _b !== void 0 ? _b : lua.createNilLiteral());
                 }
                 if (!lua.isDotsLiteral(param)) {
                     return transformSingleElementArrayPush(context, node, caller, param);
@@ -116,7 +117,7 @@ function transformArrayPrototypeCall(context, node, calledMethod) {
             if (elementType &&
                 (0, typescript_1.typeAlwaysHasSomeOfFlags)(context, elementType, ts.TypeFlags.StringLike | ts.TypeFlags.NumberLike)) {
                 const defaultSeparatorLiteral = lua.createStringLiteral(",");
-                const param = params[0];
+                const param = (_c = params[0]) !== null && _c !== void 0 ? _c : lua.createNilLiteral();
                 const parameters = [
                     caller,
                     node.arguments.length === 0

package/dist/transformation/builtins/math.js

@@ -27,6 +27,7 @@ function transformMathProperty(context, node) {
 }
 exports.transformMathProperty = transformMathProperty;
 function transformMathCall(context, node, calledMethod) {
+    var _a, _b, _c, _d;
     const signature = context.checker.getResolvedSignature(node);
     const params = (0, call_1.transformArguments)(context, node.arguments, signature);
     const math = lua.createIdentifier("math");
@@ -53,18 +54,18 @@ function transformMathCall(context, node, calledMethod) {
         case "log1p": {
             const log = lua.createStringLiteral("log");
             const one = lua.createNumericLiteral(1);
-            const add = lua.createBinaryExpression(one, params[0], lua.SyntaxKind.AdditionOperator);
+            const add = lua.createBinaryExpression(one, (_a = params[0]) !== null && _a !== void 0 ? _a : lua.createNilLiteral(), lua.SyntaxKind.AdditionOperator);
             return lua.createCallExpression(lua.createTableIndexExpression(math, log), [add], node);
         }
         case "pow": {
             // Translate to base ^ power
-            return lua.createBinaryExpression(params[0], params[1], lua.SyntaxKind.PowerOperator, node);
+            return lua.createBinaryExpression((_b = params[0]) !== null && _b !== void 0 ? _b : lua.createNilLiteral(), (_c = params[1]) !== null && _c !== void 0 ? _c : lua.createNilLiteral(), lua.SyntaxKind.PowerOperator, node);
         }
         // math.floor(x + 0.5)
         case "round": {
             const floor = lua.createStringLiteral("floor");
             const half = lua.createNumericLiteral(0.5);
-            const add = lua.createBinaryExpression(params[0], half, lua.SyntaxKind.AdditionOperator);
+            const add = lua.createBinaryExpression((_d = params[0]) !== null && _d !== void 0 ? _d : lua.createNilLiteral(), half, lua.SyntaxKind.AdditionOperator);
             return lua.createCallExpression(lua.createTableIndexExpression(math, floor), [add], node);
         }
         case "sign": {

package/dist/transformation/builtins/string.js

@@ -12,6 +12,7 @@ function createStringCall(methodName, tsOriginal, ...params) {
     return lua.createCallExpression(lua.createTableIndexExpression(stringIdentifier, lua.createStringLiteral(methodName)), params, tsOriginal);
 }
 function transformStringPrototypeCall(context, node, calledMethod) {
+    var _a, _b, _c, _d;
     const signature = context.checker.getResolvedSignature(node);
     const [caller, params] = (0, call_1.transformCallAndArguments)(context, calledMethod.expression, node.arguments, signature);
     const expressionName = calledMethod.name.text;
@@ -23,7 +24,7 @@ function transformStringPrototypeCall(context, node, calledMethod) {
         case "concat":
             return lua.createCallExpression(lua.createTableIndexExpression(lua.createIdentifier("table"), lua.createStringLiteral("concat")), [(0, lua_ast_1.wrapInTable)(caller, ...params)], node);
         case "indexOf": {
-            const stringExpression = createStringCall("find", node, caller, params[0], params[1]
+            const stringExpression = createStringCall("find", node, caller, (_a = params[0]) !== null && _a !== void 0 ? _a : lua.createNilLiteral(), params[1]
                 ? // string.find handles negative indexes by making it relative to string end, but for indexOf it's the same as 0
                     lua.createCallExpression(lua.createTableIndexExpression(lua.createIdentifier("math"), lua.createStringLiteral("max")), [(0, lua_ast_1.addToNumericExpression)(params[1], 1), lua.createNumericLiteral(1)])
                 : lua.createNilLiteral(), lua.createBooleanLiteral(true));
@@ -73,7 +74,7 @@ function transformStringPrototypeCall(context, node, calledMethod) {
             const literalValue = (0, lua_ast_1.getNumberLiteralValue)(params[0]);
             // Inline string.sub call if we know that parameter is pure and isn't negative
             if (literalValue !== undefined && literalValue >= 0) {
-                const firstParamPlusOne = (0, lua_ast_1.addToNumericExpression)(params[0], 1);
+                const firstParamPlusOne = (0, lua_ast_1.addToNumericExpression)((_b = params[0]) !== null && _b !== void 0 ? _b : lua.createNilLiteral(), 1);
                 return createStringCall("sub", node, caller, firstParamPlusOne, firstParamPlusOne);
             }
             return (0, lualib_1.transformLuaLibFunction)(context, lualib_1.LuaLibFeature.StringCharAt, node, caller, ...params);
@@ -82,7 +83,7 @@ function transformStringPrototypeCall(context, node, calledMethod) {
             const literalValue = (0, lua_ast_1.getNumberLiteralValue)(params[0]);
             // Inline string.sub call if we know that parameter is pure and isn't negative
             if (literalValue !== undefined && literalValue >= 0) {
-                return lua.createBinaryExpression(createStringCall("byte", node, caller, (0, lua_ast_1.addToNumericExpression)(params[0], 1)), (0, lua_ast_1.createNaN)(), lua.SyntaxKind.OrOperator);
+                return lua.createBinaryExpression(createStringCall("byte", node, caller, (0, lua_ast_1.addToNumericExpression)((_c = params[0]) !== null && _c !== void 0 ? _c : lua.createNilLiteral(), 1)), (0, lua_ast_1.createNaN)(), lua.SyntaxKind.OrOperator);
             }
             return (0, lualib_1.transformLuaLibFunction)(context, lualib_1.LuaLibFeature.StringCharCodeAt, node, caller, ...params);
         }
@@ -95,7 +96,9 @@ function transformStringPrototypeCall(context, node, calledMethod) {
         case "repeat":
             const math = lua.createIdentifier("math");
             const floor = lua.createStringLiteral("floor");
-            const parameter = lua.createCallExpression(lua.createTableIndexExpression(math, floor), [params[0]]);
+            const parameter = lua.createCallExpression(lua.createTableIndexExpression(math, floor), [
+                (_d = params[0]) !== null && _d !== void 0 ? _d : lua.createNilLiteral(),
+            ]);
             return createStringCall("rep", node, caller, parameter);
         case "padStart":
             return (0, lualib_1.transformLuaLibFunction)(context, lualib_1.LuaLibFeature.StringPadStart, node, caller, ...params);

package/dist/transformation/utils/diagnostics.d.ts

@@ -1,4 +1,5 @@
 import * as ts from "typescript";
+import * as lua from "../../LuaAST";
 import { LuaTarget, TypeScriptToLuaOptions } from "../../CompilerOptions";
 import { AnnotationKind } from "./annotations";
 export declare const unsupportedNodeKind: ((node: ts.Node, kind: ts.SyntaxKind) => ts.Diagnostic) & {
@@ -97,3 +98,6 @@ export declare const invalidMethodCallExtensionUse: ((node: ts.Node, ...args: an
 export declare const invalidSpreadInCallExtension: ((node: ts.Node, ...args: any[]) => ts.Diagnostic) & {
     code: number;
 };
+export declare const cannotAssignToNodeOfKind: ((node: ts.Node, kind: lua.SyntaxKind) => ts.Diagnostic) & {
+    code: number;
+};

package/dist/transformation/utils/diagnostics.js

@@ -1,7 +1,8 @@
 "use strict";
 Object.defineProperty(exports, "__esModule", { value: true });
-exports.invalidSpreadInCallExtension = exports.invalidMethodCallExtensionUse = exports.undefinedInArrayLiteral = exports.unsupportedOptionalCompileMembersOnly = exports.unsupportedBuiltinOptionalCall = exports.awaitMustBeInAsyncFunction = exports.notAllowedOptionalAssignment = exports.truthyOnlyConditionalValue = exports.annotationDeprecated = exports.invalidCallExtensionUse = exports.invalidMultiReturnAccess = exports.invalidMultiFunctionReturnType = exports.invalidMultiFunctionUse = exports.unsupportedVarDeclaration = exports.invalidAmbientIdentifierName = exports.unsupportedProperty = exports.unsupportedForTargetButOverrideAvailable = exports.unsupportedForTarget = exports.unsupportedRightShiftOperator = exports.unsupportedAccessorInObjectLiteral = exports.invalidPairsIterableWithoutDestructuring = exports.invalidMultiIterableWithoutDestructuring = exports.invalidRangeControlVariable = exports.invalidVarargUse = exports.invalidRangeUse = exports.annotationInvalidArgumentCount = exports.decoratorInvalidContext = exports.unsupportedOverloadAssignment = exports.unsupportedSelfFunctionConversion = exports.unsupportedNoSelfFunctionConversion = exports.forbiddenForIn = exports.unsupportedNodeKind = void 0;
+exports.cannotAssignToNodeOfKind = exports.invalidSpreadInCallExtension = exports.invalidMethodCallExtensionUse = exports.undefinedInArrayLiteral = exports.unsupportedOptionalCompileMembersOnly = exports.unsupportedBuiltinOptionalCall = exports.awaitMustBeInAsyncFunction = exports.notAllowedOptionalAssignment = exports.truthyOnlyConditionalValue = exports.annotationDeprecated = exports.invalidCallExtensionUse = exports.invalidMultiReturnAccess = exports.invalidMultiFunctionReturnType = exports.invalidMultiFunctionUse = exports.unsupportedVarDeclaration = exports.invalidAmbientIdentifierName = exports.unsupportedProperty = exports.unsupportedForTargetButOverrideAvailable = exports.unsupportedForTarget = exports.unsupportedRightShiftOperator = exports.unsupportedAccessorInObjectLiteral = exports.invalidPairsIterableWithoutDestructuring = exports.invalidMultiIterableWithoutDestructuring = exports.invalidRangeControlVariable = exports.invalidVarargUse = exports.invalidRangeUse = exports.annotationInvalidArgumentCount = exports.decoratorInvalidContext = exports.unsupportedOverloadAssignment = exports.unsupportedSelfFunctionConversion = exports.unsupportedNoSelfFunctionConversion = exports.forbiddenForIn = exports.unsupportedNodeKind = void 0;
 const ts = require("typescript");
+const lua = require("../../LuaAST");
 const CompilerOptions_1 = require("../../CompilerOptions");
 const utils_1 = require("../../utils");
 const createDiagnosticFactory = (category, message) => (0, utils_1.createSerialDiagnosticFactory)((node, ...args) => ({
@@ -61,4 +62,5 @@ exports.unsupportedOptionalCompileMembersOnly = createErrorDiagnosticFactory("Op
 exports.undefinedInArrayLiteral = createErrorDiagnosticFactory("Array literals may not contain undefined or null.");
 exports.invalidMethodCallExtensionUse = createErrorDiagnosticFactory("This language extension must be called as a method.");
 exports.invalidSpreadInCallExtension = createErrorDiagnosticFactory("Spread elements are not supported in call extensions.");
+exports.cannotAssignToNodeOfKind = createErrorDiagnosticFactory((kind) => `Cannot create assignment assigning to a node of type ${lua.SyntaxKind[kind]}.`);
 //# sourceMappingURL=diagnostics.js.map

package/dist/transformation/utils/lua-ast.js

@@ -251,15 +251,17 @@ function getJSDocCommentFromTSNode(context, tsOriginal) {
     // https://stevedonovan.github.io/ldoc/manual/doc.md.html
     // LDoc comments require that the first line starts with three hyphens.
     // Thus, need to add a hyphen to the first line.
-    const firstLine = lines[0];
-    if (firstLine.startsWith(" @")) {
-        lines.unshift("-");
-    }
-    else {
-        lines.shift();
-        lines.unshift("-" + firstLine);
+    if (lines.length > 0) {
+        const firstLine = lines[0];
+        if (firstLine.startsWith(" @")) {
+            lines.unshift("-");
+        }
+        else {
+            lines.shift();
+            lines.unshift("-" + firstLine);
+        }
+        return lines;
     }
-    return lines;
 }
 const createNaN = (tsOriginal) => lua.createBinaryExpression(lua.createNumericLiteral(0), lua.createNumericLiteral(0), lua.SyntaxKind.DivisionOperator, tsOriginal);
 exports.createNaN = createNaN;

package/dist/transformation/visitors/binary-expression/assignments.js

@@ -3,7 +3,6 @@ Object.defineProperty(exports, "__esModule", { value: true });
 exports.transformAssignmentStatement = exports.transformAssignmentExpression = exports.transformAssignmentWithRightPrecedingStatements = exports.transformAssignment = exports.transformAssignmentLeftHandSideExpression = void 0;
 const ts = require("typescript");
 const lua = require("../../../LuaAST");
-const utils_1 = require("../../../utils");
 const assignment_validation_1 = require("../../utils/assignment-validation");
 const export_1 = require("../../utils/export");
 const lua_ast_1 = require("../../utils/lua-ast");
@@ -32,9 +31,16 @@ function transformAssignmentLeftHandSideExpression(context, node, rightHasPreced
     }
     const symbol = context.checker.getSymbolAtLocation(node);
     const left = context.transformExpression(node);
-    return lua.isIdentifier(left) && symbol && (0, export_1.isSymbolExported)(context, symbol)
-        ? (0, export_1.createExportedIdentifier)(context, left)
-        : (0, utils_1.cast)(left, lua.isAssignmentLeftHandSideExpression);
+    if (lua.isIdentifier(left) && symbol && (0, export_1.isSymbolExported)(context, symbol)) {
+        return (0, export_1.createExportedIdentifier)(context, left);
+    }
+    if (lua.isAssignmentLeftHandSideExpression(left)) {
+        return left;
+    }
+    else {
+        context.diagnostics.push((0, diagnostics_1.cannotAssignToNodeOfKind)(node, left.kind));
+        return lua.createAnonymousIdentifier();
+    }
 }
 exports.transformAssignmentLeftHandSideExpression = transformAssignmentLeftHandSideExpression;
 function transformAssignment(context, 

package/dist/transformation/visitors/language-extensions/multi.js

@@ -50,35 +50,36 @@ function shouldMultiReturnCallBeWrapped(context, node) {
     if (!returnsMultiType(context, node)) {
         return false;
     }
+    const parent = (0, typescript_1.findFirstNonOuterParent)(node);
     // Variable declaration with destructuring
-    if (ts.isVariableDeclaration(node.parent) && ts.isArrayBindingPattern(node.parent.name)) {
+    if (ts.isVariableDeclaration(parent) && ts.isArrayBindingPattern(parent.name)) {
         return false;
     }
     // Variable assignment with destructuring
-    if (ts.isBinaryExpression(node.parent) &&
-        node.parent.operatorToken.kind === ts.SyntaxKind.EqualsToken &&
-        ts.isArrayLiteralExpression(node.parent.left)) {
+    if (ts.isBinaryExpression(parent) &&
+        parent.operatorToken.kind === ts.SyntaxKind.EqualsToken &&
+        ts.isArrayLiteralExpression(parent.left)) {
         return false;
     }
     // Spread operator
-    if (ts.isSpreadElement(node.parent)) {
+    if (ts.isSpreadElement(parent)) {
         return false;
     }
     // Stand-alone expression
-    if (ts.isExpressionStatement(node.parent)) {
+    if (ts.isExpressionStatement(parent)) {
         return false;
     }
     // Forwarded multi-return call
-    if ((ts.isReturnStatement(node.parent) || ts.isArrowFunction(node.parent)) && // Body-less arrow func
+    if ((ts.isReturnStatement(parent) || ts.isArrowFunction(parent)) && // Body-less arrow func
         isInMultiReturnFunction(context, node)) {
         return false;
     }
     // Element access expression 'foo()[0]' will be optimized using 'select'
-    if (ts.isElementAccessExpression(node.parent)) {
+    if (ts.isElementAccessExpression(parent)) {
         return false;
     }
     // LuaIterable in for...of
-    if (ts.isForOfStatement(node.parent) &&
+    if (ts.isForOfStatement(parent) &&
         (0, language_extensions_1.getIterableExtensionKindForNode)(context, node) === language_extensions_1.IterableExtensionKind.Iterable) {
         return false;
     }