zuzu-js 0.1.1 → 0.2.0

package/dist/zuzu-browser-worker.js

@@ -985,14 +985,17 @@
           return 1;
         }
         slice(start, end) {
-          return new _ZuzuBinary(this.bytes.slice(start, end));
+          return new this.constructor(this.bytes.slice(start, end));
         }
         at(index) {
-          const idx = Number(index);
+          let idx = Number(index);
+          if (idx < 0) {
+            idx = this.bytes.length + idx;
+          }
           if (idx < 0 || idx >= this.bytes.length) {
             return null;
           }
-          return new _ZuzuBinary([this.bytes[idx]]);
+          return new this.constructor([this.bytes[idx]]);
         }
         to_String() {
           let out = "";
@@ -1164,6 +1167,8 @@
         let inSingle = false;
         let inDouble = false;
         let inBacktick = false;
+        let inRegex = false;
+        let inRegexClass = false;
         let inLineComment = false;
         let inBlockComment = false;
         let escape = false;
@@ -1190,6 +1195,35 @@
             masked.push(ch === "\n" ? "\n" : " ");
             continue;
           }
+          if (inRegex) {
+            if (escape) {
+              escape = false;
+              masked.push(" ");
+              continue;
+            }
+            if (ch === "\\") {
+              escape = true;
+              masked.push(" ");
+              continue;
+            }
+            if (ch === "[") {
+              inRegexClass = true;
+              masked.push(" ");
+              continue;
+            }
+            if (ch === "]") {
+              inRegexClass = false;
+              masked.push(" ");
+              continue;
+            }
+            if (ch === "/" && !inRegexClass) {
+              inRegex = false;
+              masked.push(" ");
+              continue;
+            }
+            masked.push(ch === "\n" ? "\n" : " ");
+            continue;
+          }
           if (inSingle || inDouble || inBacktick) {
             if (escape) {
               escape = false;
@@ -1225,6 +1259,12 @@
             masked.push(" ");
             continue;
           }
+          if (ch === "/" && looksLikeRegexLiteralStart(stripped, i)) {
+            inRegex = true;
+            inRegexClass = false;
+            masked.push(" ");
+            continue;
+          }
           if (ch === "'") {
             inSingle = true;
             masked.push(" ");
@@ -1295,6 +1335,17 @@
         }
         return [...names];
       }
+      function looksLikeRegexLiteralStart(source, index) {
+        let pos = index - 1;
+        while (pos >= 0 && /\s/u.test(source[pos])) {
+          pos--;
+        }
+        if (pos < 0) {
+          return true;
+        }
+        const previous = source[pos];
+        return /[({[=,:;!~?&|+\-*%^<>]/u.test(previous);
+      }
       function collectTopLevelUnpackDeclarationNames(source, topLevelMask) {
         const names = [];
         const rx = /(?:^|[;\n])\s*(?:export\s+)?(?:let|const)\b/gm;
@@ -5240,25 +5291,21 @@
         function previous() {
           return tokens[index - 1];
         }
-        function canTerminateStatement() {
+        function canTerminateSimpleStatement() {
           const token = current();
-          const prev = previous();
-          if (!prev) {
-            return false;
-          }
           if (token.type === "punctuation" && token.value === "}") {
             return true;
           }
           if (token.type === "eof") {
             return true;
           }
-          return token.line > prev.endLine;
+          return false;
         }
         function consumeStatementTerminator(message) {
           if (match("punctuation", ";")) {
             return;
           }
-          if (canTerminateStatement()) {
+          if (canTerminateSimpleStatement()) {
             return;
           }
           throw new TranspilerSyntaxError(message || "Expected statement terminator", current());
@@ -6389,7 +6436,7 @@
                 prefix: true
               }, keyword, endLocFromNode(test));
             }
-            expect("punctuation", ";", semicolonMessage);
+            consumeStatementTerminator(semicolonMessage);
             const consequent = withLoc({
               type: "BlockStatement",
               body: [stmt]
@@ -6406,7 +6453,7 @@
             const keyword = current();
             index++;
             const iterable = parseExpression();
-            expect("punctuation", ";", semicolonMessage);
+            consumeStatementTerminator(semicolonMessage);
             const body = withLoc({
               type: "BlockStatement",
               body: [stmt]
@@ -7338,6 +7385,7 @@
           ...options,
           asyncContext: needsAsyncWrapper && !syncEval,
           asyncNames: new Set(collectAsyncFunctionNames(ast.body)),
+          evalNames: /* @__PURE__ */ new Set(["eval", ...collectEvalImportNames(ast.body)]),
           weakStorageNames: new Set(collectWeakDeclaredNames(ast.body)),
           scopeNames: /* @__PURE__ */ new Set([
             ...expressionDeclaredNames
@@ -7390,7 +7438,8 @@ ${source}
           "__argc__",
           "__file__",
           "__global__",
-          "__system__"
+          "__system__",
+          ...options.evalNames || []
         ].filter(Boolean));
         const localKinds = /* @__PURE__ */ new Set([
           "FunctionDeclaration",
@@ -7417,6 +7466,21 @@ ${source}
             }
             return;
           }
+          if (value.type === "TryStatement") {
+            visit(value.block, value);
+            for (const handler of value.handlers || []) {
+              const paramName = handler.paramName;
+              const hadParam = paramName ? declared.has(paramName) : false;
+              if (paramName) {
+                declared.add(paramName);
+              }
+              visit(handler.body, handler);
+              if (paramName && !hadParam) {
+                declared.delete(paramName);
+              }
+            }
+            return;
+          }
           if (value.type === "VariableUnpackDeclaration") {
             visit(value.init, value);
             for (const entry of bindingEntriesForPattern(value.pattern)) {
@@ -7490,6 +7554,7 @@ ${source}
           syncEval: options.syncEval,
           asyncContext: options.asyncContext,
           asyncNames: options.asyncNames,
+          evalNames: options.evalNames,
           weakStorageNames: options.weakStorageNames,
           scopeNames: options.scopeNames,
           bodylessFunctionNames: options.bodylessFunctionNames,
@@ -7908,7 +7973,7 @@ globalThis[${JSON.stringify(node.id.name)}] = ${name2};` : declaration;
         for (const param of params) {
           if (param.type === "SpecialParameter") {
             if (param.special === "lead_rest") {
-              lines.push(`let ${param.leadName} = arguments[${argIndex}];`);
+              lines.push(`const ${param.leadName} = arguments[${argIndex}];`);
               argIndex++;
               lines.push(`const ${param.name} = Array.prototype.slice.call( arguments, ${argIndex} );`);
               continue;
@@ -7935,11 +8000,11 @@ globalThis[${JSON.stringify(node.id.name)}] = ${name2};` : declaration;
             continue;
           }
           if (param.defaultValue) {
-            lines.push(`let ${paramName} = __argc__ > ${argIndex} ? arguments[${argIndex}] : ${emitExpression(param.defaultValue)};`);
+            lines.push(`const ${paramName} = __argc__ > ${argIndex} ? arguments[${argIndex}] : ${emitExpression(param.defaultValue)};`);
           } else if (param.optional) {
-            lines.push(`let ${paramName} = __argc__ > ${argIndex} ? arguments[${argIndex}] : null;`);
+            lines.push(`const ${paramName} = __argc__ > ${argIndex} ? arguments[${argIndex}] : null;`);
           } else {
-            lines.push(`let ${paramName} = arguments[${argIndex}];`);
+            lines.push(`const ${paramName} = arguments[${argIndex}];`);
           }
           if (param.typeName) {
             lines.push(
@@ -7955,62 +8020,71 @@ globalThis[${JSON.stringify(node.id.name)}] = ${name2};` : declaration;
           case "pairlist_only":
             return [
               `const __zuzu_call_args = Array.prototype.slice.call( arguments );`,
-              `let ${signature.namedName} = __zuzu_pairlist_literal( [] );`,
+              "let __zuzu_named_args = __zuzu_pairlist_literal( [] );",
               "for ( const __a of __zuzu_call_args ) {",
-              `if ( __zuzu_is_pairlist( __a ) ) { ${signature.namedName} = __a; } else { throw new Exception( "named PairList parameter only accepts named arguments" ); }`,
-              "}"
+              'if ( __zuzu_is_pairlist( __a ) ) { __zuzu_named_args = __a; } else { throw new Exception( "named PairList parameter only accepts named arguments" ); }',
+              "}",
+              `const ${signature.namedName} = __zuzu_named_args;`
             ].join("\n");
           case "pairlist_rest_array":
           case "rest_array_pairlist":
             return [
               `const __zuzu_call_args = Array.prototype.slice.call( arguments );`,
-              `let ${signature.namedName} = __zuzu_pairlist_literal( [] );`,
-              `let ${signature.restName} = [];`,
+              "let __zuzu_named_args = __zuzu_pairlist_literal( [] );",
+              "const __zuzu_rest_args = [];",
               "for ( const __a of __zuzu_call_args ) {",
-              `if ( __zuzu_is_pairlist( __a ) ) { ${signature.namedName} = __a; } else { ${signature.restName}.push( __a ); }`,
-              "}"
+              "if ( __zuzu_is_pairlist( __a ) ) { __zuzu_named_args = __a; } else { __zuzu_rest_args.push( __a ); }",
+              "}",
+              `const ${signature.namedName} = __zuzu_named_args;`,
+              `const ${signature.restName} = __zuzu_rest_args;`
             ].join("\n");
           case "lead_pairlist":
             return [
               "const __zuzu_call_args = Array.prototype.slice.call( arguments );",
-              `let ${signature.headName} = __zuzu_call_args[0];`,
-              `let ${signature.namedName} = __zuzu_pairlist_literal( [] );`,
-              `let ${signature.restName} = [];`,
+              `const ${signature.headName} = __zuzu_call_args[0];`,
+              "let __zuzu_named_args = __zuzu_pairlist_literal( [] );",
+              "const __zuzu_rest_args = [];",
               "for ( let __i = 1; __i < __zuzu_call_args.length; __i++ ) {",
               "const __a = __zuzu_call_args[__i];",
-              `if ( __zuzu_is_pairlist( __a ) ) { ${signature.namedName} = __a; } else { ${signature.restName}.push( __a ); }`,
-              "}"
+              "if ( __zuzu_is_pairlist( __a ) ) { __zuzu_named_args = __a; } else { __zuzu_rest_args.push( __a ); }",
+              "}",
+              `const ${signature.namedName} = __zuzu_named_args;`,
+              `const ${signature.restName} = __zuzu_rest_args;`
             ].join("\n");
           case "trail_pairlist":
             return [
               "const __zuzu_call_args = Array.prototype.slice.call( arguments );",
-              `let ${signature.headName} = __zuzu_call_args[0];`,
-              `let ${signature.restName} = [];`,
-              `let ${signature.namedName} = __zuzu_pairlist_literal( [] );`,
+              `const ${signature.headName} = __zuzu_call_args[0];`,
+              "const __zuzu_rest_args = [];",
+              "let __zuzu_named_args = __zuzu_pairlist_literal( [] );",
               "for ( let __i = 1; __i < __zuzu_call_args.length; __i++ ) {",
               "const __a = __zuzu_call_args[__i];",
-              `if ( __zuzu_is_pairlist( __a ) ) { ${signature.namedName} = __a; } else { ${signature.restName}.push( __a ); }`,
-              "}"
+              "if ( __zuzu_is_pairlist( __a ) ) { __zuzu_named_args = __a; } else { __zuzu_rest_args.push( __a ); }",
+              "}",
+              `const ${signature.restName} = __zuzu_rest_args;`,
+              `const ${signature.namedName} = __zuzu_named_args;`
             ].join("\n");
           case "scalar_pairlist":
             return [
               "const __zuzu_call_args = Array.prototype.slice.call( arguments );",
-              `let ${signature.headName} = __zuzu_call_args[0];`,
-              `let ${signature.namedName} = __zuzu_pairlist_literal( [] );`,
+              `const ${signature.headName} = __zuzu_call_args[0];`,
+              "let __zuzu_named_args = __zuzu_pairlist_literal( [] );",
               "for ( let __i = 1; __i < __zuzu_call_args.length; __i++ ) {",
               "const __a = __zuzu_call_args[__i];",
-              `if ( __zuzu_is_pairlist( __a ) ) { ${signature.namedName} = __a; } else { throw new Exception( "named arguments not allowed for this function" ); }`,
-              "}"
+              'if ( __zuzu_is_pairlist( __a ) ) { __zuzu_named_args = __a; } else { throw new Exception( "named arguments not allowed for this function" ); }',
+              "}",
+              `const ${signature.namedName} = __zuzu_named_args;`
             ].join("\n");
           case "variadic":
             return [
               "const __zuzu_call_args = Array.prototype.slice.call( arguments );",
-              `let ${signature.headName} = __zuzu_call_args[0];`,
-              `let ${signature.restName} = [];`,
+              `const ${signature.headName} = __zuzu_call_args[0];`,
+              "const __zuzu_rest_args = [];",
               "for ( let __i = 1; __i < __zuzu_call_args.length; __i++ ) {",
               "const __a = __zuzu_call_args[__i];",
-              `if ( __zuzu_is_pairlist( __a ) ) { throw new Exception( "named arguments not allowed for this function" ); } ${signature.restName}.push( __a );`,
-              "}"
+              'if ( __zuzu_is_pairlist( __a ) ) { throw new Exception( "named arguments not allowed for this function" ); } __zuzu_rest_args.push( __a );',
+              "}",
+              `const ${signature.restName} = __zuzu_rest_args;`
             ].join("\n");
           default:
             return "";
@@ -8077,7 +8151,7 @@ globalThis[${JSON.stringify(node.id.name)}] = ${name2};` : declaration;
         const moduleName = `__zuzu_imported_${Math.abs(hashString(node.source))}_${node.specifiers.length}_${options.syncEval ? loopCounter++ : 0}`;
         const defineImports = node.specifiers.map((specifier) => {
           const importedName = normalizeImportedName(node.source, specifier.imported);
-          if (node.source === "std/eval" && importedName === "eval" && specifier.local === "eval") {
+          if (node.source === "std/eval" && importedName === "eval") {
             return "";
           }
           return defineLiveImport(specifier.local, moduleName, importedName, options);
@@ -8263,6 +8337,21 @@ ${cleanup}
         }
         return names;
       }
+      function collectEvalImportNames(statements = []) {
+        const names = [];
+        for (const stmt of statements) {
+          if (stmt.type !== "ImportDeclaration" || stmt.source !== "std/eval") {
+            continue;
+          }
+          for (const specifier of stmt.specifiers || []) {
+            const importedName = normalizeImportedName(stmt.source, specifier.imported);
+            if (importedName === "eval" && specifier.local) {
+              names.push(specifier.local);
+            }
+          }
+        }
+        return names;
+      }
       function collectDeclaredNames(statements) {
         const names = [];
         for (const stmt of statements || []) {
@@ -8741,7 +8830,7 @@ ${cleanup}
         if (node.callee.type === "Super") {
           const argArray = emitCallArgumentArray(node.arguments);
           source = `__zuzu_super_dispatch( __zuzu_super_static__, self, __zuzu_super_class__, __zuzu_super_method__, ${argArray} )`;
-        } else if (node.callee.type === "Identifier" && node.callee.name === "eval" && node.arguments.length > 0) {
+        } else if (node.callee.type === "Identifier" && (options.evalNames || /* @__PURE__ */ new Set(["eval"])).has(node.callee.name) && node.arguments.length > 0) {
           source = emitEvalCall(node.arguments);
         } else if (node.callee.type === "MemberExpression" && !node.callee.computed && node.callee.property.type === "Identifier" && node.callee.property.name === "length" && node.arguments.length === 0) {
           source = `__zuzu_length( ${emitExpression(node.callee.object)} )`;
@@ -8972,7 +9061,7 @@ ${cleanup}
             return `__zuzu_ne( ${left}, ${right} )`;
           case "!=":
           case "\u2260":
-            return `__zuzu_num_ne( ${left}, ${right} )`;
+            return `__zuzu_ne( ${left}, ${right} )`;
           case "~":
             return `__zuzu_match( ${left}, ${right} )`;
           case "_":
@@ -9150,12 +9239,8 @@ ${cleanup}
       function emitSliceExpression(node) {
         const object = emitExpression(node.object);
         const start = node.start ? emitExpression(node.start) : "0";
-        if (node.length == null) {
-          return `${object}.slice( ${start} )`;
-        }
-        const length = emitExpression(node.length);
-        const end = isNegativeNumericLiteral(node.length) ? length : `__zuzu_add( ${start}, ${length} )`;
-        return `${object}.slice( ${start}, ${end} )`;
+        const length = node.length == null ? "null" : emitExpression(node.length);
+        return `__zuzu_get_slice( ${object}, ${start}, ${length} )`;
       }
       function unwrapGroupedExpression(node) {
         let current = node;
@@ -9164,9 +9249,6 @@ ${cleanup}
         }
         return current;
       }
-      function isNegativeNumericLiteral(node) {
-        return !!(node && node.type === "UnaryExpression" && node.operator === "-" && node.argument && node.argument.type === "NumericLiteral");
-      }
       function emitRegexReplaceExpression(node) {
         const leftTarget = unwrapGroupedExpression(node.left);
         if (leftTarget && leftTarget.type === "BinaryExpression" && ["@", "@@", "@?"].includes(leftTarget.operator)) {
@@ -10973,6 +11055,14 @@ ${cleanup}
         slurp_utf8_async() {
           return new Task(async () => fs.promises.readFile(this.value, "utf8"));
         }
+        append(value) {
+          traceBlockingOperation("std/io Path.append");
+          if (!(value && value.bytes instanceof Uint8Array)) {
+            throw new Error(`TypeException: Path.append expects BinaryString, got ${typeName2(value)}`);
+          }
+          fs.appendFileSync(this.value, Buffer.from(value.bytes));
+          return this;
+        }
         append_async(value) {
           return new Task(async () => {
             if (!(value && value.bytes instanceof Uint8Array)) {
@@ -10982,6 +11072,14 @@ ${cleanup}
             return this;
           });
         }
+        append_utf8(text) {
+          traceBlockingOperation("std/io Path.append_utf8");
+          if (typeof text !== "string") {
+            throw new Error(`TypeException: Path.append_utf8 expects String, got ${typeName2(text)}`);
+          }
+          fs.appendFileSync(this.value, text, "utf8");
+          return this;
+        }
         append_utf8_async(text) {
           return new Task(async () => {
             if (typeof text !== "string") {
@@ -12492,10 +12590,11 @@ ${cleanup}
         if (typeof target === "string" || Array.isArray(target)) {
           let resolved = Number(index);
           if (Number.isFinite(resolved)) {
+            const indexed = typeof target === "string" ? [...target] : target;
             if (resolved < 0) {
-              resolved = target.length + resolved;
+              resolved = indexed.length + resolved;
             }
-            return resolveWeakValue(target[resolved]);
+            return resolveWeakValue(indexed[resolved] ?? null);
           }
         }
         if (target && typeof target === "object" && target.constructor && typeof target.constructor.__zuzu_class_name === "string" && !Object.prototype.hasOwnProperty.call(target, key) && typeof target[key] === "function") {
@@ -12503,22 +12602,58 @@ ${cleanup}
         }
         return resolveWeakValue(target[index]);
       }
+      function zuzuSliceBounds(size, from, length) {
+        let start = Number(from ?? 0);
+        if (!Number.isFinite(start)) {
+          start = 0;
+        }
+        if (start < 0) {
+          start = size + start;
+        }
+        start = Math.max(0, Math.min(size, start));
+        if (length == null) {
+          return [start, size];
+        }
+        const span = Number(length);
+        if (!Number.isFinite(span)) {
+          return [start, start];
+        }
+        const end = span < 0 ? Math.max(0, Math.min(size, size + span)) : Math.max(0, Math.min(size, start + span));
+        return [Math.min(start, end), Math.max(start, end)];
+      }
+      function zuzuGetSlice(target, from, length) {
+        target = resolveWeakValue(target);
+        if (target == null) {
+          return null;
+        }
+        if (typeof target === "string") {
+          const chars = [...target];
+          const [start, end] = zuzuSliceBounds(chars.length, from, length);
+          return chars.slice(start, end).join("");
+        }
+        if (target instanceof ZuzuBinary) {
+          const [start, end] = zuzuSliceBounds(target.length, from, length);
+          return target.slice(start, end);
+        }
+        if (Array.isArray(target)) {
+          const [start, end] = zuzuSliceBounds(target.length, from, length);
+          return target.slice(start, end);
+        }
+        return target.slice(from, length == null ? void 0 : Number(from) + Number(length));
+      }
       function zuzuAssignSlice(target, from, length, value) {
         const hasLength = length != null;
-        const span = hasLength ? Number(length) : null;
         const replacement = value == null ? "" : value;
         if (typeof target === "string") {
-          let start2 = Number(from);
-          if (start2 < 0) {
-            start2 = target.length + start2;
-          }
-          start2 = Math.max(0, Math.min(target.length, start2));
-          const end = hasLength ? Math.max(0, Math.min(target.length, span >= 0 ? start2 + span : target.length + span)) : target.length;
-          return target.slice(0, start2) + String(replacement) + target.slice(end);
+          const chars = [...target];
+          const [start2, end] = zuzuSliceBounds(chars.length, from, length);
+          chars.splice(start2, end - start2, ...[...String(replacement)]);
+          return chars.join("");
         }
         const start = Number(from);
         if (Array.isArray(target)) {
           const items = Array.isArray(replacement) ? replacement : [replacement];
+          const span = hasLength ? Number(length) : null;
           if (hasLength) {
             target.splice(start, span, ...items);
           } else {
@@ -12527,7 +12662,16 @@ ${cleanup}
           return target;
         }
         if (target instanceof ZuzuBinary) {
-          throw new Error("Exception: BinaryString slice assignment is not supported");
+          if (!(value instanceof ZuzuBinary)) {
+            throw new Error(`TypeException: BinaryString slice assignment expects BinaryString, got ${zuzuTypeof(value)}`);
+          }
+          const [byteStart, byteEnd] = zuzuSliceBounds(target.length, from, length);
+          const next = new Uint8Array(target.length - (byteEnd - byteStart) + value.bytes.length);
+          next.set(target.bytes.slice(0, byteStart), 0);
+          next.set(value.bytes, byteStart);
+          next.set(target.bytes.slice(byteEnd), byteStart + value.bytes.length);
+          target.bytes = next;
+          return target;
         }
         throw new Error(`TypeException: slice assignment expects String or Array, got ${zuzuTypeof(target)}`);
       }
@@ -12547,18 +12691,27 @@ ${cleanup}
           throw new Error("TypeException: cannot assign to null");
         }
         if (target instanceof ZuzuBinary) {
-          throw new Error("Exception: BinaryString index assignment is not supported");
+          if (!(value instanceof ZuzuBinary)) {
+            throw new Error(`TypeException: BinaryString index assignment expects BinaryString, got ${zuzuTypeof(value)}`);
+          }
+          zuzuAssignSlice(target, index, 1, value);
+          if (typeof assignTarget === "function") {
+            assignTarget(target);
+          }
+          return target;
         }
         if (typeof target === "string") {
           let resolved = Number(index);
           if (!Number.isFinite(resolved)) {
             throw new Error("TypeException: String index assignment expects numeric index");
           }
+          const chars = [...target];
           if (resolved < 0) {
-            resolved = target.length + resolved;
+            resolved = chars.length + resolved;
           }
-          resolved = Math.max(0, Math.min(target.length, resolved));
-          const updated = target.slice(0, resolved) + String(value ?? "") + target.slice(resolved + 1);
+          resolved = Math.max(0, Math.min(chars.length, resolved));
+          chars.splice(resolved, resolved < chars.length ? 1 : 0, ...[...String(value ?? "")]);
+          const updated = chars.join("");
           return typeof assignTarget === "function" ? assignTarget(updated) : updated;
         }
         if (isPairListLike(target)) {
@@ -12578,14 +12731,10 @@ ${cleanup}
           const hasLength = length != null;
           const span = hasLength ? Number(length) : null;
           if (arguments.length === 0) {
-            const end = hasLength ? span >= 0 ? start + span : span : void 0;
-            if (target instanceof ZuzuBinary) {
-              return target.slice(start, end);
-            }
-            return target.slice(start, end);
+            return zuzuGetSlice(target, start, hasLength ? span : null);
           }
-          if (target instanceof ZuzuBinary) {
-            throw new Error("Exception: BinaryString slice assignment is not supported");
+          if (target instanceof ZuzuBinary || typeof target === "string") {
+            return zuzuAssignSlice(target, start, hasLength ? span : null, maybeValue);
           }
           if (!hasLength) {
             target.splice(start, target.length - start, ...maybeValue);
@@ -12714,6 +12863,13 @@ ${cleanup}
           if (typeName2 === "PairList") {
             return isPairListLike(value) ? 1 : 0;
           }
+          if (typeName2 === "Exception") {
+            const globalType2 = globalThis.Exception;
+            if (globalType2 != null && zuzuInstanceof(value, globalType2)) {
+              return 1;
+            }
+            return value instanceof Error ? 1 : 0;
+          }
           return zuzuTypeof(value) === typeName2 ? 1 : 0;
         }
         if (typeName2 === "BinaryString") {
@@ -13948,6 +14104,9 @@ ${cleanup}
             __zuzu_ref_key(target, key) {
               return refKey(target, key);
             },
+            __zuzu_get_slice(target, from, length) {
+              return zuzuGetSlice(target, from, length);
+            },
             __zuzu_ref_slice(target, from, length) {
               return refSlice(target, from, length);
             },
@@ -39328,9 +39487,9 @@ ${lines.join("\n")}
     }
   });
 
-  // ../../../../../tmp/zuzu-browser-build.yNRBlw/browser-stdlib.generated.js
+  // ../../../../../tmp/zuzu-browser-build.WePoiO/browser-stdlib.generated.js
   var require_browser_stdlib_generated = __commonJS({
-    "../../../../../tmp/zuzu-browser-build.yNRBlw/browser-stdlib.generated.js"(exports2, module2) {
+    "../../../../../tmp/zuzu-browser-build.WePoiO/browser-stdlib.generated.js"(exports2, module2) {
       "use strict";
       function createBrowserStdlib2() {
         const jsModules = /* @__PURE__ */ Object.create(null);
@@ -45188,9 +45347,10 @@ class ZZTemplate extends ZTemplate {
 	}
 }
 `;
+        virtualFiles["/modules/test/more.zzm"] = '=encoding utf8\n\n=head1 NAME\n\ntest/more - Write unit tests and integration tests in ZuzuScript.\n\n=head1 SYNOPSIS\n\n  from test/more import *;\n  from my/project import frobnicate;\n\n  is(frobnicate(21), 42, "frobinated 21 correctly");\n  is(frobnicate(null), null, "frobinate on null input");\n\n  done_testing();\n\n=cut\n\n\nlet Number _COUNT := 0;\nlet Number _PASSED := 0;\nlet Number _FAILED := 0;\nlet Number _LEVEL := 0;\nlet Number _PLAN := -1;\nlet Number _TODO_FAILED := 0;\nlet Number _TODO_PASSED := 0;\n\nlet TODO;\n\nfunction _directive () {\n	if ( TODO ) {\n		if ( TODO instanceof String ) {\n			return ` # TODO ${TODO}`;\n		}\n		else {\n			return " # TODO";\n		}\n	}\n	return "";\n}\n\nfunction _indent () {\n	let i := _LEVEL;\n	let str := "";\n	while ( i > 0 ) {\n		str _= "    ";\n		i--;\n	}\n\n	return str;\n}\n\nclass BailOutException extends Exception;\nclass SkipAllException extends Exception;\n\nfunction _module_name_is_valid ( String module ) {\n	return module ~ /^[A-Za-z_][A-Za-z0-9_]*(\\/[A-Za-z_][A-Za-z0-9_]*)*$/;\n}\n\nfunction _module_is_available ( String module ) {\n	from std/eval import eval;\n\n	try {\n		eval( `do { from ${module} import *; }; true;` );\n		return true;\n	}\n	catch {\n		return false;\n	}\n}\n\nfunction _capability_is_available ( String capability ) {\n	if ( not( capability ~ /^[A-Za-z_][A-Za-z0-9_]*$/ ) ) {\n		die `Invalid capability name: ${capability}`;\n	}\n\n	let deny_key := `deny_${capability}`;\n	if ( deny_key in __system__ ) {\n		return not __system__.get(deny_key);\n	}\n\n	return false;\n}\n\n=head1 IMPLEMENTATION SUPPORT\n\nThis module is supported by all implementations of ZuzuScript.\n\n=head1 DESCRIPTION\n\nC<< test/more >> is a module for test-driven development. It can be used\nfor writing unit tests and integration tests. It generates output in TAP\nL<https://testanything.org/>.\n\nThis module should feel familiar to anybody who has used C<< Test::More >>\nfor Perl, though there are some minor differences.\n\n=head2 Functions\n\n=over\n\n=item C<< pass(String name?) >>\n\nIndicates the named test has passed.\n\n=cut\n\nfunction pass ( String name? ) {\n	++_PASSED;\n	++_COUNT;\n	++_TODO_PASSED if TODO;\n	if ( name \u2261 null ) {\n		say `${_indent()}ok ${_COUNT}${_directive()}`;\n	}\n	else {\n		say `${_indent()}ok ${_COUNT} - ${name}${_directive()}`;\n	}\n\n	return true;\n}\n\n=item C<< fail(String name?) >>\n\nIndicates the named test has failed.\n\n=cut\n\nfunction fail ( String name ) {\n	++_FAILED;\n	++_COUNT;\n	++_TODO_FAILED if TODO;\n	if ( name \u2261 null ) {\n		say `${_indent()}not ok ${_COUNT}${_directive()}`;\n	}\n	else {\n		say `${_indent()}not ok ${_COUNT} - ${name}${_directive()}`;\n	}\n\n	return false;\n}\n\n=item C<< ok(expr, String name?) >>\n\nPasses the named test only if C<expr> is truthy.\n\n=cut\n\nfunction ok ( expr, String name? ) {\n	if (expr) {\n		return pass(name);\n	}\n	else {\n		return fail(name);\n	}\n}\n\nfunction _coerced_equal ( got, expected ) {\n	if ( got \u2261 expected ) {\n		return true;\n	}\n\n	if ( got instanceof Boolean and expected instanceof Number ) {\n		return ( got ? 1: 0 ) = expected;\n	}\n	if ( got instanceof Number and expected instanceof Boolean ) {\n		return got = ( expected ? 1: 0 );\n	}\n\n	return false;\n}\n\n=item C<< is(got, expected, String name?) >>\n\nPasses the named test only if C<< got \u2261 expected >>.\n\n=cut\n\nfunction is ( got, expected, String name? ) {\n\n	if ( not ok( _coerced_equal( got, expected ), name ) ) {\n		from std/dump import Dumper;\n		say `${_indent()}# expected: ${Dumper.dump(expected)}`;\n		say `${_indent()}# got:      ${Dumper.dump(got)}`;\n		return false;\n	}\n\n	return true;\n}\n\n=item C<< isnt(got, unexpected, String name?) >>\n\nPasses the named test only if C<< got \u2262 expected >>.\n\n=cut\n\nfunction isnt ( got, unexpected, String name? ) {\n	return ok( not _coerced_equal( got, unexpected ), name );\n}\n\n=item C<< like(got, expected_re, String name?) >>\n\nPasses the named test only if C<< got ~ expected >>.\n\n=cut\n\nfunction like ( got, Regexp expected_re, String name? ) {\n\n	if ( not ok( got ~ expected_re, name ) ) {\n		say `${_indent()}# expected (regexp): ${expected_re}`;\n		say `${_indent()}# got:               ${got}`;\n		return false;\n	}\n\n	return true;\n}\n\n=item C<< unlike(got, unexpected_re, String name?) >>\n\nFails the named test only if C<< got ~ expected >>.\n\n=cut\n\nfunction unlike ( got, Regexp unexpected_re, String name? ) {\n\n	if ( not ok( not( got ~ unexpected_re ), name ) ) {\n		say `${_indent()}# unexpected (regexp): ${unexpected_re}`;\n		say `${_indent()}# got:                 ${got}`;\n		return false;\n	}\n\n	return true;\n}\n\n=item C<< diag(diagnostic) >>\n\nOutputs the diagnostic.\n\n=cut\n\nfunction diag (diagnostic) {\n	say `${_indent()}# ${diagnostic}`;\n	return true;\n}\n\n=item C<< explain(value) >>\n\nCombines diag with Dumper.dump();\n\n=cut\n\nfunction explain (value) {\n	from std/dump import Dumper;\n	return diag( Dumper.dump(value) );\n}\n\n=item C<< bail_out(String message?) >>\n\nBail out of running further tests.\n\n=cut\n\nfunction bail_out ( String message? ) {\n	let e;\n	if ( message \u2261 null ) {\n		e := new BailOutException( message: "Bail out!" );\n	}\n	else {\n		e := new BailOutException( message: `Bail out! ${message}` );\n	}\n	throw e;\n}\n\n=item C<< skip_all(String reason) >>\n\nSkips the whole test file by emitting a TAP skip-all plan and exiting\nsuccessfully when the runtime provides C<std/proc>.\n\nThis is intended for guards at the beginning of a test script, before\nany tests have run. Browser-like hosts without C<std/proc> use a\nspecial exception fallback that the browser ztest runner treats as a\nskip.\n\n=cut\n\nfunction skip_all ( String reason ) {\n	die "Cannot skip all tests after tests have already run" if _COUNT > 0;\n	die "Cannot skip all tests in a subtest" if _LEVEL > 0;\n	_PLAN := 0;\n	say `1..${_PLAN} # SKIP: ${reason}`;\n\n	from std/proc try import Proc;\n	Proc.exit(0) if Proc \u2262 null;\n	throw new SkipAllException( message: reason );\n}\n\n=item C<< requires_module(String module) >>\n\nSkips the whole test file if the named module cannot be loaded.\n\n=cut\n\nfunction requires_module ( String module ) {\n	if ( not _module_name_is_valid(module) ) {\n		die `Invalid module name: ${module}`;\n	}\n\n	if ( not _module_is_available(module) ) {\n		skip_all( `module ${module} is unavailable` );\n	}\n\n	return true;\n}\n\n=item C<< requires_capability(String capability) >>\n\nSkips the whole test file if the named runtime capability is not\navailable.\n\n=cut\n\nfunction requires_capability ( String capability ) {\n	if ( not _capability_is_available(capability) ) {\n		skip_all( `capability ${capability} is unavailable` );\n	}\n\n	return true;\n}\n\n=item C<< author_testing() >>\n\nSkips the whole test file unless the C<AUTHOR_TESTING> environment\nvariable is set to a true value.\n\n=cut\n\nfunction author_testing () {\n	requires_capability( "proc" );\n	from std/proc try import Env;\n	if ( Env and Env.get( "AUTHOR_TESTING", false ) ) {\n		return true;\n	}\n	skip_all( "requires AUTHOR_TESTING=1" );\n}\n\n=item C<< extended_testing() >>\n\nSkips the whole test file unless the C<EXTENDED_TESTING> environment\nvariable is set to a true value.\n\n=cut\n\nfunction extended_testing () {\n	requires_capability( "proc" );\n	from std/proc try import Env;\n	if ( Env and Env.get( "EXTENDED_TESTING", false ) ) {\n		return true;\n	}\n	skip_all( "requires EXTENDED_TESTING=1" );\n}\n\n=item C<< plan(Number n) >>\n\nIndicate the number of tests you intend on running, before running any\ntests.\n\ndone_testing() can later check the number.\n\n=cut\n\nfunction plan ( Number n ) {\n	die "Must plan() before running any tests" if _COUNT > 0;\n	die "Cannot plan() in a subtest" if _LEVEL > 0;\n	die "Must plan() at least one test" if n < 1;\n	_PLAN := n;\n	say `1..${_PLAN}`;\n}\n\n=item C<< done_testing(Number n?) >>\n\nIndicates that testing is finished.\n\nYou may optionally provide the expected total number of tests, and the\nfunction will throw an exception if that doesn\'t match the number of\ntests which were actually run.\n\nWill also throw an error if you called plan() earlier and the actual\nnumber of tests run differs from your plan.\n\n=cut\n\nfunction done_testing ( Number n? ) {\n	die "Unexpected done_testing() in subtest" if _LEVEL > 0;\n	die `Expected ${n} tests, but ran ${_COUNT}` if n \u2262 null and n \u2260 _COUNT;\n\n	function maybe_fail_count ( should_die ) {\n		if ( _TODO_PASSED > 0 ) {\n			warn `Passed ${_TODO_PASSED} TODO tests!`;\n		}\n		if ( _FAILED > 0 ) {\n			let msg := `Failed ${_FAILED} tests`;\n			msg _= ` (${_TODO_FAILED} todo, ${_FAILED - _TODO_FAILED} true fails)` if _TODO_FAILED > 0;\n			die msg if should_die and ( _FAILED > _TODO_FAILED );\n			warn msg;\n		}\n	}\n\n	if ( _PLAN < 0 ) {\n		say `1..${_COUNT}`;\n	}\n	else if ( _PLAN \u2260 _COUNT ) {\n		maybe_fail_count(false);\n		die `Planned ${_PLAN} tests, but ran ${_COUNT}`;\n	}\n\n	maybe_fail_count(true);\n	return true;\n}\n\n=item C<< subtest(String name, Function f) >>\n\nCalls f() as a subtest.\n\nDon\'t use done_testing() within the function.\n\n=cut\n\nfunction subtest ( String name, Function f ) {\n	let orig_context := {\n		count: _COUNT,\n		passed: _PASSED,\n		failed: _FAILED,\n		level: _LEVEL,\n		todo_passed: _TODO_PASSED,\n		todo_failed: _TODO_FAILED,\n	};\n\n	function restore_context () {\n		_COUNT := orig_context{count};\n		_PASSED := orig_context{passed};\n		_FAILED := orig_context{failed};\n		_LEVEL := orig_context{level};\n		_TODO_PASSED := orig_context{todo_passed};\n		_TODO_FAILED := orig_context{todo_failed};\n	}\n\n	_COUNT := 0;\n	_PASSED := 0;\n	_FAILED := 0;\n	_TODO_PASSED := 0;\n	_TODO_FAILED := 0;\n	_LEVEL++;\n	let is_ok := true;\n\n	try {\n		diag( `Subtest: ${name}` );\n		f();\n		say `${_indent()}1..${_COUNT}`;\n		is_ok := false if _FAILED > _TODO_FAILED;\n		restore_context();\n	}\n	catch ( BailOutException e ) {\n		throw e;\n	}\n	catch ( Exception e ) {\n		is_ok := false;\n		restore_context();\n	}\n\n	return ok( is_ok, name );\n}\n\n=back\n\n=item C<< todo(Boolean c, String reason, Function f) >>\n\nRuns the tests in the given function, but if condition c is true then\nfirst sets TODO to true.\n\nYou can manually set and unset the TODO variable instead.\n\n=cut\n\nfunction todo ( Boolean c, String reason, Function f ) {\n	let orig := TODO;\n	TODO := reason if c;\n	try {\n		f();\n	}\n	catch {\n	}\n	TODO := orig;\n	return not c;\n}\n\n=back\n\n=item C<< exception(Function f) >>\n\nCalls f() and returns any exception thrown.\n\nReturns null if no exception was thrown.\n\n=cut\n\nfunction exception ( Function f ) {\n	try {\n		f();\n		return null;\n	}\n	catch ( BailOutException e ) {\n		throw e;\n	}\n	catch ( Exception e ) {\n		return e;\n	}\n}\n\n=back\n\n=head1 COPYRIGHT AND LICENCE\n\nB<< test/more >> is copyright Toby Inkster.\n\nIt is free software; you may redistribute it and/or modify it under\nthe terms of either the Artistic License 1.0 or the GNU General Public\nLicense version 2.\n\n=cut\n';
         return {
           repoRoot: "/",
-          includePaths: [],
+          includePaths: ["/__zuzu_browser_modules__/0"],
           jsModules,
           virtualFiles
         };
@@ -45566,7 +45726,7 @@ class ZZTemplate extends ZTemplate {
     }
   });
 
-  // ../../../../../tmp/zuzu-browser-build.yNRBlw/browser-worker-entry.generated.js
+  // ../../../../../tmp/zuzu-browser-build.WePoiO/browser-worker-entry.generated.js
   var { createBrowserStdlib } = require_browser_stdlib_generated();
   globalThis.__ZUZU_BROWSER_DEFAULT_RUNTIME_OPTIONS__ = createBrowserStdlib();
   var { installBrowserWorker } = require_browser_worker_entry();