typescript-to-lua 1.0.1 → 1.1.0

package/CHANGELOG.md

@@ -1,5 +1,23 @@
 # Changelog
 
+## 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.
+- **[Breaking(-ish)]** Due to limitations in 5.1, try/catch can no longer be used in async or generator functions when targetting Lua 5.1. This was already broken but now tstl will explicitly give an error if you try.
+- Added support for the `switch` statement in all versions! (Before they were not supported in 5.1 and universal).
+- Added support for `string.prototype.replaceAll` and improved `string.prototype.replace` implementation.
+- Added `noResolvePaths` tsconfig option to disable module resolution for environment-provided modules.
+- Implemented support for void expressions, i.e `void(0)` or `void(ignoreThisReturnValue())`.
+- Upgraded TypeScript to 4.4.4 and made it a peer dependency to hopefully avoid plugin issues due to mismatching TypeScript versions.
+- The `$vararg` language extension can be used to access CLI arguments, now also in bundles.
+- Fixed a bug regarding `baseUrl` and relative imports.
+- Fixed `sourceMapTraceback: true` not working correctly for bundles.
+- Fixed an issue regarding hoisting in switch case clauses.
+- Added missing function context validation cases for object literals.
+- Fixed a problem where awaiting rejected promises in try/catch would give the wrong result.
+- Fixed an issue where chained `.then` calls on already-resolved or already-rejected promises would cause some callbacks to not fire while they should.
+- Fixed source file paths in source maps being absolute, they are now relative again.
+
 ## 1.0.0
 
 - **[Breaking]** `/* @tupleReturn */` has been removed and will no longer have any effect. You will get an error if you try ot use it or if you use declarations that use it.

package/dist/CompilerOptions.d.ts

@@ -17,15 +17,16 @@ export interface LuaPluginImport {
 }
 export declare type CompilerOptions = OmitIndexSignature<ts.CompilerOptions> & {
     buildMode?: BuildMode;
-    noImplicitSelf?: boolean;
-    noHeader?: boolean;
     luaBundle?: string;
     luaBundleEntry?: string;
     luaTarget?: LuaTarget;
     luaLibImport?: LuaLibImportKind;
-    sourceMapTraceback?: boolean;
     luaPlugins?: LuaPluginImport[];
+    noImplicitSelf?: boolean;
+    noHeader?: boolean;
+    noResolvePaths?: string[];
     plugins?: Array<ts.PluginImport | TransformerImport>;
+    sourceMapTraceback?: boolean;
     tstlVerbose?: boolean;
     [option: string]: any;
 };

package/dist/LuaAST.js

@@ -162,9 +162,9 @@ function isVariableDeclarationStatement(node) {
 exports.isVariableDeclarationStatement = isVariableDeclarationStatement;
 function createVariableDeclarationStatement(left, right, tsOriginal) {
     const statement = createNode(SyntaxKind.VariableDeclarationStatement, tsOriginal);
-    statement.left = utils_1.castArray(left);
+    statement.left = (0, utils_1.castArray)(left);
     if (right)
-        statement.right = utils_1.castArray(right);
+        statement.right = (0, utils_1.castArray)(right);
     return statement;
 }
 exports.createVariableDeclarationStatement = createVariableDeclarationStatement;
@@ -174,8 +174,8 @@ function isAssignmentStatement(node) {
 exports.isAssignmentStatement = isAssignmentStatement;
 function createAssignmentStatement(left, right, tsOriginal) {
     const statement = createNode(SyntaxKind.AssignmentStatement, tsOriginal);
-    statement.left = utils_1.castArray(left);
-    statement.right = right ? utils_1.castArray(right) : [];
+    statement.left = (0, utils_1.castArray)(left);
+    statement.right = right ? (0, utils_1.castArray)(right) : [];
     return statement;
 }
 exports.createAssignmentStatement = createAssignmentStatement;

package/dist/LuaLib.d.ts

@@ -81,6 +81,7 @@ export declare enum LuaLibFeature {
     StringPadEnd = "StringPadEnd",
     StringPadStart = "StringPadStart",
     StringReplace = "StringReplace",
+    StringReplaceAll = "StringReplaceAll",
     StringSlice = "StringSlice",
     StringSplit = "StringSplit",
     StringStartsWith = "StringStartsWith",

package/dist/LuaLib.js

@@ -85,6 +85,7 @@ var LuaLibFeature;
     LuaLibFeature["StringPadEnd"] = "StringPadEnd";
     LuaLibFeature["StringPadStart"] = "StringPadStart";
     LuaLibFeature["StringReplace"] = "StringReplace";
+    LuaLibFeature["StringReplaceAll"] = "StringReplaceAll";
     LuaLibFeature["StringSlice"] = "StringSlice";
     LuaLibFeature["StringSplit"] = "StringSplit";
     LuaLibFeature["StringStartsWith"] = "StringStartsWith";

package/dist/LuaPrinter.d.ts

@@ -14,11 +14,15 @@ export interface PrintResult {
 export declare function createPrinter(printers: Printer[]): Printer;
 export declare class LuaPrinter {
     private emitHost;
+    private program;
+    private sourceFile;
     private static operatorMap;
     private currentIndent;
-    private sourceFile;
+    private luaFile;
+    private relativeSourcePath;
     private options;
-    constructor(emitHost: EmitHost, program: ts.Program, fileName: string);
+    static readonly sourceMapTracebackPlaceholder = "{#SourceMapTraceback}";
+    constructor(emitHost: EmitHost, program: ts.Program, sourceFile: string);
     print(file: lua.File): PrintResult;
     private printInlineSourceMap;
     private printStackTraceOverride;

package/dist/LuaPrinter.js

@@ -1,7 +1,9 @@
 "use strict";
 Object.defineProperty(exports, "__esModule", { value: true });
 exports.LuaPrinter = exports.createPrinter = exports.tstlHeader = exports.escapeString = void 0;
+const path = require("path");
 const source_map_1 = require("source-map");
+const _1 = require(".");
 const CompilerOptions_1 = require("./CompilerOptions");
 const lua = require("./LuaAST");
 const LuaLib_1 = require("./LuaLib");
@@ -71,11 +73,15 @@ function createPrinter(printers) {
 }
 exports.createPrinter = createPrinter;
 class LuaPrinter {
-    constructor(emitHost, program, fileName) {
+    constructor(emitHost, program, sourceFile) {
         this.emitHost = emitHost;
+        this.program = program;
+        this.sourceFile = sourceFile;
         this.currentIndent = "";
         this.options = program.getCompilerOptions();
-        this.sourceFile = fileName;
+        this.luaFile = (0, utils_1.normalizeSlashes)((0, _1.getEmitPath)(this.sourceFile, this.program));
+        // Source nodes contain relative path from mapped lua file to original TS source file
+        this.relativeSourcePath = (0, utils_1.normalizeSlashes)(path.relative(path.dirname(this.luaFile), this.sourceFile));
     }
     print(file) {
         // Add traceback lualib if sourcemap traceback option is enabled
@@ -94,7 +100,7 @@ class LuaPrinter {
         }
         if (this.options.sourceMapTraceback) {
             const stackTraceOverride = this.printStackTraceOverride(rootSourceNode);
-            code = code.replace("{#SourceMapTraceback}", stackTraceOverride);
+            code = code.replace(LuaPrinter.sourceMapTracebackPlaceholder, stackTraceOverride);
         }
         return { code, sourceMap: sourceMap.toString(), sourceMapNode: rootSourceNode };
     }
@@ -136,10 +142,12 @@ class LuaPrinter {
         else if (luaLibImport === CompilerOptions_1.LuaLibImportKind.Inline && file.luaLibFeatures.size > 0) {
             // Inline lualib features
             header += "-- Lua Library inline imports\n";
-            header += LuaLib_1.loadLuaLibFeatures(file.luaLibFeatures, this.emitHost);
+            header += (0, LuaLib_1.loadLuaLibFeatures)(file.luaLibFeatures, this.emitHost);
         }
-        if (this.options.sourceMapTraceback) {
-            header += "{#SourceMapTraceback}\n";
+        if (this.options.sourceMapTraceback && !(0, CompilerOptions_1.isBundleEnabled)(this.options)) {
+            // In bundle mode the traceback is being generated for the entire file in getBundleResult
+            // Otherwise, traceback is being generated locally
+            header += `${LuaPrinter.sourceMapTracebackPlaceholder}\n`;
         }
         return this.concatNodes(header, ...this.printStatementArray(file.statements));
     }
@@ -155,11 +163,11 @@ class LuaPrinter {
     createSourceNode(node, chunks, name) {
         const { line, column } = lua.getOriginalPos(node);
         return line !== undefined && column !== undefined
-            ? new source_map_1.SourceNode(line + 1, column, this.sourceFile, chunks, name)
-            : new source_map_1.SourceNode(null, null, this.sourceFile, chunks, name);
+            ? new source_map_1.SourceNode(line + 1, column, this.relativeSourcePath, chunks, name)
+            : new source_map_1.SourceNode(null, null, this.relativeSourcePath, chunks, name);
     }
     concatNodes(...chunks) {
-        return new source_map_1.SourceNode(null, null, this.sourceFile, chunks);
+        return new source_map_1.SourceNode(null, null, this.relativeSourcePath, chunks);
     }
     printBlock(block) {
         return this.concatNodes(...this.printStatementArray(block.statements));
@@ -195,7 +203,7 @@ class LuaPrinter {
             if (lua.isReturnStatement(statement))
                 break;
         }
-        return statementNodes.length > 0 ? [...utils_1.intersperse(statementNodes, "\n"), "\n"] : [];
+        return statementNodes.length > 0 ? [...(0, utils_1.intersperse)(statementNodes, "\n"), "\n"] : [];
     }
     printStatement(statement) {
         let resultNode = this.printStatementExcludingComments(statement);
@@ -422,7 +430,7 @@ class LuaPrinter {
         }
     }
     printStringLiteral(expression) {
-        return this.createSourceNode(expression, exports.escapeString(expression.value));
+        return this.createSourceNode(expression, (0, exports.escapeString)(expression.value));
     }
     printNumericLiteral(expression) {
         return this.createSourceNode(expression, String(expression.value));
@@ -486,7 +494,7 @@ class LuaPrinter {
         const chunks = [];
         const value = this.printExpression(expression.value);
         if (expression.key) {
-            if (lua.isStringLiteral(expression.key) && safe_names_1.isValidLuaIdentifier(expression.key.value)) {
+            if (lua.isStringLiteral(expression.key) && (0, safe_names_1.isValidLuaIdentifier)(expression.key.value)) {
                 chunks.push(expression.key.value, " = ", value);
             }
             else {
@@ -553,7 +561,7 @@ class LuaPrinter {
     printTableIndexExpression(expression) {
         const chunks = [];
         chunks.push(this.printExpressionInParenthesesIfNeeded(expression.table));
-        if (lua.isStringLiteral(expression.index) && safe_names_1.isValidLuaIdentifier(expression.index.value)) {
+        if (lua.isStringLiteral(expression.index) && (0, safe_names_1.isValidLuaIdentifier)(expression.index.value)) {
             chunks.push(".", this.createSourceNode(expression.index, expression.index.value));
         }
         else {
@@ -562,10 +570,10 @@ class LuaPrinter {
         return this.createSourceNode(expression, chunks);
     }
     printOperator(kind) {
-        return new source_map_1.SourceNode(null, null, this.sourceFile, LuaPrinter.operatorMap[kind]);
+        return new source_map_1.SourceNode(null, null, this.relativeSourcePath, LuaPrinter.operatorMap[kind]);
     }
     joinChunksWithComma(chunks) {
-        return utils_1.intersperse(chunks, ", ");
+        return (0, utils_1.intersperse)(chunks, ", ");
     }
     printExpressionList(expressions) {
         const chunks = [];
@@ -588,7 +596,7 @@ class LuaPrinter {
     // will not generate 'empty' mappings in the source map that point to nothing in the original TS.
     buildSourceMap(sourceRoot, rootSourceNode) {
         const map = new source_map_1.SourceMapGenerator({
-            file: utils_1.trimExtension(this.sourceFile) + ".lua",
+            file: path.basename(this.luaFile),
             sourceRoot,
         });
         let generatedLine = 1;
@@ -667,4 +675,5 @@ LuaPrinter.operatorMap = {
     [lua.SyntaxKind.BitwiseLeftShiftOperator]: "<<",
     [lua.SyntaxKind.BitwiseNotOperator]: "~",
 };
+LuaPrinter.sourceMapTracebackPlaceholder = "{#SourceMapTraceback}";
 //# sourceMappingURL=LuaPrinter.js.map

package/dist/cli/diagnostics.js

@@ -3,7 +3,7 @@ Object.defineProperty(exports, "__esModule", { value: true });
 exports.optionBuildMustBeFirstCommandLineArgument = exports.optionCanOnlyBeSpecifiedInTsconfigJsonFile = exports.argumentForOptionMustBe = exports.compilerOptionExpectsAnArgument = exports.theSpecifiedPathDoesNotExist = exports.cannotFindATsconfigJsonAtTheSpecifiedDirectory = exports.optionProjectCannotBeMixedWithSourceFilesOnACommandLine = exports.compilerOptionRequiresAValueOfType = exports.unknownCompilerOption = exports.watchErrorSummary = exports.tstlOptionsAreMovingToTheTstlObject = void 0;
 const ts = require("typescript");
 const utils_1 = require("../utils");
-exports.tstlOptionsAreMovingToTheTstlObject = utils_1.createSerialDiagnosticFactory((tstl) => ({
+exports.tstlOptionsAreMovingToTheTstlObject = (0, utils_1.createSerialDiagnosticFactory)((tstl) => ({
     category: ts.DiagnosticCategory.Warning,
     messageText: 'TSTL options are moving to the "tstl" object. Adjust your tsconfig to look like\n' +
         `"tstl": ${JSON.stringify(tstl, undefined, 4)}`,
@@ -19,7 +19,7 @@ const watchErrorSummary = (errorCount) => ({
         : `Found ${errorCount} errors. Watching for file changes.`,
 });
 exports.watchErrorSummary = watchErrorSummary;
-const createCommandLineError = (code, getMessage) => utils_1.createDiagnosticFactoryWithCode(code, (...args) => ({ messageText: getMessage(...args) }));
+const createCommandLineError = (code, getMessage) => (0, utils_1.createDiagnosticFactoryWithCode)(code, (...args) => ({ messageText: getMessage(...args) }));
 exports.unknownCompilerOption = createCommandLineError(5023, (name) => `Unknown compiler option '${name}'.`);
 exports.compilerOptionRequiresAValueOfType = createCommandLineError(5024, (name, type) => `Compiler option '${name}' requires a value of type ${type}.`);
 exports.optionProjectCannotBeMixedWithSourceFilesOnACommandLine = createCommandLineError(5042, () => "Option 'project' cannot be mixed with source files on a command line.");

package/dist/cli/report.js

@@ -6,7 +6,7 @@ const prepareDiagnosticForFormatting = (diagnostic) => diagnostic.source === "ty
 exports.prepareDiagnosticForFormatting = prepareDiagnosticForFormatting;
 function createDiagnosticReporter(pretty, system = ts.sys) {
     const reporter = ts.createDiagnosticReporter(system, pretty);
-    return diagnostic => reporter(exports.prepareDiagnosticForFormatting(diagnostic));
+    return diagnostic => reporter((0, exports.prepareDiagnosticForFormatting)(diagnostic));
 }
 exports.createDiagnosticReporter = createDiagnosticReporter;
 //# sourceMappingURL=report.js.map

package/dist/cli/tsconfig.js

@@ -12,14 +12,14 @@ function locateConfigFile(commandLine) {
         if (commandLine.fileNames.length > 0) {
             return undefined;
         }
-        const searchPath = utils_1.normalizeSlashes(process.cwd());
+        const searchPath = (0, utils_1.normalizeSlashes)(process.cwd());
         return ts.findConfigFile(searchPath, ts.sys.fileExists);
     }
     if (commandLine.fileNames.length !== 0) {
         return cliDiagnostics.optionProjectCannotBeMixedWithSourceFilesOnACommandLine();
     }
     // TODO: Unlike tsc, this resolves `.` to absolute path
-    const fileOrDirectory = utils_1.normalizeSlashes(path.resolve(process.cwd(), project));
+    const fileOrDirectory = (0, utils_1.normalizeSlashes)(path.resolve(process.cwd(), project));
     if (ts.sys.directoryExists(fileOrDirectory)) {
         const configFileName = path.posix.join(fileOrDirectory, "tsconfig.json");
         if (ts.sys.fileExists(configFileName)) {
@@ -39,7 +39,7 @@ function locateConfigFile(commandLine) {
 exports.locateConfigFile = locateConfigFile;
 function parseConfigFileWithSystem(configFileName, commandLineOptions, system = ts.sys) {
     const parsedConfigFile = ts.parseJsonSourceFileConfigFileContent(ts.readJsonConfigFile(configFileName, system.readFile), system, path.dirname(configFileName), commandLineOptions, configFileName);
-    return parse_1.updateParsedConfigFile(parsedConfigFile);
+    return (0, parse_1.updateParsedConfigFile)(parsedConfigFile);
 }
 exports.parseConfigFileWithSystem = parseConfigFileWithSystem;
 function createConfigFileUpdater(optionsToExtend) {
@@ -49,7 +49,7 @@ function createConfigFileUpdater(optionsToExtend) {
         if (!configFile || !configFilePath)
             return [];
         if (!configFileMap.has(configFile)) {
-            const parsedConfigFile = parse_1.updateParsedConfigFile(ts.parseJsonSourceFileConfigFileContent(configFile, ts.sys, path.dirname(configFilePath), optionsToExtend, configFilePath));
+            const parsedConfigFile = (0, parse_1.updateParsedConfigFile)(ts.parseJsonSourceFileConfigFileContent(configFile, ts.sys, path.dirname(configFilePath), optionsToExtend, configFilePath));
             configFileMap.set(configFile, parsedConfigFile);
         }
         const parsedConfigFile = configFileMap.get(configFile);

package/dist/lualib/Await.lua

@@ -2,19 +2,35 @@ function __TS__AsyncAwaiter(generator)
     return __TS__New(
         __TS__Promise,
         function(____, resolve, reject)
-            local asyncCoroutine, adopt, fulfilled, step
+            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))()
             end
             function fulfilled(self, value)
-                local success, resultOrError = coroutine.resume(asyncCoroutine, value)
+                local success, errorOrErrorHandler, resultOrError = coroutine.resume(asyncCoroutine, value)
                 if success then
-                    step(_G, resultOrError)
+                    step(_G, resultOrError, errorOrErrorHandler)
                 else
                     reject(_G, resultOrError)
                 end
             end
-            function step(self, result)
+            function rejected(self, handler)
+                if handler then
+                    return function(____, value)
+                        local success, valueOrError = pcall(handler, value)
+                        if success then
+                            step(_G, valueOrError, handler)
+                        else
+                            reject(_G, valueOrError)
+                        end
+                    end
+                else
+                    return function(____, value)
+                        reject(_G, value)
+                    end
+                end
+            end
+            function step(self, result, errorHandler)
                 if coroutine.status(asyncCoroutine) == "dead" then
                     resolve(_G, result)
                 else
@@ -23,21 +39,21 @@ function __TS__AsyncAwaiter(generator)
                         return ____self["then"](
                             ____self,
                             fulfilled,
-                            function(____, reason) return reject(_G, reason) end
+                            rejected(_G, errorHandler)
                         )
                     end)()
                 end
             end
             asyncCoroutine = coroutine.create(generator)
-            local success, resultOrError = coroutine.resume(asyncCoroutine)
+            local success, errorOrErrorHandler, resultOrError = coroutine.resume(asyncCoroutine)
             if success then
-                step(_G, resultOrError)
+                step(_G, resultOrError, errorOrErrorHandler)
             else
-                reject(_G, resultOrError)
+                reject(_G, errorOrErrorHandler)
             end
         end
     )
 end
-function __TS__Await(thing)
-    return coroutine.yield(thing)
+function __TS__Await(errorHandler, thing)
+    return coroutine.yield(errorHandler, thing)
 end

package/dist/lualib/Promise.lua

@@ -28,7 +28,10 @@ function __TS__Promise.prototype.____constructor(self, executor)
     self.rejectedCallbacks = {}
     self.finallyCallbacks = {}
     do
-        local ____try, e = pcall(
+        local function ____catch(e)
+            self:reject(e)
+        end
+        local ____try, ____hasReturned = pcall(
             function()
                 executor(
                     _G,
@@ -38,7 +41,7 @@ function __TS__Promise.prototype.____constructor(self, executor)
             end
         )
         if not ____try then
-            self:reject(e)
+            ____hasReturned, ____returnValue = ____catch(____hasReturned)
         end
     end
 end
@@ -67,10 +70,12 @@ __TS__Promise.prototype["then"] = function(self, onFulfilled, onRejected)
     local promise = ____.promise
     local resolve = ____.resolve
     local reject = ____.reject
+    local isFulfilled = self.state == __TS__PromiseState.Fulfilled
+    local isRejected = self.state == __TS__PromiseState.Rejected
     if onFulfilled then
         local internalCallback = self:createPromiseResolvingCallback(onFulfilled, resolve, reject)
         __TS__ArrayPush(self.fulfilledCallbacks, internalCallback)
-        if self.state == __TS__PromiseState.Fulfilled then
+        if isFulfilled then
             internalCallback(_G, self.value)
         end
     else
@@ -82,10 +87,16 @@ __TS__Promise.prototype["then"] = function(self, onFulfilled, onRejected)
     if onRejected then
         local internalCallback = self:createPromiseResolvingCallback(onRejected, resolve, reject)
         __TS__ArrayPush(self.rejectedCallbacks, internalCallback)
-        if self.state == __TS__PromiseState.Rejected then
+        if isRejected then
             internalCallback(_G, self.rejectionReason)
         end
     end
+    if isFulfilled then
+        resolve(_G, self.value)
+    end
+    if isRejected then
+        reject(_G, self.rejectionReason)
+    end
     return promise
 end
 function __TS__Promise.prototype.catch(self, onRejected)
@@ -127,7 +138,10 @@ end
 function __TS__Promise.prototype.createPromiseResolvingCallback(self, f, resolve, reject)
     return function(____, value)
         do
-            local ____try, e = pcall(
+            local function ____catch(e)
+                reject(_G, e)
+            end
+            local ____try, ____hasReturned = pcall(
                 function()
                     self:handleCallbackData(
                         f(_G, value),
@@ -137,7 +151,7 @@ function __TS__Promise.prototype.createPromiseResolvingCallback(self, f, resolve
                 end
             )
             if not ____try then
-                reject(_G, e)
+                ____hasReturned, ____returnValue = ____catch(____hasReturned)
             end
         end
     end

package/dist/lualib/SourceMapTraceBack.lua

@@ -13,16 +13,26 @@ function __TS__SourceMapTraceBack(fileName, sourceMap)
             if type(trace) ~= "string" then
                 return trace
             end
-            local result = string.gsub(
-                trace,
-                "(%S+).lua:(%d+)",
-                function(file, line)
-                    local fileSourceMap = _G.__TS__sourcemap[file .. ".lua"]
-                    if fileSourceMap and fileSourceMap[line] then
-                        return (file .. ".ts:") .. tostring(fileSourceMap[line])
+            local function replacer(____, file, srcFile, line)
+                local fileSourceMap = _G.__TS__sourcemap[file]
+                if fileSourceMap and fileSourceMap[line] then
+                    local data = fileSourceMap[line]
+                    if type(data) == "number" then
+                        return (srcFile .. ":") .. tostring(data)
                     end
-                    return (file .. ".lua:") .. line
+                    return (tostring(data.file) .. ":") .. tostring(data.line)
                 end
+                return (file .. ":") .. line
+            end
+            local result = string.gsub(
+                trace,
+                "(%S+)%.lua:(%d+)",
+                function(file, line) return replacer(_G, file .. ".lua", file .. ".ts", line) end
+            )
+            result = string.gsub(
+                result,
+                "(%[string \"[^\"]+\"%]):(%d+)",
+                function(file, line) return replacer(_G, file, "unknown", line) end
             )
             return result
         end

package/dist/lualib/StringReplace.lua

@@ -1,16 +1,11 @@
 function __TS__StringReplace(source, searchValue, replaceValue)
-    searchValue = string.gsub(searchValue, "[%%%(%)%.%+%-%*%?%[%^%$]", "%%%1")
-    if type(replaceValue) == "string" then
-        replaceValue = string.gsub(replaceValue, "%%", "%%%%")
-        local result = string.gsub(source, searchValue, replaceValue, 1)
-        return result
-    else
-        local result = string.gsub(
-            source,
-            searchValue,
-            function(match) return replaceValue(_G, match) end,
-            1
-        )
-        return result
+    local startPos, endPos = string.find(source, searchValue, nil, true)
+    if not startPos then
+        return source
     end
+    local sub = string.sub
+    local before = sub(source, 1, startPos - 1)
+    local replacement = (((type(replaceValue) == "string") and (function() return replaceValue end)) or (function() return replaceValue(_G, searchValue, startPos - 1, source) end))()
+    local after = sub(source, endPos + 1)
+    return (before .. replacement) .. after
 end

package/dist/lualib/StringReplaceAll.lua

@@ -0,0 +1,35 @@
+function __TS__StringReplaceAll(source, searchValue, replaceValue)
+    local replacer
+    if type(replaceValue) == "string" then
+        replacer = function() return replaceValue end
+    else
+        replacer = replaceValue
+    end
+    local parts = {}
+    local partsIndex = 1
+    local sub = string.sub
+    if #searchValue == 0 then
+        parts[1] = replacer(_G, "", 0, source)
+        partsIndex = 2
+        for i = 1, #source do
+            parts[partsIndex] = sub(source, i, i)
+            parts[partsIndex + 1] = replacer(_G, "", i, source)
+            partsIndex = partsIndex + 2
+        end
+    else
+        local find = string.find
+        local currentPos = 1
+        while true do
+            local startPos, endPos = find(source, searchValue, currentPos, true)
+            if not startPos then
+                break
+            end
+            parts[partsIndex] = sub(source, currentPos, startPos - 1)
+            parts[partsIndex + 1] = replacer(_G, searchValue, startPos - 1, source)
+            partsIndex = partsIndex + 2
+            currentPos = endPos + 1
+        end
+        parts[partsIndex] = sub(source, currentPos)
+    end
+    return table.concat(parts)
+end