typescript-to-lua 1.1.1 → 1.2.0

package/CHANGELOG.md

@@ -1,5 +1,21 @@
 # Changelog
 
+## 1.2.0
+
+- Upgraded to TypeScript 4.5.x.
+- Improved general output formatting.
+- Added support for more complicated (nested) destructuring patterns, also fixing an exception they caused before.
+- Fixed incorrect interactions between standard library functionality and optional chaining, e.g. `myArray?.forEach()`.
+- Fixed rejected promises sometimes not getting the correct rejection reason.
+- Fixed some `delete` behavior that was different in Lua compared to JS.
+- Fixed a bug causing exported classes to lose their decorators.
+- Fixed plugins checking for ts-node from the wrong location (tsconfig directory), plugins will now check for ts-node relative to the tstl directory.
+
+Under the hood:
+
+- We can now transform using preceding statements, allowing all kinds of optimizations and improvements to output Lua.
+- Updated various language constructs to use preceding statements instead of inline immediately-invoked functions.
+
 ## 1.1.0
 
 - **[Breaking]** We now use TypeScript's JSX transformer instead of maintaining our own. As a result, `React.createElement` now requires a self parameter, so remove `@noSelf`, `this: void` if necessary.

package/dist/LuaAST.d.ts

@@ -216,6 +216,7 @@ export interface StringLiteral extends Expression {
 }
 export declare function isStringLiteral(node: Node): node is StringLiteral;
 export declare function createStringLiteral(value: string, tsOriginal?: ts.Node): StringLiteral;
+export declare function isLiteral(node: Node): node is NilLiteral | DotsLiteral | BooleanLiteral | NumericLiteral | StringLiteral;
 export declare enum FunctionExpressionFlags {
     None = 1,
     Inline = 2,

package/dist/LuaAST.js

@@ -2,8 +2,8 @@
 // Simplified Lua AST based roughly on http://lua-users.org/wiki/MetaLuaAbstractSyntaxTree,
 // https://www.lua.org/manual/5.3/manual.html#9 and the TS AST implementation
 Object.defineProperty(exports, "__esModule", { value: true });
-exports.createFunctionExpression = exports.isFunctionExpression = exports.FunctionExpressionFlags = exports.createStringLiteral = exports.isStringLiteral = exports.createNumericLiteral = exports.isNumericLiteral = exports.createDotsLiteral = exports.isDotsLiteral = exports.createBooleanLiteral = exports.isBooleanLiteral = exports.createNilLiteral = exports.isNilLiteral = exports.createExpressionStatement = exports.isExpressionStatement = exports.createBreakStatement = exports.isBreakStatement = exports.createReturnStatement = exports.isReturnStatement = exports.createLabelStatement = exports.isLabelStatement = exports.createGotoStatement = exports.isGotoStatement = exports.createForInStatement = exports.isForInStatement = exports.createForStatement = exports.isForStatement = exports.createRepeatStatement = exports.isRepeatStatement = exports.createWhileStatement = exports.isWhileStatement = exports.isIterationStatement = exports.createIfStatement = exports.isIfStatement = exports.createAssignmentStatement = exports.isAssignmentStatement = exports.createVariableDeclarationStatement = exports.isVariableDeclarationStatement = exports.createDoStatement = exports.isDoStatement = exports.createBlock = exports.isBlock = exports.createFile = exports.isFile = exports.getOriginalPos = exports.setNodeOriginal = exports.setNodePosition = exports.cloneNode = exports.createNode = exports.SyntaxKind = void 0;
-exports.isInlineFunctionExpression = exports.isFunctionDefinition = exports.isAssignmentLeftHandSideExpression = exports.createTableIndexExpression = exports.isTableIndexExpression = exports.createAnonymousIdentifier = exports.cloneIdentifier = exports.createIdentifier = exports.isIdentifier = exports.createMethodCallExpression = exports.isMethodCallExpression = exports.createCallExpression = exports.isCallExpression = exports.createBinaryExpression = exports.isBinaryExpression = exports.createUnaryExpression = exports.isUnaryExpression = exports.createTableExpression = exports.isTableExpression = exports.createTableFieldExpression = exports.isTableFieldExpression = void 0;
+exports.isFunctionExpression = exports.FunctionExpressionFlags = exports.isLiteral = exports.createStringLiteral = exports.isStringLiteral = exports.createNumericLiteral = exports.isNumericLiteral = exports.createDotsLiteral = exports.isDotsLiteral = exports.createBooleanLiteral = exports.isBooleanLiteral = exports.createNilLiteral = exports.isNilLiteral = exports.createExpressionStatement = exports.isExpressionStatement = exports.createBreakStatement = exports.isBreakStatement = exports.createReturnStatement = exports.isReturnStatement = exports.createLabelStatement = exports.isLabelStatement = exports.createGotoStatement = exports.isGotoStatement = exports.createForInStatement = exports.isForInStatement = exports.createForStatement = exports.isForStatement = exports.createRepeatStatement = exports.isRepeatStatement = exports.createWhileStatement = exports.isWhileStatement = exports.isIterationStatement = exports.createIfStatement = exports.isIfStatement = exports.createAssignmentStatement = exports.isAssignmentStatement = exports.createVariableDeclarationStatement = exports.isVariableDeclarationStatement = exports.createDoStatement = exports.isDoStatement = exports.createBlock = exports.isBlock = exports.createFile = exports.isFile = exports.getOriginalPos = exports.setNodeOriginal = exports.setNodePosition = exports.cloneNode = exports.createNode = exports.SyntaxKind = void 0;
+exports.isInlineFunctionExpression = exports.isFunctionDefinition = exports.isAssignmentLeftHandSideExpression = exports.createTableIndexExpression = exports.isTableIndexExpression = exports.createAnonymousIdentifier = exports.cloneIdentifier = exports.createIdentifier = exports.isIdentifier = exports.createMethodCallExpression = exports.isMethodCallExpression = exports.createCallExpression = exports.isCallExpression = exports.createBinaryExpression = exports.isBinaryExpression = exports.createUnaryExpression = exports.isUnaryExpression = exports.createTableExpression = exports.isTableExpression = exports.createTableFieldExpression = exports.isTableFieldExpression = exports.createFunctionExpression = void 0;
 // We can elide a lot of nodes especially tokens and keywords
 // because we don't create the AST from text
 const ts = require("typescript");
@@ -338,6 +338,14 @@ function createStringLiteral(value, tsOriginal) {
     return expression;
 }
 exports.createStringLiteral = createStringLiteral;
+function isLiteral(node) {
+    return (isNilLiteral(node) ||
+        isDotsLiteral(node) ||
+        isBooleanLiteral(node) ||
+        isNumericLiteral(node) ||
+        isStringLiteral(node));
+}
+exports.isLiteral = isLiteral;
 var FunctionExpressionFlags;
 (function (FunctionExpressionFlags) {
     FunctionExpressionFlags[FunctionExpressionFlags["None"] = 1] = "None";

package/dist/LuaLib.d.ts

@@ -56,9 +56,6 @@ export declare enum LuaLibFeature {
     ObjectKeys = "ObjectKeys",
     ObjectRest = "ObjectRest",
     ObjectValues = "ObjectValues",
-    OptionalChainAccess = "OptionalChainAccess",
-    OptionalFunctionCall = "OptionalFunctionCall",
-    OptionalMethodCall = "OptionalMethodCall",
     ParseFloat = "ParseFloat",
     ParseInt = "ParseInt",
     Promise = "Promise",
@@ -68,6 +65,9 @@ export declare enum LuaLibFeature {
     PromiseRace = "PromiseRace",
     Set = "Set",
     SetDescriptor = "SetDescriptor",
+    SparseArrayNew = "SparseArrayNew",
+    SparseArrayPush = "SparseArrayPush",
+    SparseArraySpread = "SparseArraySpread",
     WeakMap = "WeakMap",
     WeakSet = "WeakSet",
     SourceMapTraceBack = "SourceMapTraceBack",

package/dist/LuaLib.js

@@ -60,9 +60,6 @@ var LuaLibFeature;
     LuaLibFeature["ObjectKeys"] = "ObjectKeys";
     LuaLibFeature["ObjectRest"] = "ObjectRest";
     LuaLibFeature["ObjectValues"] = "ObjectValues";
-    LuaLibFeature["OptionalChainAccess"] = "OptionalChainAccess";
-    LuaLibFeature["OptionalFunctionCall"] = "OptionalFunctionCall";
-    LuaLibFeature["OptionalMethodCall"] = "OptionalMethodCall";
     LuaLibFeature["ParseFloat"] = "ParseFloat";
     LuaLibFeature["ParseInt"] = "ParseInt";
     LuaLibFeature["Promise"] = "Promise";
@@ -72,6 +69,9 @@ var LuaLibFeature;
     LuaLibFeature["PromiseRace"] = "PromiseRace";
     LuaLibFeature["Set"] = "Set";
     LuaLibFeature["SetDescriptor"] = "SetDescriptor";
+    LuaLibFeature["SparseArrayNew"] = "SparseArrayNew";
+    LuaLibFeature["SparseArrayPush"] = "SparseArrayPush";
+    LuaLibFeature["SparseArraySpread"] = "SparseArraySpread";
     LuaLibFeature["WeakMap"] = "WeakMap";
     LuaLibFeature["WeakSet"] = "WeakSet";
     LuaLibFeature["SourceMapTraceBack"] = "SourceMapTraceBack";
@@ -107,7 +107,7 @@ const luaLibDependencies = {
     Await: [LuaLibFeature.InstanceOf, LuaLibFeature.New],
     Decorate: [LuaLibFeature.ObjectGetOwnPropertyDescriptor, LuaLibFeature.SetDescriptor, LuaLibFeature.ObjectAssign],
     DelegatedYield: [LuaLibFeature.StringAccess],
-    Delete: [LuaLibFeature.ObjectGetOwnPropertyDescriptors],
+    Delete: [LuaLibFeature.ObjectGetOwnPropertyDescriptors, LuaLibFeature.Error, LuaLibFeature.New],
     Error: [LuaLibFeature.Class, LuaLibFeature.ClassExtends, LuaLibFeature.New],
     FunctionBind: [LuaLibFeature.Unpack],
     Generator: [LuaLibFeature.Symbol],

package/dist/LuaPrinter.d.ts

@@ -1,5 +1,6 @@
 import { SourceNode } from "source-map";
 import * as ts from "typescript";
+import { CompilerOptions } from "./CompilerOptions";
 import * as lua from "./LuaAST";
 import { EmitHost } from "./transpilation";
 export declare const escapeString: (value: string) => string;
@@ -17,16 +18,18 @@ export declare class LuaPrinter {
     private program;
     private sourceFile;
     private static operatorMap;
+    private static operatorPrecedence;
+    private static rightAssociativeOperators;
     private currentIndent;
-    private luaFile;
-    private relativeSourcePath;
-    private options;
+    protected luaFile: string;
+    protected relativeSourcePath: string;
+    protected options: CompilerOptions;
     static readonly sourceMapTracebackPlaceholder = "{#SourceMapTraceback}";
     constructor(emitHost: EmitHost, program: ts.Program, sourceFile: string);
     print(file: lua.File): PrintResult;
     private printInlineSourceMap;
     private printStackTraceOverride;
-    private printFile;
+    protected printFile(file: lua.File): SourceNode;
     protected pushIndent(): void;
     protected popIndent(): void;
     protected indent(input?: SourceChunk): SourceChunk;
@@ -73,6 +76,10 @@ export declare class LuaPrinter {
     printTableIndexExpression(expression: lua.TableIndexExpression): SourceNode;
     printOperator(kind: lua.Operator): SourceNode;
     protected joinChunksWithComma(chunks: SourceChunk[]): SourceChunk[];
+    /**
+     * Returns true if the expression list (table field or parameters) should be printed on one line.
+     */
+    protected isSimpleExpressionList(expressions: lua.Expression[]): boolean;
     protected printExpressionList(expressions: lua.Expression[]): SourceChunk[];
     private buildSourceMap;
 }

package/dist/LuaPrinter.js

@@ -512,26 +512,31 @@ class LuaPrinter {
     printUnaryExpression(expression) {
         const chunks = [];
         chunks.push(this.printOperator(expression.operator));
-        chunks.push(this.printExpressionInParenthesesIfNeeded(expression.operand));
+        chunks.push(this.printExpressionInParenthesesIfNeeded(expression.operand, LuaPrinter.operatorPrecedence[expression.operator]));
         return this.createSourceNode(expression, chunks);
     }
     printBinaryExpression(expression) {
         const chunks = [];
-        chunks.push(this.printExpressionInParenthesesIfNeeded(expression.left));
+        const isRightAssociative = LuaPrinter.rightAssociativeOperators.has(expression.operator);
+        const precedence = LuaPrinter.operatorPrecedence[expression.operator];
+        chunks.push(this.printExpressionInParenthesesIfNeeded(expression.left, isRightAssociative ? precedence + 1 : precedence));
         chunks.push(" ", this.printOperator(expression.operator), " ");
-        chunks.push(this.printExpressionInParenthesesIfNeeded(expression.right));
+        chunks.push(this.printExpressionInParenthesesIfNeeded(expression.right, isRightAssociative ? precedence : precedence + 1));
         return this.createSourceNode(expression, chunks);
     }
-    printExpressionInParenthesesIfNeeded(expression) {
-        return this.needsParenthesis(expression)
+    printExpressionInParenthesesIfNeeded(expression, minPrecedenceToOmit) {
+        return this.needsParenthesis(expression, minPrecedenceToOmit)
             ? this.createSourceNode(expression, ["(", this.printExpression(expression), ")"])
             : this.printExpression(expression);
     }
-    needsParenthesis(expression) {
-        return (lua.isBinaryExpression(expression) ||
-            lua.isFunctionExpression(expression) ||
-            lua.isTableExpression(expression) ||
-            (lua.isUnaryExpression(expression) && expression.operator === lua.SyntaxKind.NotOperator));
+    needsParenthesis(expression, minPrecedenceToOmit) {
+        if (lua.isBinaryExpression(expression) || lua.isUnaryExpression(expression)) {
+            return (minPrecedenceToOmit === undefined ||
+                LuaPrinter.operatorPrecedence[expression.operator] < minPrecedenceToOmit);
+        }
+        else {
+            return lua.isFunctionExpression(expression) || lua.isTableExpression(expression);
+        }
     }
     printCallExpression(expression) {
         const chunks = [];
@@ -575,9 +580,19 @@ class LuaPrinter {
     joinChunksWithComma(chunks) {
         return (0, utils_1.intersperse)(chunks, ", ");
     }
+    /**
+     * Returns true if the expression list (table field or parameters) should be printed on one line.
+     */
+    isSimpleExpressionList(expressions) {
+        if (expressions.length <= 1)
+            return true;
+        if (expressions.length > 4)
+            return false;
+        return expressions.every(isSimpleExpression);
+    }
     printExpressionList(expressions) {
         const chunks = [];
-        if (expressions.every(isSimpleExpression)) {
+        if (this.isSimpleExpressionList(expressions)) {
             chunks.push(...this.joinChunksWithComma(expressions.map(e => this.printExpression(e))));
         }
         else {
@@ -675,5 +690,33 @@ LuaPrinter.operatorMap = {
     [lua.SyntaxKind.BitwiseLeftShiftOperator]: "<<",
     [lua.SyntaxKind.BitwiseNotOperator]: "~",
 };
+LuaPrinter.operatorPrecedence = {
+    [lua.SyntaxKind.OrOperator]: 1,
+    [lua.SyntaxKind.AndOperator]: 2,
+    [lua.SyntaxKind.EqualityOperator]: 3,
+    [lua.SyntaxKind.InequalityOperator]: 3,
+    [lua.SyntaxKind.LessThanOperator]: 3,
+    [lua.SyntaxKind.LessEqualOperator]: 3,
+    [lua.SyntaxKind.GreaterThanOperator]: 3,
+    [lua.SyntaxKind.GreaterEqualOperator]: 3,
+    [lua.SyntaxKind.BitwiseOrOperator]: 4,
+    [lua.SyntaxKind.BitwiseExclusiveOrOperator]: 5,
+    [lua.SyntaxKind.BitwiseAndOperator]: 6,
+    [lua.SyntaxKind.BitwiseLeftShiftOperator]: 7,
+    [lua.SyntaxKind.BitwiseRightShiftOperator]: 7,
+    [lua.SyntaxKind.ConcatOperator]: 8,
+    [lua.SyntaxKind.AdditionOperator]: 9,
+    [lua.SyntaxKind.SubtractionOperator]: 9,
+    [lua.SyntaxKind.MultiplicationOperator]: 10,
+    [lua.SyntaxKind.DivisionOperator]: 10,
+    [lua.SyntaxKind.FloorDivisionOperator]: 10,
+    [lua.SyntaxKind.ModuloOperator]: 10,
+    [lua.SyntaxKind.NotOperator]: 11,
+    [lua.SyntaxKind.LengthOperator]: 11,
+    [lua.SyntaxKind.NegationOperator]: 11,
+    [lua.SyntaxKind.BitwiseNotOperator]: 11,
+    [lua.SyntaxKind.PowerOperator]: 12,
+};
+LuaPrinter.rightAssociativeOperators = new Set([lua.SyntaxKind.ConcatOperator, lua.SyntaxKind.PowerOperator]);
 LuaPrinter.sourceMapTracebackPlaceholder = "{#SourceMapTraceback}";
 //# sourceMappingURL=LuaPrinter.js.map

package/dist/lualib/ArrayFlat.lua

@@ -4,7 +4,7 @@ function __TS__ArrayFlat(array, depth)
     end
     local result = {}
     for ____, value in ipairs(array) do
-        if (depth > 0) and __TS__ArrayIsArray(value) then
+        if depth > 0 and __TS__ArrayIsArray(value) then
             result = __TS__ArrayConcat(
                 result,
                 __TS__ArrayFlat(value, depth - 1)

package/dist/lualib/ArrayFlatMap.lua

@@ -4,7 +4,7 @@ function __TS__ArrayFlatMap(array, callback)
         local i = 0
         while i < #array do
             local value = callback(_G, array[i + 1], i, array)
-            if (type(value) == "table") and __TS__ArrayIsArray(value) then
+            if type(value) == "table" and __TS__ArrayIsArray(value) then
                 result = __TS__ArrayConcat(result, value)
             else
                 result[#result + 1] = value

package/dist/lualib/ArrayIsArray.lua

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

package/dist/lualib/ArrayReduce.lua

@@ -11,7 +11,13 @@ function __TS__ArrayReduce(arr, callbackFn, ...)
         error("Reduce of empty array with no initial value", 0)
     end
     for i = k, len - 1 do
-        accumulator = callbackFn(_G, accumulator, arr[i + 1], i, arr)
+        accumulator = callbackFn(
+            _G,
+            accumulator,
+            arr[i + 1],
+            i,
+            arr
+        )
     end
     return accumulator
 end

package/dist/lualib/ArrayReduceRight.lua

@@ -11,7 +11,13 @@ function __TS__ArrayReduceRight(arr, callbackFn, ...)
         error("Reduce of empty array with no initial value", 0)
     end
     for i = k, 0, -1 do
-        accumulator = callbackFn(_G, accumulator, arr[i + 1], i, arr)
+        accumulator = callbackFn(
+            _G,
+            accumulator,
+            arr[i + 1],
+            i,
+            arr
+        )
     end
     return accumulator
 end

package/dist/lualib/ArraySetLength.lua

@@ -1,5 +1,5 @@
 function __TS__ArraySetLength(arr, length)
-    if (((length < 0) or (length ~= length)) or (length == math.huge)) or (math.floor(length) ~= length) then
+    if length < 0 or length ~= length or length == math.huge or math.floor(length) ~= length then
         error(
             "invalid array length: " .. tostring(length),
             0

package/dist/lualib/ArraySplice.lua

@@ -35,7 +35,7 @@ function __TS__ArraySplice(list, ...)
     if itemCount < actualDeleteCount then
         do
             local k = actualStart
-            while k < (len - actualDeleteCount) do
+            while k < len - actualDeleteCount do
                 local from = k + actualDeleteCount
                 local to = k + itemCount
                 if list[from + 1] then
@@ -48,7 +48,7 @@ function __TS__ArraySplice(list, ...)
         end
         do
             local k = len
-            while k > ((len - actualDeleteCount) + itemCount) do
+            while k > len - actualDeleteCount + itemCount do
                 list[k] = nil
                 k = k - 1
             end
@@ -57,8 +57,8 @@ function __TS__ArraySplice(list, ...)
         do
             local k = len - actualDeleteCount
             while k > actualStart do
-                local from = (k + actualDeleteCount) - 1
-                local to = (k + itemCount) - 1
+                local from = k + actualDeleteCount - 1
+                local to = k + itemCount - 1
                 if list[from + 1] then
                     list[to + 1] = list[from + 1]
                 else
@@ -75,7 +75,7 @@ function __TS__ArraySplice(list, ...)
     end
     do
         local k = #list - 1
-        while k >= ((len - actualDeleteCount) + itemCount) do
+        while k >= len - actualDeleteCount + itemCount do
             list[k + 1] = nil
             k = k - 1
         end

package/dist/lualib/Await.lua

@@ -4,14 +4,20 @@ function __TS__AsyncAwaiter(generator)
         function(____, resolve, reject)
             local adopt, fulfilled, rejected, step, asyncCoroutine
             function adopt(self, value)
-                return ((__TS__InstanceOf(value, __TS__Promise) and (function() return value end)) or (function() return __TS__Promise.resolve(value) end))()
+                local ____temp_0
+                if __TS__InstanceOf(value, __TS__Promise) then
+                    ____temp_0 = value
+                else
+                    ____temp_0 = __TS__Promise.resolve(value)
+                end
+                return ____temp_0
             end
             function fulfilled(self, value)
                 local success, errorOrErrorHandler, resultOrError = coroutine.resume(asyncCoroutine, value)
                 if success then
                     step(_G, resultOrError, errorOrErrorHandler)
                 else
-                    reject(_G, resultOrError)
+                    reject(_G, errorOrErrorHandler)
                 end
             end
             function rejected(self, handler)
@@ -34,14 +40,12 @@ function __TS__AsyncAwaiter(generator)
                 if coroutine.status(asyncCoroutine) == "dead" then
                     resolve(_G, result)
                 else
-                    (function()
-                        local ____self = adopt(_G, result)
-                        return ____self["then"](
-                            ____self,
-                            fulfilled,
-                            rejected(_G, errorHandler)
-                        )
-                    end)()
+                    local ____self_1 = adopt(_G, result)
+                    ____self_1["then"](
+                        ____self_1,
+                        fulfilled,
+                        rejected(_G, errorHandler)
+                    )
                 end
             end
             asyncCoroutine = coroutine.create(generator)

package/dist/lualib/CloneDescriptor.lua

@@ -1,19 +1,19 @@
+local value
+local writable
+local set
+local get
+local configurable
+local enumerable
 function __TS__CloneDescriptor(____bindingPattern0)
-    local enumerable
     enumerable = ____bindingPattern0.enumerable
-    local configurable
     configurable = ____bindingPattern0.configurable
-    local get
     get = ____bindingPattern0.get
-    local set
     set = ____bindingPattern0.set
-    local writable
     writable = ____bindingPattern0.writable
-    local value
     value = ____bindingPattern0.value
     local descriptor = {enumerable = enumerable == true, configurable = configurable == true}
-    local hasGetterOrSetter = (get ~= nil) or (set ~= nil)
-    local hasValueOrWritableAttribute = (writable ~= nil) or (value ~= nil)
+    local hasGetterOrSetter = get ~= nil or set ~= nil
+    local hasValueOrWritableAttribute = writable ~= nil or value ~= nil
     if hasGetterOrSetter and hasValueOrWritableAttribute then
         error("Invalid property descriptor. Cannot both specify accessors and a value or writable attribute.", 0)
     end

package/dist/lualib/Decorate.lua

@@ -12,7 +12,7 @@ function __TS__Decorate(decorators, target, key, desc)
                     local value = rawget(target, key)
                     local descriptor = __TS__ObjectGetOwnPropertyDescriptor(target, key) or ({configurable = true, writable = true, value = value})
                     local desc = decorator(_G, target, key, descriptor) or descriptor
-                    local isSimpleValue = (((desc.configurable == true) and (desc.writable == true)) and (not desc.get)) and (not desc.set)
+                    local isSimpleValue = desc.configurable == true and desc.writable == true and not desc.get and not desc.set
                     if isSimpleValue then
                         rawset(target, key, desc.value)
                     else

package/dist/lualib/DelegatedYield.lua

@@ -1,9 +1,7 @@
 function __TS__DelegatedYield(iterable)
     if type(iterable) == "string" then
         for index = 0, #iterable - 1 do
-            coroutine.yield(
-                __TS__StringAccess(iterable, index)
-            )
+            coroutine.yield(__TS__StringAccess(iterable, index))
         end
     elseif iterable.____coroutine ~= nil then
         local co = iterable.____coroutine

package/dist/lualib/Delete.lua

@@ -4,16 +4,16 @@ function __TS__Delete(target, key)
     if descriptor then
         if not descriptor.configurable then
             error(
-                ((("Cannot delete property " .. tostring(key)) .. " of ") .. tostring(target)) .. ".",
+                __TS__New(
+                    TypeError,
+                    ((("Cannot delete property " .. tostring(key)) .. " of ") .. tostring(target)) .. "."
+                ),
                 0
             )
         end
         descriptors[key] = nil
         return true
     end
-    if target[key] ~= nil then
-        target[key] = nil
-        return true
-    end
-    return false
+    target[key] = nil
+    return true
 end

package/dist/lualib/Error.lua

@@ -16,7 +16,7 @@ function __TS__WrapErrorToString(self, getDescription)
     return function(self)
         local description = getDescription(self)
         local caller = debug.getinfo(3, "f")
-        if (_VERSION == "Lua 5.1") or (caller and (caller.func ~= error)) then
+        if _VERSION == "Lua 5.1" or caller and caller.func ~= error then
             return description
         else
             return (tostring(description) .. "\n") .. self.stack
@@ -27,49 +27,52 @@ function __TS__InitErrorClass(self, Type, name)
     Type.name = name
     return setmetatable(
         Type,
-        {
-            __call = function(____, _self, message) return __TS__New(Type, message) end
-        }
+        {__call = function(____, _self, message) return __TS__New(Type, message) end}
     )
 end
-Error = __TS__InitErrorClass(
-    _G,
-    (function()
-        local ____ = __TS__Class()
-        ____.name = ""
-        function ____.prototype.____constructor(self, message)
-            if message == nil then
-                message = ""
-            end
-            self.message = message
-            self.name = "Error"
-            self.stack = __TS__GetErrorStack(_G, self.constructor.new)
-            local metatable = getmetatable(self)
-            if not metatable.__errorToStringPatched then
-                metatable.__errorToStringPatched = true
-                metatable.__tostring = __TS__WrapErrorToString(_G, metatable.__tostring)
-            end
-        end
-        function ____.prototype.__tostring(self)
-            return (((self.message ~= "") and (function() return (self.name .. ": ") .. self.message end)) or (function() return self.name end))()
-        end
-        return ____
-    end)(),
-    "Error"
-)
-for ____, errorName in ipairs({"RangeError", "ReferenceError", "SyntaxError", "TypeError", "URIError"}) do
-    _G[errorName] = __TS__InitErrorClass(
-        _G,
-        (function()
-            local ____ = __TS__Class()
-            ____.name = ____.name
-            __TS__ClassExtends(____, Error)
-            function ____.prototype.____constructor(self, ...)
-                Error.prototype.____constructor(self, ...)
-                self.name = errorName
-            end
-            return ____
-        end)(),
-        errorName
-    )
+local ____TS__InitErrorClass_3 = __TS__InitErrorClass
+local ____G_2 = _G
+____class_0 = __TS__Class()
+____class_0.name = ""
+function ____class_0.prototype.____constructor(self, message)
+    if message == nil then
+        message = ""
+    end
+    self.message = message
+    self.name = "Error"
+    self.stack = __TS__GetErrorStack(_G, self.constructor.new)
+    local metatable = getmetatable(self)
+    if not metatable.__errorToStringPatched then
+        metatable.__errorToStringPatched = true
+        metatable.__tostring = __TS__WrapErrorToString(_G, 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
+end
+Error = ____TS__InitErrorClass_3(____G_2, ____class_0, "Error")
+for ____, errorName in ipairs({
+    "RangeError",
+    "ReferenceError",
+    "SyntaxError",
+    "TypeError",
+    "URIError"
+}) do
+    local ____G_7 = _G
+    local ____TS__InitErrorClass_6 = __TS__InitErrorClass
+    local ____G_5 = _G
+    local ____class_4 = __TS__Class()
+    ____class_4.name = ____class_4.name
+    __TS__ClassExtends(____class_4, Error)
+    function ____class_4.prototype.____constructor(self, ...)
+        Error.prototype.____constructor(self, ...)
+        self.name = errorName
+    end
+    ____G_7[errorName] = ____TS__InitErrorClass_6(____G_5, ____class_4, errorName)
 end

package/dist/lualib/Generator.lua

@@ -20,11 +20,7 @@ function __TS__Generator(fn)
         local args = {...}
         local argsLength = select("#", ...)
         return {
-            ____coroutine = coroutine.create(
-                function() return fn(
-                    (unpack or table.unpack)(args, 1, argsLength)
-                ) end
-            ),
+            ____coroutine = coroutine.create(function() return fn((unpack or table.unpack)(args, 1, argsLength)) end),
             [Symbol.iterator] = __TS__GeneratorIterator,
             next = __TS__GeneratorNext
         }

package/dist/lualib/InstanceOf.lua

@@ -3,7 +3,7 @@ function __TS__InstanceOf(obj, classTbl)
         error("Right-hand side of 'instanceof' is not an object", 0)
     end
     if classTbl[Symbol.hasInstance] ~= nil then
-        return not (not classTbl[Symbol.hasInstance](classTbl, obj))
+        return not not classTbl[Symbol.hasInstance](classTbl, obj)
     end
     if type(obj) == "table" then
         local luaClass = obj.constructor

package/dist/lualib/InstanceOfObject.lua

@@ -1,4 +1,4 @@
 function __TS__InstanceOfObject(value)
     local valueType = type(value)
-    return (valueType == "table") or (valueType == "function")
+    return valueType == "table" or valueType == "function"
 end