typescript-to-lua 1.1.0 → 1.3.1

package/CHANGELOG.md

@@ -1,5 +1,33 @@
 # Changelog
 
+## 1.3.0
+
+- Added `LuaPairsIterable` language extension to mark objects as iterable with Lua's `pairs`.
+- Added support for properties on functions.
+- Unicode is no longer escaped and used as-is for `"luaTarget": "JIT"`.
+- Fixed some bugs related to destructuring in loops and function parameters.
+- Fixed incorrect global being generated for some `try` statements.
+- Fixed some incorrect behavior for `??` and `? :` when generic types were involved.
+- Added missing `...` optimization in cases where casts or parentheses are used.
+- Fixed a bug for `Promise` when resolving with another Promise. This also fixes some unexpected behavior with `async` which is built with Promises.
+- Fixed `async` functions not aborting after returning from a `catch` block.
+
+## 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";
@@ -104,10 +104,10 @@ const luaLibDependencies = {
     ArrayConcat: [LuaLibFeature.ArrayIsArray],
     ArrayFlat: [LuaLibFeature.ArrayConcat, LuaLibFeature.ArrayIsArray],
     ArrayFlatMap: [LuaLibFeature.ArrayConcat, LuaLibFeature.ArrayIsArray],
-    Await: [LuaLibFeature.InstanceOf, LuaLibFeature.New],
+    Await: [LuaLibFeature.InstanceOf, LuaLibFeature.New, LuaLibFeature.Promise],
     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

@@ -32,7 +32,7 @@ exports.tstlHeader = "--[[ Generated with https://github.com/TypeScriptToLua/Typ
  * `foo.bar` => passes (`function foo.bar()` is valid)
  * `getFoo().bar` => fails (`function getFoo().bar()` would be illegal)
  */
-const isValidLuaFunctionDeclarationName = (str) => /^[a-zA-Z0-9_.]+$/.test(str);
+const isValidLuaFunctionDeclarationName = (str, options) => ((0, safe_names_1.shouldAllowUnicode)(options) ? /^[a-zA-Z0-9_\u00FF-\uFFFD.]+$/ : /^[a-zA-Z0-9_.]+$/).test(str);
 /**
  * Returns true if expression contains no function calls.
  */
@@ -294,7 +294,7 @@ class LuaPrinter {
             (statement.right[0].flags & lua.FunctionExpressionFlags.Declaration) !== 0) {
             // Use `function foo()` instead of `foo = function()`
             const name = this.printExpression(statement.left[0]);
-            if (isValidLuaFunctionDeclarationName(name.toString())) {
+            if (isValidLuaFunctionDeclarationName(name.toString(), this.options)) {
                 chunks.push(this.printFunctionDefinition(statement));
                 return this.createSourceNode(statement, chunks);
             }
@@ -494,7 +494,7 @@ class LuaPrinter {
         const chunks = [];
         const value = this.printExpression(expression.value);
         if (expression.key) {
-            if (lua.isStringLiteral(expression.key) && (0, safe_names_1.isValidLuaIdentifier)(expression.key.value)) {
+            if (lua.isStringLiteral(expression.key) && (0, safe_names_1.isValidLuaIdentifier)(expression.key.value, this.options)) {
                 chunks.push(expression.key.value, " = ", value);
             }
             else {
@@ -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 = [];
@@ -561,7 +566,7 @@ class LuaPrinter {
     printTableIndexExpression(expression) {
         const chunks = [];
         chunks.push(this.printExpressionInParenthesesIfNeeded(expression.table));
-        if (lua.isStringLiteral(expression.index) && (0, safe_names_1.isValidLuaIdentifier)(expression.index.value)) {
+        if (lua.isStringLiteral(expression.index) && (0, safe_names_1.isValidLuaIdentifier)(expression.index.value, this.options)) {
             chunks.push(".", this.createSourceNode(expression.index, expression.index.value));
         }
         else {
@@ -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/cli/parse.d.ts

@@ -13,7 +13,7 @@ interface CommandLineOptionOfEnum extends CommandLineOptionBase {
     choices: string[];
 }
 interface CommandLineOptionOfPrimitive extends CommandLineOptionBase {
-    type: "boolean" | "string" | "object";
+    type: "boolean" | "string" | "object" | "array";
 }
 declare type CommandLineOption = CommandLineOptionOfEnum | CommandLineOptionOfPrimitive;
 export declare const optionDeclarations: CommandLineOption[];

package/dist/cli/parse.js

@@ -59,6 +59,11 @@ exports.optionDeclarations = [
         description: "Provide verbose output useful for diagnosing problems.",
         type: "boolean",
     },
+    {
+        name: "noResolvePaths",
+        description: "An array of paths that tstl should not resolve and keep as-is.",
+        type: "array",
+    },
 ];
 function updateParsedConfigFile(parsedConfigFile) {
     let hasRootLevelOptions = false;
@@ -162,6 +167,15 @@ function readValue(option, value) {
             }
             return { value };
         }
+        case "array": {
+            if (!Array.isArray(value)) {
+                return {
+                    value: undefined,
+                    error: cliDiagnostics.compilerOptionRequiresAValueOfType(option.name, option.type),
+                };
+            }
+            return { value };
+        }
         case "enum": {
             if (typeof value !== "string") {
                 return {

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,24 +4,34 @@ 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)
                 if handler then
                     return function(____, value)
-                        local success, valueOrError = pcall(handler, value)
+                        local success, hasReturnedOrError, returnedValue = pcall(handler, value)
                         if success then
-                            step(_G, valueOrError, handler)
+                            if hasReturnedOrError then
+                                resolve(_G, returnedValue)
+                            else
+                                step(_G, hasReturnedOrError, handler)
+                            end
                         else
-                            reject(_G, valueOrError)
+                            reject(_G, hasReturnedOrError)
                         end
                     end
                 else
@@ -34,14 +44,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 @@
 function __TS__CloneDescriptor(____bindingPattern0)
+    local value
+    local writable
+    local set
+    local get
+    local configurable
     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