zuzu-js 0.2.0 → 0.4.0

package/dist/zuzu-browser-worker.js

@@ -206,279 +206,6 @@
     }
   });
 
-  // modules/std/string.js
-  var require_string = __commonJS({
-    "modules/std/string.js"(exports2, module2) {
-      "use strict";
-      function toStringValue(value) {
-        if (value instanceof RegExp) {
-          return value.source;
-        }
-        if (value && typeof value.to_String === "function") {
-          return String(value.to_String());
-        }
-        if (value instanceof Error) {
-          return value.message || value.name || String(value);
-        }
-        return value == null ? "" : String(value);
-      }
-      function isRegexLike(value) {
-        if (value == null) {
-          return false;
-        }
-        if (value instanceof RegExp) {
-          return true;
-        }
-        return Object.prototype.toString.call(value) === "[object RegExp]";
-      }
-      function index(text, needle, start = 0) {
-        const haystack = [...toStringValue(text)];
-        const find = [...toStringValue(needle)];
-        const offset = Math.max(0, Math.trunc(Number(start ?? 0)));
-        if (find.length === 0) {
-          return Math.min(offset, haystack.length);
-        }
-        for (let i = offset; i <= haystack.length - find.length; i++) {
-          let matched = true;
-          for (let j = 0; j < find.length; j++) {
-            if (haystack[i + j] !== find[j]) {
-              matched = false;
-              break;
-            }
-          }
-          if (matched) {
-            return i;
-          }
-        }
-        return -1;
-      }
-      function rindex(text, needle, start = null) {
-        const haystack = [...toStringValue(text)];
-        const find = [...toStringValue(needle)];
-        if (start == null) {
-          start = haystack.length - find.length;
-        } else {
-          start = Math.trunc(Number(start));
-        }
-        if (find.length === 0) {
-          return Math.min(Math.max(0, start), haystack.length);
-        }
-        start = Math.min(Math.max(0, start), haystack.length - find.length);
-        for (let i = start; i >= 0; i--) {
-          let matched = true;
-          for (let j = 0; j < find.length; j++) {
-            if (haystack[i + j] !== find[j]) {
-              matched = false;
-              break;
-            }
-          }
-          if (matched) {
-            return i;
-          }
-        }
-        return -1;
-      }
-      function contains(text, needle) {
-        return index(text, needle) >= 0;
-      }
-      function integerValue(value, label) {
-        const number = Number(value ?? 0);
-        if (!Number.isInteger(number)) {
-          throw new Error(`${label} expects an integer`);
-        }
-        return number;
-      }
-      function chr(codepoint) {
-        if (arguments.length !== 1) {
-          throw new Error("chr() expects one argument");
-        }
-        const value = integerValue(codepoint, "chr()");
-        if (value < 0 || value > 1114111) {
-          throw new Error("chr() expects a Unicode code point in 0..0x10FFFF");
-        }
-        if (value >= 55296 && value <= 57343) {
-          throw new Error("chr() rejects surrogate code points");
-        }
-        return String.fromCodePoint(value);
-      }
-      function ord(text, index2 = 0) {
-        if (arguments.length < 1 || arguments.length > 2) {
-          throw new Error("ord() expects one or two arguments");
-        }
-        const chars = [...toStringValue(text)];
-        const offset = integerValue(index2, "ord()");
-        if (offset < 0 || offset >= chars.length) {
-          throw new Error("ord() index out of range");
-        }
-        return chars[offset].codePointAt(0);
-      }
-      function substr(text, offset, length = null) {
-        const chars = [...toStringValue(text)];
-        const from = Number(offset ?? 0);
-        if (length == null) {
-          return chars.slice(from).join("");
-        }
-        return chars.slice(from, from + Number(length)).join("");
-      }
-      function pattern_to_regexp(pattern, caseInsensitive = false) {
-        return new RegExp(String(pattern ?? ""), caseInsensitive ? "i" : "");
-      }
-      var REGEXP_META_CHARS = /* @__PURE__ */ new Set([
-        "\\",
-        "/",
-        "^",
-        "$",
-        ".",
-        "|",
-        "?",
-        "*",
-        "+",
-        "(",
-        ")",
-        "[",
-        "]",
-        "{",
-        "}",
-        '"',
-        "'"
-      ]);
-      function quotemeta(text) {
-        return [...toStringValue(text)].map((ch) => REGEXP_META_CHARS.has(ch) ? `\\${ch}` : ch).join("");
-      }
-      function normalizePattern(pattern, flags = "") {
-        if (isRegexLike(pattern)) {
-          const mergedFlags = [...pattern.flags || "", ...flags || ""];
-          const uniqFlags = [...new Set(mergedFlags)].join("");
-          return new RegExp(pattern.source, uniqFlags);
-        }
-        return new RegExp(String(pattern ?? ""), flags);
-      }
-      function search(text, pattern, flags = "") {
-        const match = toStringValue(text).match(normalizePattern(pattern, flags));
-        return match ? match[0] : null;
-      }
-      function matches(text, pattern, flags = "") {
-        return normalizePattern(pattern, flags).test(toStringValue(text));
-      }
-      function replace(text, pattern, replacement, flags = "") {
-        return toStringValue(text).replace(normalizePattern(pattern, flags), toStringValue(replacement));
-      }
-      function sprint(format, ...args) {
-        let idx = 0;
-        return toStringValue(format).replace(/%([0-9]+)?(?:\.([0-9]+))?([sdfc])/gu, (_token, width, precision, kind) => {
-          const value = args[idx++];
-          let out = "";
-          if (kind === "d") {
-            out = String(Math.trunc(Number(value ?? 0)));
-          } else if (kind === "f") {
-            const num = Number(value ?? 0);
-            out = precision != null ? num.toFixed(Number(precision)) : String(num);
-          } else if (kind === "c") {
-            out = String.fromCharCode(Number(value ?? 0));
-          } else {
-            out = toStringValue(value);
-          }
-          if (width != null) {
-            const target = Number(width);
-            if (out.length < target) {
-              out = `${" ".repeat(target - out.length)}${out}`;
-            }
-          }
-          return out;
-        });
-      }
-      function join(separator, values) {
-        const sep = toStringValue(separator);
-        if (Array.isArray(values)) {
-          return values.map((value) => toStringValue(value)).join(sep);
-        }
-        if (values == null) {
-          return "";
-        }
-        if (typeof values.to_Iterator === "function") {
-          const out = [];
-          for (const value of values.to_Iterator()) {
-            out.push(toStringValue(value));
-          }
-          return out.join(sep);
-        }
-        if (typeof values.to_Array === "function") {
-          return join(sep, values.to_Array());
-        }
-        if (typeof values[Symbol.iterator] === "function") {
-          return Array.from(values, (value) => toStringValue(value)).join(sep);
-        }
-        return toStringValue(values);
-      }
-      function split(text, pattern) {
-        return toStringValue(text).split(pattern);
-      }
-      function starts_with(text, prefix) {
-        return toStringValue(text).startsWith(toStringValue(prefix));
-      }
-      function ends_with(text, suffix) {
-        return toStringValue(text).endsWith(toStringValue(suffix));
-      }
-      function trim(text) {
-        return toStringValue(text).trim();
-      }
-      function pad(text, width, ch = " ", side = "right") {
-        const src = toStringValue(text);
-        const padChar = toStringValue(ch || " ");
-        const target = Number(width ?? 0);
-        if (src.length >= target) {
-          return src;
-        }
-        const fill = padChar.repeat(target - src.length);
-        return side === "left" ? `${fill}${src}` : `${src}${fill}`;
-      }
-      function chomp(text) {
-        return toStringValue(text).replace(/\r?\n$/u, "");
-      }
-      function words(text) {
-        return toStringValue(text).replace(/([a-z0-9])([A-Z])/gu, "$1 $2").replace(/[_\-]+/gu, " ").trim().split(/\s+/u).filter(Boolean);
-      }
-      function title(text) {
-        return words(text).map((w) => `${w[0].toUpperCase()}${w.slice(1).toLowerCase()}`).join(" ");
-      }
-      function snake(text) {
-        return words(text).map((w) => w.toLowerCase()).join("_");
-      }
-      function kebab(text) {
-        return words(text).map((w) => w.toLowerCase()).join("-");
-      }
-      function camel(text) {
-        const ws = words(text).map((w) => w.toLowerCase());
-        return ws.map((w, i) => i === 0 ? w : `${w[0].toUpperCase()}${w.slice(1)}`).join("");
-      }
-      module2.exports = {
-        camel,
-        chomp,
-        chr,
-        contains,
-        ends_with,
-        index,
-        join,
-        kebab,
-        matches,
-        ord,
-        pad,
-        pattern_to_regexp,
-        quotemeta,
-        rindex,
-        replace,
-        search,
-        snake,
-        split,
-        starts_with,
-        sprint,
-        substr,
-        title,
-        trim
-      };
-    }
-  });
-
   // lib/collections.js
   var require_collections = __commonJS({
     "lib/collections.js"(exports2, module2) {
@@ -501,6 +228,9 @@
       function makeSet(values) {
         return runtimeHelpers().makeSet(values);
       }
+      function stringSortComparator(a, b) {
+        return runtimeHelpers().stringSortComparator(a, b);
+      }
       var ZuzuBag = class _ZuzuBag {
         constructor(...items) {
           let values;
@@ -620,7 +350,7 @@
           return this.to_Array().sort(fn2);
         }
         sortstr() {
-          return this.to_Array().sort((a, b) => String(a).localeCompare(String(b)));
+          return this.to_Array().sort(stringSortComparator);
         }
         sortnum() {
           return this.to_Array().map((item) => Number(item)).sort((a, b) => a - b);
@@ -911,7 +641,7 @@
           return this;
         });
         define("sortstr", function _sortstr() {
-          return this.slice().sort((a, b) => String(a).localeCompare(String(b)));
+          return this.slice().sort(stringSortComparator);
         });
         define(
           "sortnum",
@@ -1758,6 +1488,32 @@
         }
         throw new Error(`TypeException: cannot coerce ${typeName2(value)} to String`);
       }
+      var surrogatePattern = /[\uD800-\uDFFF]/;
+      function codePointStringCompare(left, right) {
+        if (left === right) {
+          return 0;
+        }
+        if (surrogatePattern.test(left) || surrogatePattern.test(right)) {
+          const leftPoints = Array.from(left);
+          const rightPoints = Array.from(right);
+          const shared = Math.min(leftPoints.length, rightPoints.length);
+          for (let i = 0; i < shared; i++) {
+            const a = leftPoints[i].codePointAt(0);
+            const b = rightPoints[i].codePointAt(0);
+            if (a !== b) {
+              return a < b ? -1 : 1;
+            }
+          }
+          if (leftPoints.length === rightPoints.length) {
+            return 0;
+          }
+          return leftPoints.length < rightPoints.length ? -1 : 1;
+        }
+        return left < right ? -1 : 1;
+      }
+      function stringSortComparator(a, b) {
+        return codePointStringCompare(String(a), String(b));
+      }
       function operatorRegexp(value) {
         value = resolveWeakValue(value);
         if (value instanceof RegExp || Object.prototype.toString.call(value) === "[object RegExp]") {
@@ -1786,6 +1542,8 @@
         lengthOf,
         operatorString,
         operatorRegexp,
+        codePointStringCompare,
+        stringSortComparator,
         ZuzuBinary,
         BinaryString: BinaryString2,
         ZuzuWeakCell,
@@ -1810,6 +1568,295 @@
     }
   });
 
+  // modules/std/string.js
+  var require_string = __commonJS({
+    "modules/std/string.js"(exports2, module2) {
+      "use strict";
+      var { BinaryString: BinaryString2 } = require_runtime_helpers();
+      function toStringValue(value) {
+        if (value instanceof RegExp) {
+          return value.source;
+        }
+        if (value && typeof value.to_String === "function") {
+          return String(value.to_String());
+        }
+        if (value instanceof Error) {
+          return value.message || value.name || String(value);
+        }
+        return value == null ? "" : String(value);
+      }
+      function isRegexLike(value) {
+        if (value == null) {
+          return false;
+        }
+        if (value instanceof RegExp) {
+          return true;
+        }
+        return Object.prototype.toString.call(value) === "[object RegExp]";
+      }
+      function index(text, needle, start = 0) {
+        const haystack = [...toStringValue(text)];
+        const find = [...toStringValue(needle)];
+        const offset = Math.max(0, Math.trunc(Number(start ?? 0)));
+        if (find.length === 0) {
+          return Math.min(offset, haystack.length);
+        }
+        for (let i = offset; i <= haystack.length - find.length; i++) {
+          let matched = true;
+          for (let j = 0; j < find.length; j++) {
+            if (haystack[i + j] !== find[j]) {
+              matched = false;
+              break;
+            }
+          }
+          if (matched) {
+            return i;
+          }
+        }
+        return -1;
+      }
+      function rindex(text, needle, start = null) {
+        const haystack = [...toStringValue(text)];
+        const find = [...toStringValue(needle)];
+        if (start == null) {
+          start = haystack.length - find.length;
+        } else {
+          start = Math.trunc(Number(start));
+        }
+        if (find.length === 0) {
+          return Math.min(Math.max(0, start), haystack.length);
+        }
+        start = Math.min(Math.max(0, start), haystack.length - find.length);
+        for (let i = start; i >= 0; i--) {
+          let matched = true;
+          for (let j = 0; j < find.length; j++) {
+            if (haystack[i + j] !== find[j]) {
+              matched = false;
+              break;
+            }
+          }
+          if (matched) {
+            return i;
+          }
+        }
+        return -1;
+      }
+      function contains(text, needle) {
+        return index(text, needle) >= 0;
+      }
+      function integerValue(value, label) {
+        const number = Number(value ?? 0);
+        if (!Number.isInteger(number)) {
+          throw new Error(`${label} expects an integer`);
+        }
+        return number;
+      }
+      function chr(codepoint) {
+        if (arguments.length !== 1) {
+          throw new Error("chr() expects one argument");
+        }
+        const value = integerValue(codepoint, "chr()");
+        if (value < 0 || value > 1114111) {
+          throw new Error("chr() expects a Unicode code point in 0..0x10FFFF");
+        }
+        if (value >= 55296 && value <= 57343) {
+          throw new Error("chr() rejects surrogate code points");
+        }
+        return String.fromCodePoint(value);
+      }
+      function ord(text, index2 = 0) {
+        if (arguments.length < 1 || arguments.length > 2) {
+          throw new Error("ord() expects one or two arguments");
+        }
+        const chars = [...toStringValue(text)];
+        const offset = integerValue(index2, "ord()");
+        if (offset < 0 || offset >= chars.length) {
+          throw new Error("ord() index out of range");
+        }
+        return chars[offset].codePointAt(0);
+      }
+      function substr(text, offset, length = null) {
+        const chars = [...toStringValue(text)];
+        const from = Number(offset ?? 0);
+        if (length == null) {
+          return chars.slice(from).join("");
+        }
+        return chars.slice(from, from + Number(length)).join("");
+      }
+      function pattern_to_regexp(pattern, caseInsensitive = false) {
+        return new RegExp(String(pattern ?? ""), caseInsensitive ? "i" : "");
+      }
+      var REGEXP_META_CHARS = /* @__PURE__ */ new Set([
+        "\\",
+        "/",
+        "^",
+        "$",
+        ".",
+        "|",
+        "?",
+        "*",
+        "+",
+        "(",
+        ")",
+        "[",
+        "]",
+        "{",
+        "}",
+        '"',
+        "'"
+      ]);
+      function quotemeta(text) {
+        return [...toStringValue(text)].map((ch) => REGEXP_META_CHARS.has(ch) ? `\\${ch}` : ch).join("");
+      }
+      function normalizePattern(pattern, flags = "") {
+        if (isRegexLike(pattern)) {
+          const mergedFlags = [...pattern.flags || "", ...flags || ""];
+          const uniqFlags = [...new Set(mergedFlags)].join("");
+          return new RegExp(pattern.source, uniqFlags);
+        }
+        return new RegExp(String(pattern ?? ""), flags);
+      }
+      function search(text, pattern, flags = "") {
+        const match = toStringValue(text).match(normalizePattern(pattern, flags));
+        return match ? match[0] : null;
+      }
+      function matches(text, pattern, flags = "") {
+        return normalizePattern(pattern, flags).test(toStringValue(text));
+      }
+      function replace(text, pattern, replacement, flags = "") {
+        return toStringValue(text).replace(normalizePattern(pattern, flags), toStringValue(replacement));
+      }
+      function sprint(format, ...args) {
+        let idx = 0;
+        return toStringValue(format).replace(/%([0-9]+)?(?:\.([0-9]+))?([sdfc])/gu, (_token, width, precision, kind) => {
+          const value = args[idx++];
+          let out = "";
+          if (kind === "d") {
+            out = String(Math.trunc(Number(value ?? 0)));
+          } else if (kind === "f") {
+            const num = Number(value ?? 0);
+            out = precision != null ? num.toFixed(Number(precision)) : String(num);
+          } else if (kind === "c") {
+            out = String.fromCharCode(Number(value ?? 0));
+          } else {
+            out = toStringValue(value);
+          }
+          if (width != null) {
+            const target = Number(width);
+            if (out.length < target) {
+              out = `${" ".repeat(target - out.length)}${out}`;
+            }
+          }
+          return out;
+        });
+      }
+      function join(separator, values) {
+        const sep = toStringValue(separator);
+        if (Array.isArray(values)) {
+          return values.map((value) => toStringValue(value)).join(sep);
+        }
+        if (values == null) {
+          return "";
+        }
+        if (typeof values.to_Iterator === "function") {
+          const out = [];
+          for (const value of values.to_Iterator()) {
+            out.push(toStringValue(value));
+          }
+          return out.join(sep);
+        }
+        if (typeof values.to_Array === "function") {
+          return join(sep, values.to_Array());
+        }
+        if (typeof values[Symbol.iterator] === "function") {
+          return Array.from(values, (value) => toStringValue(value)).join(sep);
+        }
+        return toStringValue(values);
+      }
+      function split(text, pattern) {
+        return toStringValue(text).split(pattern);
+      }
+      function starts_with(text, prefix) {
+        return toStringValue(text).startsWith(toStringValue(prefix));
+      }
+      function ends_with(text, suffix) {
+        return toStringValue(text).endsWith(toStringValue(suffix));
+      }
+      function trim(text) {
+        return toStringValue(text).trim();
+      }
+      function pad(text, width, ch = " ", side = "right") {
+        const src = toStringValue(text);
+        const padChar = toStringValue(ch || " ");
+        const target = Number(width ?? 0);
+        if (src.length >= target) {
+          return src;
+        }
+        const fill = padChar.repeat(target - src.length);
+        return side === "left" ? `${fill}${src}` : `${src}${fill}`;
+      }
+      function chomp(text) {
+        return toStringValue(text).replace(/\r?\n$/u, "");
+      }
+      function words(text) {
+        return toStringValue(text).replace(/([a-z0-9])([A-Z])/gu, "$1 $2").replace(/[_\-]+/gu, " ").trim().split(/\s+/u).filter(Boolean);
+      }
+      function title(text) {
+        return words(text).map((w) => `${w[0].toUpperCase()}${w.slice(1).toLowerCase()}`).join(" ");
+      }
+      function snake(text) {
+        return words(text).map((w) => w.toLowerCase()).join("_");
+      }
+      function kebab(text) {
+        return words(text).map((w) => w.toLowerCase()).join("-");
+      }
+      function camel(text) {
+        const ws = words(text).map((w) => w.toLowerCase());
+        return ws.map((w, i) => i === 0 ? w : `${w[0].toUpperCase()}${w.slice(1)}`).join("");
+      }
+      function to_binary(value) {
+        if (typeof value !== "string" && !(value instanceof String)) {
+          const type = value == null ? "Null" : value && value.bytes instanceof Uint8Array ? "BinaryString" : typeof value;
+          throw new Error(`TypeException: to_binary expects String, got ${type}`);
+        }
+        return new BinaryString2(new TextEncoder().encode(String(value)));
+      }
+      function to_string(value) {
+        if (!(value && value.bytes instanceof Uint8Array)) {
+          throw new Error("TypeException: to_string expects BinaryString");
+        }
+        return new TextDecoder("utf-8", { fatal: true }).decode(value.bytes);
+      }
+      module2.exports = {
+        camel,
+        chomp,
+        chr,
+        contains,
+        ends_with,
+        index,
+        join,
+        kebab,
+        matches,
+        ord,
+        pad,
+        pattern_to_regexp,
+        quotemeta,
+        rindex,
+        replace,
+        search,
+        snake,
+        split,
+        starts_with,
+        sprint,
+        substr,
+        title,
+        to_binary,
+        to_string,
+        trim
+      };
+    }
+  });
+
   // modules/std/string/base64.js
   var require_base64 = __commonJS({
     "modules/std/string/base64.js"(exports2, module2) {
@@ -1924,6 +1971,172 @@
     }
   });
 
+  // modules/std/string/encode.js
+  var require_encode = __commonJS({
+    "modules/std/string/encode.js"(exports2, module2) {
+      "use strict";
+      var { BinaryString: BinaryString2 } = require_runtime_helpers();
+      function typeName2(value) {
+        if (value == null) {
+          return "Null";
+        }
+        if (typeof value === "string" || value instanceof String) {
+          return "String";
+        }
+        if (value.bytes instanceof Uint8Array) {
+          return "BinaryString";
+        }
+        return value.constructor && value.constructor.name ? value.constructor.name : typeof value;
+      }
+      function canonicalEncoding(name2) {
+        const upper = String(name2 == null ? "UTF-8" : name2).toUpperCase().replace(/\s+/g, "");
+        if (upper === "UTF-8" || upper === "UTF8") {
+          return "utf8";
+        }
+        if (upper === "UTF-16" || upper === "UTF16" || upper === "UTF-16BE") {
+          return "utf16";
+        }
+        if (upper === "UTF-32" || upper === "UTF32" || upper === "UTF-32BE") {
+          return "utf32";
+        }
+        if (upper === "ISO-8859-1" || upper === "ISO8859-1" || upper === "LATIN-1" || upper === "LATIN1" || upper === "LATIN") {
+          return "latin1";
+        }
+        return null;
+      }
+      function codePoints(text) {
+        return Array.from(text, (ch) => ch.codePointAt(0));
+      }
+      function encode(value, encoding) {
+        if (typeName2(value) !== "String") {
+          throw new Error(`TypeException: encode expects String, got ${typeName2(value)}`);
+        }
+        const text = String(value);
+        const codec = canonicalEncoding(encoding);
+        if (codec === "utf8") {
+          return new BinaryString2(new TextEncoder().encode(text));
+        }
+        if (codec === "utf16") {
+          const out = [];
+          for (let i = 0; i < text.length; i++) {
+            const unit = text.charCodeAt(i);
+            out.push(unit >> 8 & 255, unit & 255);
+          }
+          return new BinaryString2(out);
+        }
+        if (codec === "utf32") {
+          const out = [];
+          for (const point of codePoints(text)) {
+            out.push(
+              point >>> 24 & 255,
+              point >>> 16 & 255,
+              point >>> 8 & 255,
+              point & 255
+            );
+          }
+          return new BinaryString2(out);
+        }
+        if (codec === "latin1") {
+          const out = [];
+          for (const point of codePoints(text)) {
+            if (point > 255) {
+              const hex = point.toString(16).toUpperCase().padStart(4, "0");
+              throw new Error(`Exception: Character U+${hex} cannot be encoded as ISO-8859-1`);
+            }
+            out.push(point);
+          }
+          return new BinaryString2(out);
+        }
+        throw new Error(`Exception: Unsupported encoding: ${encoding}`);
+      }
+      function decode(value, encoding) {
+        if (typeName2(value) !== "BinaryString") {
+          throw new Error(`TypeException: decode expects BinaryString, got ${typeName2(value)}`);
+        }
+        let bytes = value.bytes;
+        const codec = canonicalEncoding(encoding);
+        if (codec === "utf8") {
+          try {
+            return new TextDecoder("utf-8", { fatal: true }).decode(bytes);
+          } catch (_err) {
+            throw new Error("Exception: Invalid UTF-8 in BinaryString");
+          }
+        }
+        if (codec === "utf16") {
+          let bigEndian = true;
+          if (bytes.length >= 2 && bytes[0] === 254 && bytes[1] === 255) {
+            bytes = bytes.subarray(2);
+          } else if (bytes.length >= 2 && bytes[0] === 255 && bytes[1] === 254) {
+            bigEndian = false;
+            bytes = bytes.subarray(2);
+          }
+          if (bytes.length % 2 !== 0) {
+            throw new Error("Exception: UTF-16 input length must be a multiple of 2 bytes");
+          }
+          const units = [];
+          for (let i = 0; i < bytes.length; i += 2) {
+            units.push(bigEndian ? bytes[i] << 8 | bytes[i + 1] : bytes[i + 1] << 8 | bytes[i]);
+          }
+          let out = "";
+          for (let i = 0; i < units.length; i++) {
+            const unit = units[i];
+            if (unit >= 55296 && unit <= 56319) {
+              const next = units[i + 1];
+              if (next == null || next < 56320 || next > 57343) {
+                throw new Error("Exception: Invalid UTF-16 in BinaryString");
+              }
+              out += String.fromCharCode(unit, next);
+              i++;
+              continue;
+            }
+            if (unit >= 56320 && unit <= 57343) {
+              throw new Error("Exception: Invalid UTF-16 in BinaryString");
+            }
+            out += String.fromCharCode(unit);
+          }
+          return out;
+        }
+        if (codec === "utf32") {
+          let bigEndian = true;
+          if (bytes.length >= 4 && bytes[0] === 0 && bytes[1] === 0 && bytes[2] === 254 && bytes[3] === 255) {
+            bytes = bytes.subarray(4);
+          } else if (bytes.length >= 4 && bytes[0] === 255 && bytes[1] === 254 && bytes[2] === 0 && bytes[3] === 0) {
+            bigEndian = false;
+            bytes = bytes.subarray(4);
+          }
+          if (bytes.length % 4 !== 0) {
+            throw new Error("Exception: UTF-32 input length must be a multiple of 4 bytes");
+          }
+          let out = "";
+          for (let i = 0; i < bytes.length; i += 4) {
+            const point = bigEndian ? bytes[i] * 16777216 + (bytes[i + 1] << 16) + (bytes[i + 2] << 8) + bytes[i + 3] : bytes[i + 3] * 16777216 + (bytes[i + 2] << 16) + (bytes[i + 1] << 8) + bytes[i];
+            if (point > 1114111 || point >= 55296 && point <= 57343) {
+              throw new Error("Exception: Invalid UTF-32 in BinaryString");
+            }
+            out += String.fromCodePoint(point);
+          }
+          return out;
+        }
+        if (codec === "latin1") {
+          let out = "";
+          for (const byte of bytes) {
+            out += String.fromCharCode(byte);
+          }
+          return out;
+        }
+        throw new Error(`Exception: Unsupported encoding: ${encoding}`);
+      }
+      module2.exports = {
+        encode,
+        decode,
+        ENCODING_UTF8: "UTF-8",
+        ENCODING_UTF16: "UTF-16",
+        ENCODING_UTF32: "UTF-32",
+        ENCODING_LATIN: "ISO-8859-1"
+      };
+    }
+  });
+
   // modules/std/time.js
   var require_time = __commonJS({
     "modules/std/time.js"(exports2, module2) {
@@ -1955,6 +2168,7 @@
         ["dec", 12],
         ["december", 12]
       ]);
+      var DAY_ABBR = ["Mon", "Tue", "Wed", "Thu", "Fri", "Sat", "Sun"];
       var WEEKDAY_BY_NAME = /* @__PURE__ */ new Set([
         "sun",
         "sunday",
@@ -2009,12 +2223,59 @@
         const seconds = Number(m[2]) * 3600 + Number(m[3]) * 60;
         return m[1] === "-" ? -seconds : seconds;
       }
-      function pad(value, width = 2) {
-        return String(value).padStart(width, "0");
+      function pad(value, width = 2, fill = "0") {
+        return String(value).padStart(width, fill);
       }
       function stripTrailingPeriod(text) {
         return String(text).replace(/\.+$/u, "").toLowerCase();
       }
+      function weekdayIndex(parts) {
+        const date = new Date(
+          parts.year,
+          parts.month - 1,
+          parts.day
+        );
+        return (date.getDay() + 6) % 7 + 1;
+      }
+      function weekParts(parts) {
+        const date = new Date(
+          parts.year,
+          parts.month - 1,
+          parts.day
+        );
+        const weekDay = date.getDay() || 7;
+        const shifted = new Date(date);
+        shifted.setDate(date.getDate() + 4 - weekDay);
+        const weekYear = shifted.getFullYear();
+        const yearStart = new Date(weekYear, 0, 1);
+        return {
+          year: weekYear,
+          week: Math.ceil((shifted - yearStart) / 864e5 / 7 + 1)
+        };
+      }
+      function dayOfMonthForDisplay(day) {
+        return String(day).padStart(2, " ");
+      }
+      function dayOfYear(parts) {
+        const start = new Date(parts.year, 0, 1);
+        const now = new Date(parts.year, parts.month - 1, parts.day);
+        return (now - start) / 864e5;
+      }
+      function julianDay(parts) {
+        let year = parts.year;
+        let month = parts.month;
+        const day = parts.day;
+        if (month <= 2) {
+          year -= 1;
+          month += 12;
+        }
+        const a = Math.floor((14 - month) / 12);
+        const y = year + 4800 - a;
+        const m = month + 12 * a - 3;
+        const jd = day + Math.floor((153 * m + 2) / 5) + 365 * y + Math.floor(y / 4) - Math.floor(y / 100) + Math.floor(y / 400) - 32045;
+        const fraction = (parts.hour * 3600 + parts.minute * 60 + parts.second) / 86400;
+        return jd + fraction - 0.5;
+      }
       function isLeapYear(year) {
         if (year % 4 !== 0) return false;
         if (year % 100 !== 0) return true;
@@ -2432,6 +2693,59 @@
         year() {
           return this._parts().year;
         }
+        yy() {
+          return pad(this._parts().year % 100, 2);
+        }
+        day_of_week() {
+          return weekdayIndex(this._parts());
+        }
+        day() {
+          return DAY_ABBR[this.day_of_week() - 1];
+        }
+        day_of_year() {
+          return dayOfYear(this._parts());
+        }
+        month_last_day() {
+          return daysInMonth(this._parts().year, this._parts().month);
+        }
+        hms(separator = ":") {
+          const p = this._parts();
+          return `${pad(p.hour)}${String(separator)}${pad(p.minute)}${String(separator)}${pad(p.second)}`;
+        }
+        ymd(separator = "-") {
+          const p = this._parts();
+          const sep = String(separator);
+          return `${pad(p.year, 4)}${sep}${pad(p.month)}${sep}${pad(p.day)}`;
+        }
+        mdy(separator = "-") {
+          const p = this._parts();
+          const sep = String(separator);
+          return `${pad(p.month)}${sep}${pad(p.day)}${sep}${pad(p.year, 4)}`;
+        }
+        dmy(separator = "-") {
+          const p = this._parts();
+          const sep = String(separator);
+          return `${pad(p.day)}${sep}${pad(p.month)}${sep}${pad(p.year, 4)}`;
+        }
+        cdate() {
+          const p = this._parts();
+          return `${DAY_ABBR[weekdayIndex(p) - 1]} ${MONTHS[p.month - 1]} ${dayOfMonthForDisplay(p.day)} ${pad(p.hour)}:${pad(p.minute)}:${pad(p.second)} ${p.year}`;
+        }
+        tzoffset() {
+          return offsetForEpoch(this._epoch, this._timezone);
+        }
+        is_leap_year() {
+          return isLeapYear(this._parts().year);
+        }
+        week() {
+          return weekParts(this._parts()).week;
+        }
+        week_year() {
+          return weekParts(this._parts()).year;
+        }
+        julian_day() {
+          return julianDay(this._parts());
+        }
         add_seconds(n) {
           return this._clone(this._epoch + Number(n));
         }
@@ -2546,8 +2860,7 @@
         }
         to_rfc5322(options = {}) {
           const p = this._parts();
-          const d = new Date(Date.UTC(p.year, p.month - 1, p.day));
-          const weekday = ["Sun", "Mon", "Tue", "Wed", "Thu", "Fri", "Sat"][d.getUTCDay()];
+          const weekday = DAY_ABBR[weekdayIndex(p) - 1];
           const core = `${pad(p.day)} ${MONTHS[p.month - 1]} ${pad(p.year, 4)} ${pad(p.hour)}:${pad(p.minute)}:${pad(p.second)} ${formatOffset(offsetForEpoch(this._epoch, this._timezone), false)}`;
           return options.include_weekday === false ? core : `${weekday}, ${core}`;
         }
@@ -4544,6 +4857,7 @@
         "throw",
         "sub",
         "union",
+        "divides",
         "intersection",
         "difference",
         "subsetof",
@@ -5159,6 +5473,18 @@
             continue;
           }
           if (isDigit(ch)) {
+            const radixDigitOk = ch === "0" ? peek(1) === "x" ? (c) => /[0-9a-fA-F]/.test(c || "") : peek(1) === "b" ? (c) => c === "0" || c === "1" : peek(1) === "o" ? (c) => /[0-7]/.test(c || "") : null : null;
+            if (radixDigitOk && radixDigitOk(peek(2))) {
+              const radix = peek(1) === "x" ? 16 : peek(1) === "b" ? 2 : 8;
+              advance();
+              advance();
+              let digits = "";
+              while (radixDigitOk(peek())) {
+                digits += advance();
+              }
+              addToken("number", String(parseInt(digits, radix)), start, cursor());
+              continue;
+            }
             let value = "";
             while (isDigit(peek())) {
               value += advance();
@@ -5169,6 +5495,15 @@
                 value += advance();
               }
             }
+            if (peek() === "E" && (isDigit(peek(1)) || (peek(1) === "+" || peek(1) === "-") && isDigit(peek(2)))) {
+              value += advance();
+              if (peek() === "+" || peek() === "-") {
+                value += advance();
+              }
+              while (isDigit(peek())) {
+                value += advance();
+              }
+            }
             addToken("number", value, start, cursor());
             continue;
           }
@@ -5194,7 +5529,7 @@
             addToken("operator", ch, start, cursor());
             continue;
           }
-          if (["\u2261", "\u2262", "\u2260", "\u2264", "\u2265", "\u2192", "\u221A", "\u230A", "\u230B", "\u2308", "\u2309", "\u2208", "\u2209", "\u22C3", "\u22C2", "\u2216", "\u2282", "\u2283", "\xAB", "\xBB", "\u2276", "\u2277", "\u25B7", "\u25C1"].includes(ch)) {
+          if (["\u2261", "\u2262", "\u2260", "\u2264", "\u2265", "\u2192", "\u221A", "\u230A", "\u230B", "\u2308", "\u2309", "\u2208", "\u2209", "\u22C3", "\u22C2", "\u2216", "\u2282", "\u2283", "\xAB", "\xBB", "\u2276", "\u2277", "\u25B7", "\u25C1", "\u2223", "\u2224"].includes(ch)) {
             advance();
             addToken("operator", ch, start, cursor());
             continue;
@@ -5252,6 +5587,7 @@
         UnsupportedSyntaxError
       } = require_errors();
       function parse(tokens, options = {}) {
+        const pendingSetClosers = [];
         let index = 0;
         let asyncContextDepth = 1;
         function startLocFromToken(token) {
@@ -6636,14 +6972,20 @@
         }
         function parseBitwise() {
           return parseLeftAssociative(
-            parseComparison,
+            parseShift,
             (token) => token.type === "operator" && ["&", "|", "^"].includes(token.value)
           );
         }
+        function parseShift() {
+          return parseLeftAssociative(
+            parseComparison,
+            (token) => token.type === "operator" && ["<<", ">>", "\xAB", "\xBB"].includes(token.value) && token.value !== pendingSetClosers[pendingSetClosers.length - 1]
+          );
+        }
         function parseComparison() {
           return parseLeftAssociative(
             parseRange,
-            (token) => token.type === "operator" && ["<", "<=", ">", ">=", "\u2264", "\u2265", "~", "<=>", "@", "@@", "@?", "\\", "\u2208", "\u2209", "\u22C3", "\u22C2", "\u2216", "\u2282", "\u2283", "\u2282\u2283", "\u2276", "\u2277"].includes(token.value) || token.type === "keyword" && ["gt", "ge", "lt", "le", "cmp", "eqi", "nei", "gti", "gei", "lti", "lei", "cmpi", "in", "not_in", "union", "intersection", "difference", "subsetof", "supersetof", "equivalentof", "does", "can"].includes(token.value) || token.type === "identifier" && token.value === "instanceof"
+            (token) => token.type === "operator" && ["<", "<=", ">", ">=", "\u2264", "\u2265", "~", "<=>", "@", "@@", "@?", "\\", "\u2208", "\u2209", "\u22C3", "\u22C2", "\u2216", "\u2282", "\u2283", "\u2282\u2283", "\u2276", "\u2277", "\u2223", "\u2224"].includes(token.value) || token.type === "keyword" && ["gt", "ge", "lt", "le", "cmp", "eqi", "nei", "gti", "gei", "lti", "lei", "cmpi", "in", "not_in", "union", "intersection", "difference", "subsetof", "supersetof", "equivalentof", "does", "can", "divides"].includes(token.value) || token.type === "identifier" && token.value === "instanceof"
           );
         }
         function parseRange() {
@@ -7286,18 +7628,23 @@
           if (match("operator", closer)) {
             return elements;
           }
-          while (true) {
-            if (match("punctuation", ",")) {
-              continue;
-            }
-            if (match("operator", closer)) {
-              break;
-            }
-            elements.push(parseExpression());
-            if (match("operator", closer)) {
-              break;
+          pendingSetClosers.push(closer);
+          try {
+            while (true) {
+              if (match("punctuation", ",")) {
+                continue;
+              }
+              if (match("operator", closer)) {
+                break;
+              }
+              elements.push(parseExpression());
+              if (match("operator", closer)) {
+                break;
+              }
+              match("punctuation", ",");
             }
-            match("punctuation", ",");
+          } finally {
+            pendingSetClosers.pop();
           }
           return elements;
         }
@@ -7894,6 +8241,8 @@ globalThis[${JSON.stringify(node.id.name)}] = ${name2};` : declaration;
             return ["__zuzu_call_args", signature.headName, signature.restName, signature.namedName, "__i", "__a"];
           case "scalar_pairlist":
             return ["__zuzu_call_args", signature.headName, signature.namedName, "__i", "__a"];
+          case "scalar_pairlist_array":
+            return ["__zuzu_call_args", signature.headName, signature.namedName, signature.restName, "__i", "__a"];
           case "variadic":
             return ["__zuzu_call_args", signature.headName, signature.restName, "__i", "__a"];
           default:
@@ -7944,6 +8293,14 @@ globalThis[${JSON.stringify(node.id.name)}] = ${name2};` : declaration;
             namedName: params[1].name
           };
         }
+        if (params.length === 3 && params[0].type === "Parameter" && params[1].type === "SpecialParameter" && params[1].special === "rest_only" && params[1].containerType === "PairList" && params[2].type === "Parameter" && (params[2].typeName === "Array" || params[2].typeName == null)) {
+          return {
+            kind: "scalar_pairlist_array",
+            headName: params[0].name,
+            namedName: params[1].name,
+            restName: params[2].name
+          };
+        }
         if (params.length === 1 && params[0].type === "SpecialParameter" && params[0].special === "lead_rest" && params[0].containerType === "Array") {
           return {
             kind: "variadic",
@@ -8075,6 +8432,19 @@ globalThis[${JSON.stringify(node.id.name)}] = ${name2};` : declaration;
               "}",
               `const ${signature.namedName} = __zuzu_named_args;`
             ].join("\n");
+          case "scalar_pairlist_array":
+            return [
+              "const __zuzu_call_args = Array.prototype.slice.call( arguments );",
+              `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 ) ) { __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 "variadic":
             return [
               "const __zuzu_call_args = Array.prototype.slice.call( arguments );",
@@ -9168,6 +9538,17 @@ ${cleanup}
             return `__zuzu_bit_or( ${left}, ${right} )`;
           case "^":
             return `__zuzu_bit_xor( ${left}, ${right} )`;
+          case "<<":
+          case "\xAB":
+            return `__zuzu_shift_left( ${left}, ${right} )`;
+          case "\u2223":
+          case "divides":
+            return `__zuzu_divides( ${left}, ${right} )`;
+          case "\u2224":
+            return `__zuzu_ndivides( ${left}, ${right} )`;
+          case ">>":
+          case "\xBB":
+            return `__zuzu_shift_right( ${left}, ${right} )`;
           default:
             return `( ${left} ${node.operator} ${right} )`;
         }
@@ -9198,6 +9579,9 @@ ${cleanup}
               return weakStorage || node.isWeakWrite ? `${left} = __zuzu_assign_weak( ${left}, ${right} )` : `${left} = __zuzu_assign_strong( ${left}, ${right} )`;
             }
             if (node.left && node.left.type === "MemberExpression") {
+              if (!node.left.computed) {
+                throw new UnsupportedSyntaxError("Invalid assignment target");
+              }
               const object = emitExpression(node.left.object);
               const objectTarget = emitAssignmentTarget(node.left.object);
               const key = node.left.computed ? node.left.property.type === "BraceIdentifier" ? `__zuzu_resolve_brace_key( ${object}, ${JSON.stringify(node.left.property.name)}, () => ${node.left.property.name} )` : emitExpression(node.left.property) : JSON.stringify(node.left.property.name);
@@ -9673,12 +10057,29 @@ ${cleanup}
             }
             return;
           case "UpdateExpression":
+            requireValidAssignmentTarget(node.argument);
             if (node.argument && node.argument.type === "Identifier") {
               requireMutable(node.argument, scope);
             } else {
               validateExpression(node.argument, scope);
             }
             return;
+          case "UnaryExpression":
+            if (node.operator === "++" || node.operator === "--") {
+              requireValidAssignmentTarget(node.argument);
+              if (node.argument && node.argument.type === "Identifier") {
+                requireMutable(node.argument, scope);
+              } else {
+                validateExpression(node.argument, scope);
+              }
+              return;
+            }
+            validateChildNodes(node, scope);
+            return;
+          case "RefExpression":
+            requireValidAssignmentTarget(node.argument);
+            validateExpression(node.argument, scope);
+            return;
           case "FunctionExpression":
             validateFunctionBody(node, scope);
             return;
@@ -9695,7 +10096,10 @@ ${cleanup}
         if (!target) {
           throw syntaxError("Invalid assignment target", node);
         }
-        if (target.type === "Identifier" || target.type === "MemberExpression" || target.type === "SliceExpression") {
+        if (target.type === "Identifier" || target.type === "SliceExpression") {
+          return;
+        }
+        if (target.type === "MemberExpression" && target.computed) {
           return;
         }
         if (target.type === "BinaryExpression" && ["@", "@@", "@?"].includes(target.operator)) {
@@ -10695,6 +11099,80 @@ ${cleanup}
     }
   });
 
+  // package.json
+  var require_package = __commonJS({
+    "package.json"(exports2, module2) {
+      module2.exports = {
+        name: "zuzu-js",
+        version: "0.4.0",
+        description: "JavaScript runtime, compiler, and browser bundle for ZuzuScript.",
+        main: "lib/zuzu.js",
+        bin: {
+          zuzu: "bin/zuzu",
+          "zuzu-js": "bin/zuzu-js",
+          "zuzu-js-compile": "bin/zuzu-js-compile",
+          "zuzu-js-electron": "bin/zuzu-js-electron"
+        },
+        files: [
+          "bin/",
+          "dist/zuzu-browser.js",
+          "dist/zuzu-browser-worker.js",
+          "lib/",
+          "modules/",
+          "stdlib/modules/"
+        ],
+        directories: {
+          example: "examples",
+          lib: "lib",
+          test: "test"
+        },
+        scripts: {
+          "electron:demo": "electron bin/zuzu-js-electron docs/examples/09_gui_dialogue_demo.zzs",
+          test: "node test/cli.js && node test/argument-spread.js && node test/default-operator.js && node test/declaration-unpacking.js && node test/collection-copy.js && node test/std-marshal-cbor.js && node test/std-marshal-data-graph.js && node test/std-marshal-user-object.js && node test/std-marshal-code-table.js && node test/async-parity.js && node test/browser-stdlib-generator.js && node test/browser-gui.js && node test/electron-gui.js && node test/electron-renderer.js && node test/electron-packaging.js",
+          "test:electron": "node test/electron-gui.js && node test/electron-renderer.js && node test/electron-packaging.js"
+        },
+        keywords: [
+          "zuzu",
+          "zuzuscript",
+          "language",
+          "runtime",
+          "compiler"
+        ],
+        author: "",
+        license: "Artistic-1.0 OR GPL-2.0-or-later",
+        repository: {
+          type: "git",
+          url: "git+ssh://git@github.com/zuzuscript/zuzu-js.git"
+        },
+        bugs: {
+          url: "https://github.com/zuzuscript/zuzu-js/issues"
+        },
+        homepage: "https://zuzulang.org/",
+        engines: {
+          node: ">=16"
+        },
+        dependencies: {
+          "@std-uritemplate/std-uritemplate": "^2.0.10",
+          "@xmldom/xmldom": "^0.9.10",
+          "adm-zip": "^0.5.17",
+          "better-sqlite3": "^11.10.0",
+          "cbor-x": "^1.6.4",
+          cborg: "^5.1.1",
+          compressjs: "^1.0.3",
+          "js-yaml": "^4.1.1",
+          koffi: "^2.16.1",
+          mysql2: "^3.22.3",
+          "node-forge": "^1.4.0",
+          pg: "^8.20.0",
+          xpath: "^0.0.34"
+        },
+        devDependencies: {
+          electron: "^41.3.0"
+        }
+      };
+    }
+  });
+
   // modules/std/io.js
   var require_io = __commonJS({
     "modules/std/io.js"(exports2, module2) {
@@ -11209,12 +11687,34 @@ ${cleanup}
         releaseCollectionValues,
         addSetValue,
         assignStrongValue,
-        assignWeakValue
+        assignWeakValue,
+        codePointStringCompare,
+        stringSortComparator
       } = require_runtime_helpers();
       var taskRuntime2 = require_task();
       var textEncoder = new TextEncoder();
       var utf8Decoder = new TextDecoder("utf-8", { fatal: true });
       var ZUZU_SKIP_BUILD = /* @__PURE__ */ Symbol.for("zuzu.skip_build");
+      var runtimeVersion = (() => {
+        if (typeof globalThis === "object" && globalThis !== null) {
+          const globalVersion = globalThis.__ZUZU_RUNTIME_VERSION;
+          if (typeof globalVersion === "string" && globalVersion.trim()) {
+            return String(globalVersion);
+          }
+        }
+        if (typeof process === "object" && process && process.versions) {
+          try {
+            const packageMetadata = require_package();
+            const packageVersion = packageMetadata && packageMetadata.version;
+            if (packageVersion) {
+              return String(packageVersion);
+            }
+          } catch (err) {
+            return "dev";
+          }
+        }
+        return "dev";
+      })();
       function defaultModuleSearchRoots(host, repoRoot, includePaths) {
         if (host.name === "browser") {
           return [
@@ -11375,10 +11875,16 @@ ${cleanup}
       function stringCompare(left, right, options = {}) {
         const l = options.insensitive ? zuzuOperatorString(left).toLowerCase() : zuzuOperatorString(left);
         const r = options.insensitive ? zuzuOperatorString(right).toLowerCase() : zuzuOperatorString(right);
-        return l.localeCompare(r);
+        return codePointStringCompare(l, r);
       }
       function parseNumericString(value) {
         const text = String(value).trim();
+        const radix = text.match(/^([+-]?)0([xX][0-9a-fA-F]+|[bB][01]+|[oO][0-7]+)$/);
+        if (radix) {
+          const base = "xX".includes(radix[2][0]) ? 16 : "bB".includes(radix[2][0]) ? 2 : 8;
+          const magnitude = parseInt(radix[2].slice(1), base);
+          return radix[1] === "-" ? -magnitude : magnitude;
+        }
         const match = text.match(/^[+-]?(?:\d+(?:\.\d*)?|\.\d+)(?:[eE][+-]?\d+)?$/);
         if (!match) {
           throw new Error(`TypeException: cannot coerce String to Number: ${JSON.stringify(String(value))}`);
@@ -11677,6 +12183,46 @@ ${cleanup}
         }
         return ~(zuzuToNumber(value) >>> 0) >>> 0;
       }
+      function shiftBitstream(bytes, count, left) {
+        const len = bytes.length;
+        const out = new Uint8Array(len);
+        if (len === 0 || count >= len * 8) {
+          return out;
+        }
+        const byteShift = Math.floor(count / 8);
+        const bitShift = count % 8;
+        for (let i = 0; i < len; i++) {
+          let value;
+          if (left) {
+            const src = i + byteShift;
+            const hi = src < len ? bytes[src] : 0;
+            const lo = src + 1 < len ? bytes[src + 1] : 0;
+            value = (hi << 8 | lo) << bitShift >> 8;
+          } else {
+            if (i < byteShift) {
+              continue;
+            }
+            const lo = bytes[i - byteShift];
+            const hi = i > byteShift ? bytes[i - byteShift - 1] : 0;
+            value = (hi << 8 | lo) >> bitShift;
+          }
+          out[i] = value & 255;
+        }
+        return out;
+      }
+      function shiftValue(left, right, leftward) {
+        left = resolveWeakValue(left);
+        const count = Math.trunc(zuzuToNumber(right));
+        if (!(count >= 0) || !Number.isFinite(count)) {
+          throw new Error("Exception: shift count must be a non-negative integer");
+        }
+        if (left instanceof ZuzuBinary) {
+          return new BinaryString2(shiftBitstream(left.bytes, count, leftward));
+        }
+        const value = Math.trunc(zuzuToNumber(left));
+        const factor = Math.pow(2, count);
+        return leftward ? value * factor : Math.floor(value / factor);
+      }
       function zuzuComparableValue(value) {
         value = resolveWeakValue(value);
         if (typeof value === "function" && value.length === 0) {
@@ -12330,10 +12876,15 @@ ${cleanup}
                 zuzuStoreField(this, field, value);
               }
               let named = null;
+              const lastArg = ctorArgs[ctorArgs.length - 1];
               if (ctorArgs.length === 1 && isPairListLike(ctorArgs[0])) {
                 named = ctorArgs[0];
               } else if (ctorArgs.length === 1 && ctorArgs[0] && typeof ctorArgs[0] === "object" && !Array.isArray(ctorArgs[0])) {
                 named = ctorArgs[0];
+              } else if (ctorArgs.length > 1 && isPairListLike(lastArg)) {
+                named = lastArg;
+              } else if (ctorArgs.length > 1 && lastArg && typeof lastArg === "object" && !Array.isArray(lastArg)) {
+                named = lastArg;
               }
               const releaseTemporaryNamed = !skipBuild && isPairListLike(named) && named.__zuzu_temporary_call_args === true;
               try {
@@ -12485,9 +13036,6 @@ ${cleanup}
         if (dictMethod) {
           return dictMethod(...args);
         }
-        if (args.length === 0) {
-          return value;
-        }
         throw new TypeError(`${String(property)} is not a function`);
       }
       function zuzuMaybeDemolish(value) {
@@ -13050,7 +13598,12 @@ ${cleanup}
           }
           const moduleSearchRoots = this.getModuleSearchRoots();
           const emit = (value) => {
-            const line = String(value);
+            let line = String(value);
+            if (line === "Infinity") {
+              line = "Inf";
+            } else if (line === "-Infinity") {
+              line = "-Inf";
+            }
             if (this.outputLines) {
               this.outputLines.push(line);
             }
@@ -13328,7 +13881,7 @@ ${cleanup}
               return [...this].sort(fn2);
             });
             defineRuntimeMethod(Set.prototype, "sortstr", function _setSortstr() {
-              return [...this].sort((a, b) => String(a).localeCompare(String(b)));
+              return [...this].sort(stringSortComparator);
             });
             defineRuntimeMethod(Set.prototype, "sortnum", function _setSortnum() {
               return [...this].map((item) => Number(item)).sort((a, b) => a - b);
@@ -13393,7 +13946,7 @@ ${cleanup}
           const systemGlobalSeed = {
             language_version: 0,
             runtime: "zuzu-js",
-            runtime_version: "dev",
+            runtime_version: runtimeVersion,
             platform: this.host.name,
             inc: Object.freeze(moduleSearchRoots.slice()),
             deny_fs: capabilityFlags.fs ? false : true,
@@ -13734,6 +14287,12 @@ ${cleanup}
                 if (input == null) {
                   return [];
                 }
+                if (input instanceof ZuzuBinary) {
+                  return Array.from(input.bytes, (byte) => new BinaryString2([byte]));
+                }
+                if (typeof input === "string" || input instanceof String) {
+                  return Array.from(String(input));
+                }
                 if (typeof input[Symbol.iterator] === "function") {
                   return input;
                 }
@@ -13883,6 +14442,19 @@ ${cleanup}
             __zuzu_bit_and(left, right) {
               return bitwiseAnd(left, right);
             },
+            __zuzu_shift_left(left, right) {
+              return shiftValue(left, right, true);
+            },
+            // The left operand is the divisor: a ∣ b tests b mod a.
+            __zuzu_divides(left, right) {
+              return zuzuToNumber(right) % zuzuToNumber(left) === 0;
+            },
+            __zuzu_ndivides(left, right) {
+              return zuzuToNumber(right) % zuzuToNumber(left);
+            },
+            __zuzu_shift_right(left, right) {
+              return shiftValue(left, right, false);
+            },
             __zuzu_bit_or(left, right) {
               return bitwiseOr(left, right);
             },
@@ -14239,7 +14811,7 @@ ${cleanup}
 				define( Array.prototype, 'shuffle', function _shuffle() { return this.slice(); } );
 				define( Array.prototype, 'sample', function _sample( n ) { return this.slice( 0, n ); } );
 				define( Array.prototype, 'for_each_value', function _for_each_value( fn ) { this.forEach( fn ); return this; } );
-				define( Array.prototype, 'sortstr', function _sortstr() { return this.slice().sort( (a, b) => String( a ).localeCompare( String( b ) ) ); } );
+				define( Array.prototype, 'sortstr', function _sortstr() { return this.slice().sort( stringSortComparator ); } );
 				define( Array.prototype, 'sortnum', function _sortnum() { return this.map( (item) => Number( item ) ).sort( (a, b) => a - b ); } );
 				define( Array.prototype, 'to_Array', function _to_array() { return __zuzu_array( this ); } );
 				define( Array.prototype, 'to_Set', function _to_set() { return __zuzu_set( this ); } );
@@ -14269,7 +14841,7 @@ ${cleanup}
 				define( Set.prototype, 'is_disjoint', function _is_disjoint( other ) { return this.intersection( other ).size === 0 ? 1 : 0; } );
 				define( Set.prototype, 'equals', function _equals( other ) { return __zuzu_equivalentof( this, other ); } );
 				define( Set.prototype, 'sort', function _sort( fn ) { return [ ...this ].sort( fn ); } );
-				define( Set.prototype, 'sortstr', function _sortstr() { return [ ...this ].sort( (a, b) => String( a ).localeCompare( String( b ) ) ); } );
+				define( Set.prototype, 'sortstr', function _sortstr() { return [ ...this ].sort( stringSortComparator ); } );
 				define( Set.prototype, 'sortnum', function _sortnum() { return [ ...this ].map( (item) => Number( item ) ).sort( (a, b) => a - b ); } );
 				define( Set.prototype, 'map', function _map( fn ) { return new Set( [ ...this ].map( fn ) ); } );
 				define( Set.prototype, 'grep', function _grep( fn ) { return new Set( [ ...this ].filter( fn ) ); } );
@@ -37171,7 +37743,9 @@ ${lines.join("\n")}
         return values;
       }
       var ZMath = {
-        pi: PI,
+        pi() {
+          return PI;
+        },
         sin(value) {
           return Math.sin(Number(value ?? 0));
         },
@@ -37302,6 +37876,12 @@ ${lines.join("\n")}
       "use strict";
       var BigNum = class _BigNum {
         constructor(value, text = null, isInt = null) {
+          if (typeof value === "bigint") {
+            this._value = value;
+            this._text = text == null ? String(value) : String(text);
+            this._isInt = isInt == null ? true : Boolean(isInt);
+            return;
+          }
           this._value = Number(value ?? 0);
           this._text = text == null ? String(this._value) : String(text);
           this._isInt = isInt == null ? Number.isInteger(this._value) : Boolean(isInt);
@@ -37317,19 +37897,46 @@ ${lines.join("\n")}
         }
         static from_dec(value) {
           const text = String(value ?? "0").trim();
-          return new _BigNum(Number(text || "0"), text || "0", !/[.eE]/.test(text));
+          const safeText = text || "0";
+          if (_BigNum._isIntegerText(safeText)) {
+            return new _BigNum(BigInt(safeText), safeText, true);
+          }
+          return new _BigNum(Number(safeText), safeText, !/[.eE]/.test(safeText));
         }
         static from_hex(value) {
-          const text = String(value ?? "0").trim().toLowerCase().replace(/^0x/u, "") || "0";
-          const parsed = Number.parseInt(text, 16);
+          const text = String(value ?? "0").trim().replace(/^0x/u, "").toLowerCase() || "0";
+          const negative = text.startsWith("-");
+          const digits = text.replace(/^[+-]/u, "");
+          const parsed = BigInt(`0x${digits}`) * (negative ? -1n : 1n);
           return new _BigNum(parsed, String(parsed), true);
         }
-        get is_int() {
+        is_int() {
           return this._isInt;
         }
+        _toBigInt() {
+          if (!this._isInt) {
+            return null;
+          }
+          if (typeof this._value === "bigint") {
+            return this._value;
+          }
+          try {
+            return BigInt(this._text);
+          } catch {
+            return null;
+          }
+        }
+        _toNumber() {
+          return typeof this._value === "bigint" ? Number(this._value) : this._value;
+        }
         bcmp(other) {
-          const rhs = _BigNum._coerce(other)._value;
-          return this._value < rhs ? -1 : this._value > rhs ? 1 : 0;
+          const rhs = _BigNum._coerce(other);
+          const lhsBigInt = this._toBigInt();
+          const rhsBigInt = rhs._toBigInt();
+          if (lhsBigInt !== null && rhsBigInt !== null) {
+            return lhsBigInt < rhsBigInt ? -1 : lhsBigInt > rhsBigInt ? 1 : 0;
+          }
+          return this._toNumber() < rhs._toNumber() ? -1 : this._toNumber() > rhs._toNumber() ? 1 : 0;
         }
         beq(other) {
           return this.bcmp(other) === 0;
@@ -37349,71 +37956,136 @@ ${lines.join("\n")}
         bge(other) {
           return this.bcmp(other) >= 0;
         }
-        get babs() {
-          return new _BigNum(Math.abs(this._value), String(Math.abs(this._value)), this._isInt);
+        babs() {
+          const value = this._toBigInt();
+          if (value !== null) {
+            return new _BigNum(value < 0n ? -value : value, String(value < 0n ? -value : value), this._isInt);
+          }
+          return new _BigNum(Math.abs(this._toNumber()), String(Math.abs(this._toNumber())), this._isInt);
         }
-        get bneg() {
-          return new _BigNum(-this._value, String(-this._value), this._isInt);
+        bneg() {
+          const value = this._toBigInt();
+          if (value !== null) {
+            return new _BigNum(-value, String(-value), this._isInt);
+          }
+          return new _BigNum(-this._toNumber(), String(-this._toNumber()), this._isInt);
         }
-        get binv() {
-          return new _BigNum(1 / this._value);
+        binv() {
+          return new _BigNum(1 / this._toNumber());
         }
-        get bsin() {
-          return new _BigNum(Math.sin(this._value), String(Math.sin(this._value)), false);
+        bsin() {
+          return new _BigNum(Math.sin(this._toNumber()), String(Math.sin(this._toNumber())), false);
         }
-        get bcos() {
-          return new _BigNum(Math.cos(this._value));
+        bcos() {
+          return new _BigNum(Math.cos(this._toNumber()));
         }
-        get btan() {
-          return new _BigNum(Math.tan(this._value), String(Math.tan(this._value)), false);
+        btan() {
+          return new _BigNum(Math.tan(this._toNumber()), String(Math.tan(this._toNumber())), false);
         }
-        get bsqrt() {
-          return new _BigNum(Math.sqrt(this._value));
+        bsqrt() {
+          return new _BigNum(Math.sqrt(this._toNumber()));
         }
-        get bround() {
-          return new _BigNum(Math.round(this._value));
+        bround() {
+          return new _BigNum(Math.round(this._toNumber()));
         }
-        get bfloor() {
-          return new _BigNum(Math.floor(this._value));
+        bfloor() {
+          return new _BigNum(Math.floor(this._toNumber()));
         }
-        get bceil() {
-          return new _BigNum(Math.ceil(this._value));
+        bceil() {
+          return new _BigNum(Math.ceil(this._toNumber()));
         }
         badd(other) {
-          return new _BigNum(this._value + _BigNum._coerce(other)._value, String(this._value + _BigNum._coerce(other)._value), false);
+          const rhs = _BigNum._coerce(other);
+          const lhsInt = this._toBigInt();
+          const rhsInt = rhs._toBigInt();
+          if (lhsInt !== null && rhsInt !== null) {
+            return new _BigNum(lhsInt + rhsInt, String(lhsInt + rhsInt), false);
+          }
+          return new _BigNum(this._toNumber() + rhs._toNumber(), String(this._toNumber() + rhs._toNumber()), false);
         }
         bsub(other) {
-          return new _BigNum(this._value - _BigNum._coerce(other)._value, String(this._value - _BigNum._coerce(other)._value), false);
+          const rhs = _BigNum._coerce(other);
+          const lhsInt = this._toBigInt();
+          const rhsInt = rhs._toBigInt();
+          if (lhsInt !== null && rhsInt !== null) {
+            return new _BigNum(lhsInt - rhsInt, String(lhsInt - rhsInt), false);
+          }
+          return new _BigNum(this._toNumber() - rhs._toNumber(), String(this._toNumber() - rhs._toNumber()), false);
         }
         bmul(other) {
-          return new _BigNum(this._value * _BigNum._coerce(other)._value, String(this._value * _BigNum._coerce(other)._value), false);
+          const rhs = _BigNum._coerce(other);
+          const lhsInt = this._toBigInt();
+          const rhsInt = rhs._toBigInt();
+          if (lhsInt !== null && rhsInt !== null) {
+            return new _BigNum(lhsInt * rhsInt, String(lhsInt * rhsInt), false);
+          }
+          return new _BigNum(this._toNumber() * rhs._toNumber(), String(this._toNumber() * rhs._toNumber()), false);
         }
         bdiv(other) {
-          return new _BigNum(this._value / _BigNum._coerce(other)._value);
+          const rhs = _BigNum._coerce(other);
+          return new _BigNum(this._toNumber() / rhs._toNumber());
         }
         bmod(other) {
-          return new _BigNum(this._value % _BigNum._coerce(other)._value);
+          const rhs = _BigNum._coerce(other);
+          const lhsInt = this._toBigInt();
+          const rhsInt = rhs._toBigInt();
+          if (lhsInt !== null && rhsInt !== null && rhsInt !== 0n) {
+            return new _BigNum(lhsInt % rhsInt, String(lhsInt % rhsInt), true);
+          }
+          return new _BigNum(this._toNumber() % rhs._toNumber());
         }
         bpow(other) {
-          return new _BigNum(this._value ** _BigNum._coerce(other)._value);
+          const rhs = _BigNum._coerce(other);
+          const lhsInt = this._toBigInt();
+          const rhsInt = rhs._toBigInt();
+          if (lhsInt !== null && rhsInt !== null && rhsInt >= 0n) {
+            let base = lhsInt;
+            let power = rhsInt;
+            let result = 1n;
+            while (power > 0n) {
+              if (power & 1n) {
+                result *= base;
+              }
+              power >>= 1n;
+              if (power > 0n) {
+                base *= base;
+              }
+            }
+            return new _BigNum(result, String(result), true);
+          }
+          return new _BigNum(this._toNumber() ** rhs._toNumber());
         }
-        get to_hex() {
-          return `0x${Math.trunc(this._value).toString(16)}`;
+        to_hex() {
+          const value = this._toBigInt();
+          if (value === null) {
+            return `0x${Math.trunc(this._toNumber()).toString(16)}`;
+          }
+          if (value === 0n) {
+            return "0x0";
+          }
+          const absolute = value < 0n ? -value : value;
+          return value < 0n ? `-0x${absolute.toString(16)}` : `0x${absolute.toString(16)}`;
+        }
+        to_dec() {
+          return this._textify();
+        }
+        to_String() {
+          return this.to_dec();
         }
-        get to_dec() {
-          return this._isInt ? Math.trunc(this._value) : this._textify();
+        toString() {
+          return String(this.to_String());
         }
-        get to_String() {
-          return this.to_dec;
+        to_Number() {
+          return this._toNumber();
         }
-        get to_Number() {
-          return this._value;
+        static _isIntegerText(text) {
+          return /^[+-]?(?:\d+)$/u.test(text);
         }
         _textify() {
           if (this._text != null && /^[+-]?(?:\d+(?:\.\d*)?|\.\d+)$/u.test(this._text)) {
             return this._text.replace(/\.0+$/u, "").replace(/(\.\d*?)0+$/u, "$1").replace(/\.$/u, "");
           }
-          return String(this._value);
+          return this._toBigInt() !== null ? this._toBigInt().toString() : String(this._value);
         }
       };
       module2.exports = {
@@ -39388,6 +40060,436 @@ ${lines.join("\n")}
     }
   });
 
+  // node_modules/@std-uritemplate/std-uritemplate/dist/index.cjs
+  var require_dist = __commonJS({
+    "node_modules/@std-uritemplate/std-uritemplate/dist/index.cjs"(exports2) {
+      "use strict";
+      var StdUriTemplate = class _StdUriTemplate {
+        static expand(template, substitutions) {
+          return _StdUriTemplate.expandImpl(template, substitutions);
+        }
+        static validateLiteral(c, col) {
+          switch (c) {
+            case "+":
+            case "#":
+            case "/":
+            case ";":
+            case "?":
+            case "&":
+            case " ":
+            case "!":
+            case "=":
+            case "$":
+            case "|":
+            case "*":
+            case ":":
+            case "~":
+            case "-":
+              throw new Error(`Illegal character identified in the token at col: ${col}`);
+          }
+        }
+        static getMaxChar(buffer, col) {
+          if (!buffer) {
+            return -1;
+          } else {
+            const value = buffer.join("");
+            if (value.length === 0) {
+              return -1;
+            } else {
+              try {
+                return parseInt(value, 10);
+              } catch (e) {
+                throw new Error(`Cannot parse max chars at col: ${col}`);
+              }
+            }
+          }
+        }
+        static getOperator(c, token, col) {
+          switch (c) {
+            case "+":
+              return 1;
+            case "#":
+              return 2;
+            case ".":
+              return 3;
+            case "/":
+              return 4;
+            case ";":
+              return 5;
+            case "?":
+              return 6;
+            case "&":
+              return 7;
+            default:
+              _StdUriTemplate.validateLiteral(c, col);
+              token.push(c);
+              return 0;
+          }
+        }
+        static expandImpl(str, substitutions) {
+          const result = [];
+          let token = null;
+          let operator = null;
+          let composite = false;
+          let maxCharBuffer = null;
+          let firstToken = true;
+          for (let i = 0; i < str.length; i++) {
+            const character = str.charAt(i);
+            switch (character) {
+              case "{":
+                token = [];
+                firstToken = true;
+                break;
+              case "}":
+                if (token !== null) {
+                  const expanded = _StdUriTemplate.expandToken(
+                    operator,
+                    token.join(""),
+                    composite,
+                    _StdUriTemplate.getMaxChar(maxCharBuffer, i),
+                    firstToken,
+                    substitutions,
+                    result,
+                    i
+                  );
+                  if (expanded && firstToken) {
+                    firstToken = false;
+                  }
+                  token = null;
+                  operator = null;
+                  composite = false;
+                  maxCharBuffer = null;
+                } else {
+                  throw new Error(`Failed to expand token, invalid at col: ${i}`);
+                }
+                break;
+              case ",":
+                if (token !== null) {
+                  const expanded = _StdUriTemplate.expandToken(
+                    operator,
+                    token.join(""),
+                    composite,
+                    _StdUriTemplate.getMaxChar(maxCharBuffer, i),
+                    firstToken,
+                    substitutions,
+                    result,
+                    i
+                  );
+                  if (expanded && firstToken) {
+                    firstToken = false;
+                  }
+                  token = [];
+                  composite = false;
+                  maxCharBuffer = null;
+                  break;
+                }
+              // Intentional fall-through for commas outside the {}
+              default:
+                if (token !== null) {
+                  if (operator === null) {
+                    operator = _StdUriTemplate.getOperator(character, token, i);
+                  } else if (maxCharBuffer !== null) {
+                    if (character.match(/^\d$/)) {
+                      maxCharBuffer.push(character);
+                    } else {
+                      throw new Error(`Illegal character identified in the token at col: ${i}`);
+                    }
+                  } else {
+                    if (character === ":") {
+                      maxCharBuffer = [];
+                    } else if (character === "*") {
+                      composite = true;
+                    } else {
+                      _StdUriTemplate.validateLiteral(character, i);
+                      token.push(character);
+                    }
+                  }
+                } else {
+                  result.push(character);
+                }
+                break;
+            }
+          }
+          if (token === null) {
+            return result.join("");
+          } else {
+            throw new Error("Unterminated token");
+          }
+        }
+        static addPrefix(op, result) {
+          switch (op) {
+            case 2:
+              result.push("#");
+              break;
+            case 3:
+              result.push(".");
+              break;
+            case 4:
+              result.push("/");
+              break;
+            case 5:
+              result.push(";");
+              break;
+            case 6:
+              result.push("?");
+              break;
+            case 7:
+              result.push("&");
+              break;
+            default:
+              return;
+          }
+        }
+        static addSeparator(op, result) {
+          switch (op) {
+            case 3:
+              result.push(".");
+              break;
+            case 4:
+              result.push("/");
+              break;
+            case 5:
+              result.push(";");
+              break;
+            case 6:
+            case 7:
+              result.push("&");
+              break;
+            default:
+              result.push(",");
+              return;
+          }
+        }
+        static addValue(op, token, value, result, maxChar) {
+          switch (op) {
+            case 1:
+            case 2:
+              _StdUriTemplate.addExpandedValue(null, value, result, maxChar, false);
+              break;
+            case 6:
+            case 7:
+              result.push(`${token}=`);
+              _StdUriTemplate.addExpandedValue(null, value, result, maxChar, true);
+              break;
+            case 5:
+              result.push(token);
+              _StdUriTemplate.addExpandedValue("=", value, result, maxChar, true);
+              break;
+            case 3:
+            case 4:
+            case 0:
+              _StdUriTemplate.addExpandedValue(null, value, result, maxChar, true);
+              break;
+          }
+        }
+        static addValueElement(op, token, value, result, maxChar) {
+          switch (op) {
+            case 1:
+            case 2:
+              _StdUriTemplate.addExpandedValue(null, value, result, maxChar, false);
+              break;
+            case 6:
+            case 7:
+            case 5:
+            case 3:
+            case 4:
+            case 0:
+              _StdUriTemplate.addExpandedValue(null, value, result, maxChar, true);
+              break;
+          }
+        }
+        static isSurrogate(cp) {
+          const codeUnit = cp.charCodeAt(0);
+          return codeUnit >= 55296 && codeUnit <= 56319;
+        }
+        static isIprivate(cp) {
+          return 57344 <= cp.charCodeAt(0) && cp.charCodeAt(0) <= 63743;
+        }
+        static isUcschar(cp) {
+          const codePoint = cp.codePointAt(0) || 0;
+          return 160 <= codePoint && codePoint <= 55295 || 63744 <= codePoint && codePoint <= 64975 || 65008 <= codePoint && codePoint <= 65519;
+        }
+        static addExpandedValue(prefix, value, result, maxChar, replaceReserved) {
+          const stringValue = _StdUriTemplate.convertNativeTypes(value);
+          const max = maxChar !== -1 ? Math.min(maxChar, stringValue.length) : stringValue.length;
+          let reservedBuffer = void 0;
+          if (max > 0 && prefix != null) {
+            result.push(prefix);
+          }
+          for (let i = 0; i < max; i++) {
+            const character = stringValue.charAt(i);
+            if (character === "%" && !replaceReserved) {
+              reservedBuffer = [];
+            }
+            let toAppend = character;
+            if (_StdUriTemplate.isSurrogate(character)) {
+              toAppend = encodeURIComponent(stringValue.charAt(i) + stringValue.charAt(i + 1));
+              i++;
+            } else if (replaceReserved || _StdUriTemplate.isUcschar(character) || _StdUriTemplate.isIprivate(character)) {
+              if (character === "!") {
+                toAppend = "%21";
+              } else {
+                toAppend = encodeURIComponent(toAppend);
+              }
+            }
+            if (reservedBuffer) {
+              reservedBuffer.push(toAppend);
+              if (reservedBuffer.length === 3) {
+                let isEncoded = false;
+                try {
+                  const reserved = reservedBuffer.join("");
+                  const decoded = decodeURIComponent(reservedBuffer.join(""));
+                  isEncoded = reserved !== decoded;
+                } catch (e) {
+                }
+                if (isEncoded) {
+                  result.push(reservedBuffer.join(""));
+                } else {
+                  result.push("%25");
+                  result.push(reservedBuffer.slice(1).join(""));
+                }
+                reservedBuffer = void 0;
+              }
+            } else {
+              if (character === " ") {
+                result.push("%20");
+              } else if (character === "%") {
+                result.push("%25");
+              } else {
+                result.push(toAppend);
+              }
+            }
+          }
+          if (reservedBuffer) {
+            result.push("%25");
+            result.push(reservedBuffer.slice(1).join(""));
+          }
+        }
+        static isList(value) {
+          return Array.isArray(value) || value instanceof Set;
+        }
+        static isMap(value) {
+          return value instanceof Map || typeof value === "object";
+        }
+        static getSubstitutionType(value, col) {
+          if (value === void 0 || value === null) {
+            return 0;
+          } else if (_StdUriTemplate.isNativeType(value)) {
+            return 1;
+          } else if (_StdUriTemplate.isList(value)) {
+            return 2;
+          } else if (_StdUriTemplate.isMap(value)) {
+            return 3;
+          } else {
+            throw new Error(`Illegal class passed as substitution, found ${typeof value} at col: ${col}`);
+          }
+        }
+        static isEmpty(substType, value) {
+          if (value === void 0 || value === null) {
+            return true;
+          } else {
+            switch (substType) {
+              case 1:
+                return false;
+              case 2:
+                return value.length === 0;
+              case 3:
+                return Object.keys(value).length === 0;
+              default:
+                return true;
+            }
+          }
+        }
+        static isNativeType(value) {
+          return typeof value === "string" || typeof value === "number" || typeof value === "boolean";
+        }
+        static convertNativeTypes(value) {
+          if (typeof value === "string") {
+            return value;
+          } else if (typeof value === "number" || typeof value === "boolean") {
+            return value.toString();
+          } else {
+            throw new Error(`Illegal class passed as substitution, found ${typeof value}`);
+          }
+        }
+        static expandToken(operator, token, composite, maxChar, firstToken, substitutions, result, col) {
+          if (token.length === 0) {
+            throw new Error(`Found an empty token at col: ${col}`);
+          }
+          const value = substitutions[token];
+          const substType = _StdUriTemplate.getSubstitutionType(value, col);
+          if (substType === 0 || _StdUriTemplate.isEmpty(substType, value)) {
+            return false;
+          }
+          if (firstToken) {
+            _StdUriTemplate.addPrefix(operator, result);
+          } else {
+            _StdUriTemplate.addSeparator(operator, result);
+          }
+          switch (substType) {
+            case 1:
+              _StdUriTemplate.addStringValue(operator, token, value, result, maxChar);
+              break;
+            case 2:
+              _StdUriTemplate.addListValue(operator, token, value, result, maxChar, composite);
+              break;
+            case 3:
+              _StdUriTemplate.addMapValue(operator, token, value, result, maxChar, composite);
+              break;
+          }
+          return true;
+        }
+        static addStringValue(operator, token, value, result, maxChar) {
+          _StdUriTemplate.addValue(operator, token, value, result, maxChar);
+        }
+        static addListValue(operator, token, value, result, maxChar, composite) {
+          let first = true;
+          for (const v of value) {
+            if (first) {
+              _StdUriTemplate.addValue(operator, token, v, result, maxChar);
+              first = false;
+            } else {
+              if (composite) {
+                _StdUriTemplate.addSeparator(operator, result);
+                _StdUriTemplate.addValue(operator, token, v, result, maxChar);
+              } else {
+                result.push(",");
+                _StdUriTemplate.addValueElement(operator, token, v, result, maxChar);
+              }
+            }
+          }
+        }
+        static addMapValue(operator, token, value, result, maxChar, composite) {
+          let first = true;
+          if (maxChar !== -1) {
+            throw new Error("Value trimming is not allowed on Maps");
+          }
+          for (const key in value) {
+            const v = value[key];
+            if (composite) {
+              if (!first) {
+                _StdUriTemplate.addSeparator(operator, result);
+              }
+              _StdUriTemplate.addValueElement(operator, token, key, result, maxChar);
+              result.push("=");
+            } else {
+              if (first) {
+                _StdUriTemplate.addValue(operator, token, key, result, maxChar);
+              } else {
+                result.push(",");
+                _StdUriTemplate.addValueElement(operator, token, key, result, maxChar);
+              }
+              result.push(",");
+            }
+            _StdUriTemplate.addValueElement(operator, token, v, result, maxChar);
+            first = false;
+          }
+        }
+      };
+      exports2.StdUriTemplate = StdUriTemplate;
+    }
+  });
+
   // modules/std/net/url.js
   var require_url = __commonJS({
     "modules/std/net/url.js"(exports2, module2) {
@@ -39454,29 +40556,42 @@ ${lines.join("\n")}
         }
         return out;
       }
-      function _templateVar(values, name2) {
-        if (values[name2] == null) {
-          return "";
+      var { StdUriTemplate } = require_dist();
+      function _templateValue(value) {
+        if (value == null) {
+          return null;
         }
-        return encodeURIComponent(_str(values[name2]));
-      }
-      function _templateQuery(values, namesText) {
-        const names = String(namesText).split(/\s*,\s*/u).filter(Boolean);
-        const parts = [];
-        for (const name2 of names) {
-          if (values[name2] == null) {
-            continue;
+        if (Array.isArray(value)) {
+          return value.map((item) => _str(item));
+        }
+        if (typeof value === "boolean") {
+          return value ? "true" : "false";
+        }
+        if (typeof value === "object" && !(value.bytes instanceof Uint8Array)) {
+          const out = {};
+          for (const key of Object.keys(value).sort()) {
+            out[key] = _str(value[key]);
           }
-          const key = encodeURIComponent(name2);
-          const val = encodeURIComponent(_str(values[name2]));
-          parts.push(`${key}=${val}`);
+          return out;
         }
-        return parts.length > 0 ? `?${parts.join("&")}` : "";
+        return _str(value);
       }
       function fill_template(template, values) {
         const source = _str(template);
-        const data = values && typeof values === "object" && !Array.isArray(values) ? values : {};
-        return source.replace(/\{\?([^}]+)\}/gu, (_, names) => _templateQuery(data, names)).replace(/\{([a-zA-Z_][a-zA-Z0-9_]*)\}/gu, (_, name2) => _templateVar(data, name2));
+        const data = {};
+        if (values && typeof values === "object" && !Array.isArray(values)) {
+          for (const key of Object.keys(values)) {
+            const converted = _templateValue(values[key]);
+            if (converted != null) {
+              data[key] = converted;
+            }
+          }
+        }
+        try {
+          return StdUriTemplate.expand(source, data);
+        } catch (err) {
+          throw new Error(`Exception: invalid URL template: ${source}`);
+        }
       }
       module2.exports = {
         escape,
@@ -39487,15 +40602,16 @@ ${lines.join("\n")}
     }
   });
 
-  // ../../../../../tmp/zuzu-browser-build.WePoiO/browser-stdlib.generated.js
+  // ../../../../../tmp/zuzu-browser-build.fADF4k/browser-stdlib.generated.js
   var require_browser_stdlib_generated = __commonJS({
-    "../../../../../tmp/zuzu-browser-build.WePoiO/browser-stdlib.generated.js"(exports2, module2) {
+    "../../../../../tmp/zuzu-browser-build.fADF4k/browser-stdlib.generated.js"(exports2, module2) {
       "use strict";
       function createBrowserStdlib2() {
         const jsModules = /* @__PURE__ */ Object.create(null);
         jsModules["/modules/javascript.js"] = require_javascript();
         jsModules["/modules/std/string.js"] = require_string();
         jsModules["/modules/std/string/base64.js"] = require_base64();
+        jsModules["/modules/std/string/encode.js"] = require_encode();
         jsModules["/modules/std/time.js"] = require_time();
         jsModules["/modules/std/marshal.js"] = require_marshal();
         jsModules["/modules/std/task.js"] = require_task();
@@ -39516,7 +40632,7 @@ ${lines.join("\n")}
         jsModules["/modules/std/internals.js"] = require_internals();
         jsModules["/modules/std/net/url.js"] = require_url();
         const virtualFiles = /* @__PURE__ */ Object.create(null);
-        virtualFiles["/modules/std/colour.zzm"] = '=encoding utf8\n\n=head1 NAME\n\nstd/colour - Colour parsing helpers.\n\n=head1 SYNOPSIS\n\n  from std/colour import parse_colour;\n\n  say( parse_colour("red") );  # #ff0000\n  say( parse_colour("#abc") ); # #aabbcc\n\n=head1 IMPLEMENTATION SUPPORT\n\nThis module is supported by all implementations of ZuzuScript.\n\n=head1 DESCRIPTION\n\nC<parse_colour> accepts three- and six-digit hexadecimal colours and the\nCSS3 extended colour keywords. It returns a lowercase six-digit\nhexadecimal colour string.\n\n=head1 EXPORTS\n\n=head2 Functions\n\n=over\n\n=item C<< parse_colour(String x) >>\n\nParameters: C<x> is a CSS colour keyword or a three- or six-digit\nhexadecimal colour string. Returns: C<String>. Returns the normalized\nlowercase C<#rrggbb> colour string, or throws if C<x> is not recognised.\n\n=back\n\n=head1 COPYRIGHT AND LICENCE\n\nB<< std/colour >> 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\nfrom std/string import trim;\n\nconst _COLOUR_KEYWORDS := {\n	aliceblue: "#f0f8ff",\n	antiquewhite: "#faebd7",\n	aqua: "#00ffff",\n	aquamarine: "#7fffd4",\n	azure: "#f0ffff",\n	beige: "#f5f5dc",\n	bisque: "#ffe4c4",\n	black: "#000000",\n	blanchedalmond: "#ffebcd",\n	blue: "#0000ff",\n	blueviolet: "#8a2be2",\n	brown: "#a52a2a",\n	burlywood: "#deb887",\n	cadetblue: "#5f9ea0",\n	chartreuse: "#7fff00",\n	chocolate: "#d2691e",\n	coral: "#ff7f50",\n	cornflowerblue: "#6495ed",\n	cornsilk: "#fff8dc",\n	crimson: "#dc143c",\n	cyan: "#00ffff",\n	darkblue: "#00008b",\n	darkcyan: "#008b8b",\n	darkgoldenrod: "#b8860b",\n	darkgray: "#a9a9a9",\n	darkgreen: "#006400",\n	darkgrey: "#a9a9a9",\n	darkkhaki: "#bdb76b",\n	darkmagenta: "#8b008b",\n	darkolivegreen: "#556b2f",\n	darkorange: "#ff8c00",\n	darkorchid: "#9932cc",\n	darkred: "#8b0000",\n	darksalmon: "#e9967a",\n	darkseagreen: "#8fbc8f",\n	darkslateblue: "#483d8b",\n	darkslategray: "#2f4f4f",\n	darkslategrey: "#2f4f4f",\n	darkturquoise: "#00ced1",\n	darkviolet: "#9400d3",\n	deeppink: "#ff1493",\n	deepskyblue: "#00bfff",\n	dimgray: "#696969",\n	dimgrey: "#696969",\n	dodgerblue: "#1e90ff",\n	firebrick: "#b22222",\n	floralwhite: "#fffaf0",\n	forestgreen: "#228b22",\n	fuchsia: "#ff00ff",\n	gainsboro: "#dcdcdc",\n	ghostwhite: "#f8f8ff",\n	gold: "#ffd700",\n	goldenrod: "#daa520",\n	gray: "#808080",\n	green: "#008000",\n	greenyellow: "#adff2f",\n	grey: "#808080",\n	honeydew: "#f0fff0",\n	hotpink: "#ff69b4",\n	indianred: "#cd5c5c",\n	indigo: "#4b0082",\n	ivory: "#fffff0",\n	khaki: "#f0e68c",\n	lavender: "#e6e6fa",\n	lavenderblush: "#fff0f5",\n	lawngreen: "#7cfc00",\n	lemonchiffon: "#fffacd",\n	lightblue: "#add8e6",\n	lightcoral: "#f08080",\n	lightcyan: "#e0ffff",\n	lightgoldenrodyellow: "#fafad2",\n	lightgray: "#d3d3d3",\n	lightgreen: "#90ee90",\n	lightgrey: "#d3d3d3",\n	lightpink: "#ffb6c1",\n	lightsalmon: "#ffa07a",\n	lightseagreen: "#20b2aa",\n	lightskyblue: "#87cefa",\n	lightslategray: "#778899",\n	lightslategrey: "#778899",\n	lightsteelblue: "#b0c4de",\n	lightyellow: "#ffffe0",\n	lime: "#00ff00",\n	limegreen: "#32cd32",\n	linen: "#faf0e6",\n	magenta: "#ff00ff",\n	maroon: "#800000",\n	mediumaquamarine: "#66cdaa",\n	mediumblue: "#0000cd",\n	mediumorchid: "#ba55d3",\n	mediumpurple: "#9370db",\n	mediumseagreen: "#3cb371",\n	mediumslateblue: "#7b68ee",\n	mediumspringgreen: "#00fa9a",\n	mediumturquoise: "#48d1cc",\n	mediumvioletred: "#c71585",\n	midnightblue: "#191970",\n	mintcream: "#f5fffa",\n	mistyrose: "#ffe4e1",\n	moccasin: "#ffe4b5",\n	navajowhite: "#ffdead",\n	navy: "#000080",\n	oldlace: "#fdf5e6",\n	olive: "#808000",\n	olivedrab: "#6b8e23",\n	orange: "#ffa500",\n	orangered: "#ff4500",\n	orchid: "#da70d6",\n	palegoldenrod: "#eee8aa",\n	palegreen: "#98fb98",\n	paleturquoise: "#afeeee",\n	palevioletred: "#db7093",\n	papayawhip: "#ffefd5",\n	peachpuff: "#ffdab9",\n	peru: "#cd853f",\n	pink: "#ffc0cb",\n	plum: "#dda0dd",\n	powderblue: "#b0e0e6",\n	purple: "#800080",\n	red: "#ff0000",\n	rosybrown: "#bc8f8f",\n	royalblue: "#4169e1",\n	saddlebrown: "#8b4513",\n	salmon: "#fa8072",\n	sandybrown: "#f4a460",\n	seagreen: "#2e8b57",\n	seashell: "#fff5ee",\n	sienna: "#a0522d",\n	silver: "#c0c0c0",\n	skyblue: "#87ceeb",\n	slateblue: "#6a5acd",\n	slategray: "#708090",\n	slategrey: "#708090",\n	snow: "#fffafa",\n	springgreen: "#00ff7f",\n	steelblue: "#4682b4",\n	tan: "#d2b48c",\n	teal: "#008080",\n	thistle: "#d8bfd8",\n	tomato: "#ff6347",\n	turquoise: "#40e0d0",\n	violet: "#ee82ee",\n	wheat: "#f5deb3",\n	white: "#ffffff",\n	whitesmoke: "#f5f5f5",\n	yellow: "#ffff00",\n	yellowgreen: "#9acd32",\n};\n\nfunction parse_colour ( String x ) {\n	let text := lc( trim(x) );\n\n	if ( text ~ /^#[0-9a-f]{6}$/ ) {\n		return text;\n	}\n\n	let short := text ~ /^#([0-9a-f])([0-9a-f])([0-9a-f])$/;\n	if ( short ) {\n		return "#"\n			_ short[1] _ short[1]\n			_ short[2] _ short[2]\n			_ short[3] _ short[3];\n	}\n\n	if ( _COLOUR_KEYWORDS.exists(text) ) {\n		return _COLOUR_KEYWORDS.get(text);\n	}\n\n	die `Invalid colour: ${x}`;\n}\n';
+        virtualFiles["/modules/std/colour.zzm"] = '=encoding utf8\n\n=head1 NAME\n\nstd/colour - Colour parsing helpers.\n\n=head1 SYNOPSIS\n\n  from std/colour import parse_colour;\n\n  say( parse_colour("red") );  # #ff0000\n  say( parse_colour("#abc") ); # #aabbcc\n\n=head1 IMPLEMENTATION SUPPORT\n\nThis module is supported by all implementations of ZuzuScript.\n\n=head1 DESCRIPTION\n\nC<parse_colour> accepts three- and six-digit hexadecimal colours and the\nCSS3 extended colour keywords. It returns a lowercase six-digit\nhexadecimal colour string.\n\n=head1 EXPORTS\n\n=head2 Functions\n\n=over\n\n=item C<< parse_colour(String x) >>\n\nParameters: C<x> is a CSS colour keyword or a three- or six-digit\nhexadecimal colour string. Returns: C<String>. Returns the normalized\nlowercase C<#rrggbb> colour string, or throws if C<x> is not recognised.\n\n=back\n\n=head1 COPYRIGHT AND LICENCE\n\nB<< std/colour >> 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\nfrom std/string import trim;\n\nconst _COLOUR_KEYWORDS := {\n	aliceblue: "#f0f8ff",\n	antiquewhite: "#faebd7",\n	aqua: "#00ffff",\n	aquamarine: "#7fffd4",\n	azure: "#f0ffff",\n	beige: "#f5f5dc",\n	bisque: "#ffe4c4",\n	black: "#000000",\n	blanchedalmond: "#ffebcd",\n	blue: "#0000ff",\n	blueviolet: "#8a2be2",\n	brown: "#a52a2a",\n	burlywood: "#deb887",\n	cadetblue: "#5f9ea0",\n	chartreuse: "#7fff00",\n	chocolate: "#d2691e",\n	coral: "#ff7f50",\n	cornflowerblue: "#6495ed",\n	cornsilk: "#fff8dc",\n	crimson: "#dc143c",\n	cyan: "#00ffff",\n	darkblue: "#00008b",\n	darkcyan: "#008b8b",\n	darkgoldenrod: "#b8860b",\n	darkgray: "#a9a9a9",\n	darkgreen: "#006400",\n	darkgrey: "#a9a9a9",\n	darkkhaki: "#bdb76b",\n	darkmagenta: "#8b008b",\n	darkolivegreen: "#556b2f",\n	darkorange: "#ff8c00",\n	darkorchid: "#9932cc",\n	darkred: "#8b0000",\n	darksalmon: "#e9967a",\n	darkseagreen: "#8fbc8f",\n	darkslateblue: "#483d8b",\n	darkslategray: "#2f4f4f",\n	darkslategrey: "#2f4f4f",\n	darkturquoise: "#00ced1",\n	darkviolet: "#9400d3",\n	deeppink: "#ff1493",\n	deepskyblue: "#00bfff",\n	dimgray: "#696969",\n	dimgrey: "#696969",\n	dodgerblue: "#1e90ff",\n	firebrick: "#b22222",\n	floralwhite: "#fffaf0",\n	forestgreen: "#228b22",\n	fuchsia: "#ff00ff",\n	gainsboro: "#dcdcdc",\n	ghostwhite: "#f8f8ff",\n	gold: "#ffd700",\n	goldenrod: "#daa520",\n	gray: "#808080",\n	green: "#008000",\n	greenyellow: "#adff2f",\n	grey: "#808080",\n	honeydew: "#f0fff0",\n	hotpink: "#ff69b4",\n	indianred: "#cd5c5c",\n	indigo: "#4b0082",\n	ivory: "#fffff0",\n	khaki: "#f0e68c",\n	lavender: "#e6e6fa",\n	lavenderblush: "#fff0f5",\n	lawngreen: "#7cfc00",\n	lemonchiffon: "#fffacd",\n	lightblue: "#add8e6",\n	lightcoral: "#f08080",\n	lightcyan: "#e0ffff",\n	lightgoldenrodyellow: "#fafad2",\n	lightgray: "#d3d3d3",\n	lightgreen: "#90ee90",\n	lightgrey: "#d3d3d3",\n	lightpink: "#ffb6c1",\n	lightsalmon: "#ffa07a",\n	lightseagreen: "#20b2aa",\n	lightskyblue: "#87cefa",\n	lightslategray: "#778899",\n	lightslategrey: "#778899",\n	lightsteelblue: "#b0c4de",\n	lightyellow: "#ffffe0",\n	lime: "#00ff00",\n	limegreen: "#32cd32",\n	linen: "#faf0e6",\n	magenta: "#ff00ff",\n	maroon: "#800000",\n	mediumaquamarine: "#66cdaa",\n	mediumblue: "#0000cd",\n	mediumorchid: "#ba55d3",\n	mediumpurple: "#9370db",\n	mediumseagreen: "#3cb371",\n	mediumslateblue: "#7b68ee",\n	mediumspringgreen: "#00fa9a",\n	mediumturquoise: "#48d1cc",\n	mediumvioletred: "#c71585",\n	midnightblue: "#191970",\n	mintcream: "#f5fffa",\n	mistyrose: "#ffe4e1",\n	moccasin: "#ffe4b5",\n	navajowhite: "#ffdead",\n	navy: "#000080",\n	oldlace: "#fdf5e6",\n	olive: "#808000",\n	olivedrab: "#6b8e23",\n	orange: "#ffa500",\n	orangered: "#ff4500",\n	orchid: "#da70d6",\n	palegoldenrod: "#eee8aa",\n	palegreen: "#98fb98",\n	paleturquoise: "#afeeee",\n	palevioletred: "#db7093",\n	papayawhip: "#ffefd5",\n	peachpuff: "#ffdab9",\n	peru: "#cd853f",\n	pink: "#ffc0cb",\n	plum: "#dda0dd",\n	powderblue: "#b0e0e6",\n	purple: "#800080",\n	rebeccapurple: "#663399",\n	red: "#ff0000",\n	rosybrown: "#bc8f8f",\n	royalblue: "#4169e1",\n	saddlebrown: "#8b4513",\n	salmon: "#fa8072",\n	sandybrown: "#f4a460",\n	seagreen: "#2e8b57",\n	seashell: "#fff5ee",\n	sienna: "#a0522d",\n	silver: "#c0c0c0",\n	skyblue: "#87ceeb",\n	slateblue: "#6a5acd",\n	slategray: "#708090",\n	slategrey: "#708090",\n	snow: "#fffafa",\n	springgreen: "#00ff7f",\n	steelblue: "#4682b4",\n	tan: "#d2b48c",\n	teal: "#008080",\n	thistle: "#d8bfd8",\n	tomato: "#ff6347",\n	turquoise: "#40e0d0",\n	violet: "#ee82ee",\n	wheat: "#f5deb3",\n	white: "#ffffff",\n	whitesmoke: "#f5f5f5",\n	yellow: "#ffff00",\n	yellowgreen: "#9acd32",\n};\n\nfunction parse_colour ( String x ) {\n	let text := lc( trim(x) );\n\n	if ( text ~ /^#[0-9a-f]{6}$/ ) {\n		return text;\n	}\n\n	let short := text ~ /^#([0-9a-f])([0-9a-f])([0-9a-f])$/;\n	if ( short ) {\n		return "#"\n			_ short[1] _ short[1]\n			_ short[2] _ short[2]\n			_ short[3] _ short[3];\n	}\n\n	if ( _COLOUR_KEYWORDS.exists(text) ) {\n		return _COLOUR_KEYWORDS.get(text);\n	}\n\n	die `Invalid colour: ${x}`;\n}\n';
         virtualFiles["/modules/std/result.zzm"] = "=encoding utf8\n\n=head1 NAME\n\nstd/result - A simple Result object for explicit success and failure values.\n\n=head1 SYNOPSIS\n\n  from std/result import Result;\n\n  let r := Result.ok(42);\n\n  if ( r.is_ok() ) {\n    say r.unwrap();\n  }\n\n=head1 IMPLEMENTATION SUPPORT\n\nThis module is supported by all implementations of ZuzuScript.\n\n=head1 DESCRIPTION\n\nC<Result> is a small, subclassable object modelled on a simplified version\nof Rust's C<Result> concept. It is useful when a function, task, or worker\nwants to return an explicit success or failure value without throwing an\nexception.\n\nIt is a normal ZuzuScript class. Workers do not require C<Result>; any value\nsupported by C<std/marshal> may be returned.\n\n=head1 EXPORTS\n\n=head2 Classes\n\n=over\n\n=item C<Result>\n\nContainer for either an ok value or an error value.\n\n=over\n\n=item C<< Result.ok(value) >>\n\nParameters: C<value> is any success value. Returns: C<Result>. Creates an\nok result wrapping C<value>.\n\n=item C<< Result.err(error) >>\n\nParameters: C<error> is any error value. Returns: C<Result>. Creates an\nerror result wrapping C<error>.\n\n=item C<< result.is_ok() >>\n\nParameters: none. Returns: C<Boolean>. Returns true when the result is an\nok value.\n\n=item C<< result.is_err() >>\n\nParameters: none. Returns: C<Boolean>. Returns true when the result is an\nerror value.\n\n=item C<< result.value() >>\n\nParameters: none. Returns: value. Returns the stored ok value, or\nC<null> for an error result.\n\n=item C<< result.error() >>\n\nParameters: none. Returns: value. Returns the stored error value, or\nC<null> for an ok result.\n\n=item C<< result.unwrap() >>\n\nParameters: none. Returns: value. Returns the ok value, or throws if the\nresult is an error.\n\n=item C<< result.unwrap_err() >>\n\nParameters: none. Returns: value. Returns the error value, or throws if\nthe result is ok.\n\n=back\n\n=back\n\n=head1 COPYRIGHT AND LICENCE\n\nB<< std/result >> 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\nclass Result {\n	let Boolean _is_ok := true;\n	let _value := null;\n	let _error := null;\n\n	static method ok ( value ) {\n		return new self(\n			_is_ok: true,\n			_value: value,\n			_error: null,\n		);\n	}\n\n	static method err ( error ) {\n		return new self(\n			_is_ok: false,\n			_value: null,\n			_error: error,\n		);\n	}\n\n	method is_ok () {\n		return _is_ok;\n	}\n\n	method is_err () {\n		return not _is_ok;\n	}\n\n	method value () {\n		return _value;\n	}\n\n	method error () {\n		return _error;\n	}\n\n	method unwrap () {\n		if ( _is_ok ) {\n			return _value;\n		}\n\n		die `called Result.unwrap() on an err value: ${_error}`;\n	}\n\n	method unwrap_err () {\n		if ( not _is_ok ) {\n			return _error;\n		}\n\n		die `called Result.unwrap_err() on an ok value: ${_value}`;\n	}\n}\n";
         virtualFiles["/modules/std/string/quoted_printable.zzm"] = '=encoding utf8\n\n=head1 NAME\n\nstd/string/quoted_printable - Quoted-printable encoders and decoders.\n\n=head1 SYNOPSIS\n\n  from std/string/quoted_printable import encode, decode;\n\n  let raw := to_binary( "Hello, world!\\r\\n" );\n\n  let text := encode(raw);\n  let bytes := decode(text);\n\n  let binary_text := encode(raw, binary: true);\n  let short_lines := encode(raw, line_length: 40, newline: "\\n");\n\n=head1 IMPLEMENTATION SUPPORT\n\nThis module is supported by all implementations of ZuzuScript.\n\n=head1 DESCRIPTION\n\nThis module provides quoted-printable encoding and decoding helpers for\nRFC 2045-style byte transport. Encoding returns ASCII C<String> text.\nDecoding returns a C<BinaryString>, because quoted-printable is a byte\ntransfer encoding rather than a Unicode text format.\n\nThe C<binary> option controls how input line break bytes are encoded.\nIn the default non-binary mode, CRLF, CR, and LF bytes are normalized to\nthe configured C<newline> string. In binary mode, CR and LF bytes are\nencoded as C<=0D> and C<=0A>.\n\n=head1 EXPORTS\n\n=head2 Functions\n\n=over\n\n=item * C<encode(BinaryString bytes, ... PairList options)>\n\nParameters: C<bytes> is binary input data and C<options> controls\nencoding. Returns: C<String>. Encodes C<bytes> as quoted-printable ASCII\ntext.\n\n=item * C<decode(String text, ... PairList options)>\n\nParameters: C<text> is quoted-printable text and C<options> controls\nstrictness. Returns: C<BinaryString>. Decodes quoted-printable text into\nbytes.\n\n=back\n\n=head1 OPTIONS\n\n=over\n\n=item * C<line_length>\n\nMaximum encoded line length. Defaults to C<76> and must be at least\nC<4>.\n\n=item * C<newline>\n\nOutput newline for hard line breaks and encoded soft breaks. Defaults\nto CRLF.\n\n=item * C<binary>\n\nWhen true, encode CR and LF bytes as C<=0D> and C<=0A>. Defaults to\nfalse.\n\n=item * C<strict>\n\nWhen true, malformed quoted-printable escape sequences throw during\ndecoding. Non-strict decoding preserves malformed escape text\nliterally.\n\n=back\n\n=head1 COPYRIGHT AND LICENCE\n\nB<< std/string/quoted_printable >> 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\n\nlet encode := null;\nlet decode := null;\n\n{\n	from std/string import chr, index, ord, substr;\n	from std/string/base64 import\n		encode as _base64_encode,\n		decode as _base64_decode;\n\n	let _B64_ALPHABET := "ABCDEFGHIJKLMNOPQRSTUVWXYZ"\n		_ "abcdefghijklmnopqrstuvwxyz0123456789+/";\n	let _HEX := "0123456789ABCDEF";\n\n	function _div_floor ( Number n, Number d ) {\n		return floor( n / d );\n	}\n\n	function _mod ( Number n, Number d ) {\n		return n - _div_floor( n, d ) * d;\n	}\n\n	function _bytes_to_binary ( Array bytes ) {\n		let out := "";\n		let i := 0;\n		let n := bytes.length();\n\n		while ( i < n ) {\n			let b0 := bytes[i];\n			let b1 := null;\n			let b2 := null;\n			if ( i + 1 < n ) {\n				b1 := bytes[i + 1];\n			}\n			if ( i + 2 < n ) {\n				b2 := bytes[i + 2];\n			}\n\n			let c0 := _div_floor( b0, 4 );\n			let c1 := _mod( b0, 4 ) * 16;\n			let c2 := 64;\n			let c3 := 64;\n\n			if ( not( b1 == null ) ) {\n				c1 += _div_floor( b1, 16 );\n				c2 := _mod( b1, 16 ) * 4;\n				if ( not( b2 == null ) ) {\n					c2 += _div_floor( b2, 64 );\n					c3 := _mod( b2, 64 );\n				}\n			}\n\n			out _= substr( _B64_ALPHABET, c0, 1 );\n			out _= substr( _B64_ALPHABET, c1, 1 );\n			out _= c2 == 64 ? "=" : substr( _B64_ALPHABET, c2, 1 );\n			out _= c3 == 64 ? "=" : substr( _B64_ALPHABET, c3, 1 );\n			i += 3;\n		}\n\n		return _base64_decode(out);\n	}\n\n	function _binary_to_bytes ( BinaryString raw ) {\n		let b64 := _base64_encode(raw);\n		let out := [];\n		let i := 0;\n		let n := length b64;\n\n		while ( i < n ) {\n			let c0 := index( _B64_ALPHABET, substr( b64, i, 1 ) );\n			let c1 := index( _B64_ALPHABET, substr( b64, i + 1, 1 ) );\n			let ch2 := substr( b64, i + 2, 1 );\n			let ch3 := substr( b64, i + 3, 1 );\n			let c2 := -1;\n			let c3 := -1;\n			if ( ch2 ne "=" ) {\n				c2 := index( _B64_ALPHABET, ch2 );\n			}\n			if ( ch3 ne "=" ) {\n				c3 := index( _B64_ALPHABET, ch3 );\n			}\n\n			out.push( c0 * 4 + _div_floor( c1, 16 ) );\n			if ( c2 >= 0 ) {\n				out.push( _mod( c1, 16 ) * 16 + _div_floor( c2, 4 ) );\n			}\n			if ( c3 >= 0 ) {\n				out.push( _mod( c2, 4 ) * 64 + c3 );\n			}\n\n			i += 4;\n		}\n\n		return out;\n	}\n\n	function _parse_options ( PairList options ) {\n		let line_length := 76;\n		let newline := "\\r\\n";\n		let binary := false;\n		let strict := false;\n\n		for ( let option in options.enumerate() ) {\n			let key := option.key;\n			let value := option.value;\n\n			if ( key eq "line_length" ) {\n				line_length := value;\n			}\n			else if ( key eq "newline" ) {\n				newline := value;\n			}\n			else if ( key eq "binary" ) {\n				binary := value;\n			}\n			else if ( key eq "strict" ) {\n				strict := value;\n			}\n			else {\n				die `quoted_printable option \'${key}\' is not supported`;\n			}\n		}\n\n		if ( not( line_length instanceof Number ) ) {\n			die "quoted_printable line_length option expects Number";\n		}\n		if ( line_length < 4 ) {\n			die "quoted_printable line_length option must be at least 4";\n		}\n		if ( not( newline instanceof String ) ) {\n			die "quoted_printable newline option expects String";\n		}\n		if ( not( binary instanceof Boolean ) ) {\n			die "quoted_printable binary option expects Boolean";\n		}\n		if ( not( strict instanceof Boolean ) ) {\n			die "quoted_printable strict option expects Boolean";\n		}\n\n		return {\n			line_length: int(line_length),\n			newline: newline,\n			binary: binary,\n			strict: strict,\n		};\n	}\n\n	function _is_safe_literal ( Number b ) {\n		return ( b >= 33 and b <= 60 ) or ( b >= 62 and b <= 126 );\n	}\n\n	function _byte_to_hex_token ( Number b ) {\n		return "="\n			_ substr( _HEX, _div_floor( b, 16 ), 1 )\n			_ substr( _HEX, _mod( b, 16 ), 1 );\n	}\n\n	function _simple_token_length ( Number b, Boolean final_byte ) {\n		if ( ( b == 9 or b == 32 ) and not final_byte ) {\n			return 1;\n		}\n		if ( _is_safe_literal(b) ) {\n			return 1;\n		}\n		return 3;\n	}\n\n	function _space_tab_needs_escape (\n		Array bytes,\n		Number i,\n		Number column,\n		Number line_length,\n	) {\n		let n := bytes.length();\n		if ( i + 1 >= n ) {\n			return true;\n		}\n\n		let j := i + 1;\n		while ( j < n and ( bytes[j] == 9 or bytes[j] == 32 ) ) {\n			j++;\n		}\n		if ( j >= n ) {\n			return true;\n		}\n\n		let next_is_final := i + 2 >= n;\n		let next_len := _simple_token_length( bytes[i + 1], next_is_final );\n		let max := next_is_final ? line_length : line_length - 1;\n		return column + 1 + next_len > max;\n	}\n\n	function _token_for_byte (\n		Array bytes,\n		Number i,\n		Number column,\n		Number line_length,\n	) {\n		let b := bytes[i];\n\n		if ( b == 9 or b == 32 ) {\n			if ( _space_tab_needs_escape( bytes, i, column, line_length ) ) {\n				return _byte_to_hex_token(b);\n			}\n			return chr(b);\n		}\n\n		if ( _is_safe_literal(b) ) {\n			return chr(b);\n		}\n\n		return _byte_to_hex_token(b);\n	}\n\n	function _emit_token (\n		String out,\n		Number column,\n		String token,\n		Boolean more_after,\n		Number line_length,\n		String newline,\n	) {\n		let max := more_after ? line_length - 1 : line_length;\n		let updated_out := out;\n		let updated_column := column;\n\n		if ( updated_column > 0 and updated_column + ( length token ) > max ) {\n			updated_out _= "=" _ newline;\n			updated_column := 0;\n		}\n\n		updated_out _= token;\n		updated_column += length token;\n\n		return [ updated_out, updated_column ];\n	}\n\n	function _encode_segment (\n		Array bytes,\n		Number line_length,\n		String newline,\n	) {\n		let out := "";\n		let column := 0;\n		let i := 0;\n		let n := bytes.length();\n\n		while ( i < n ) {\n			let token := _token_for_byte( bytes, i, column, line_length );\n			let emitted := _emit_token(\n				out,\n				column,\n				token,\n				i + 1 < n,\n				line_length,\n				newline,\n			);\n			out := emitted[0];\n			column := emitted[1];\n			i++;\n		}\n\n		return out;\n	}\n\n	function _encode_text_bytes (\n		Array bytes,\n		Number line_length,\n		String newline,\n	) {\n		let out := "";\n		let line := [];\n		let i := 0;\n		let n := bytes.length();\n\n		while ( i < n ) {\n			let b := bytes[i];\n			if ( b == 13 or b == 10 ) {\n				out _= _encode_segment( line, line_length, newline );\n				out _= newline;\n				line := [];\n\n				if ( b == 13 and i + 1 < n and bytes[i + 1] == 10 ) {\n					i++;\n				}\n			}\n			else {\n				line.push(b);\n			}\n\n			i++;\n		}\n\n		out _= _encode_segment( line, line_length, newline );\n		return out;\n	}\n\n	function _hex_value ( String ch ) {\n		let cp := ord(ch);\n		if ( cp >= 48 and cp <= 57 ) {\n			return cp - 48;\n		}\n		if ( cp >= 65 and cp <= 70 ) {\n			return cp - 55;\n		}\n		if ( cp >= 97 and cp <= 102 ) {\n			return cp - 87;\n		}\n		return -1;\n	}\n\n	function _decode_text_bytes ( String text, Boolean strict ) {\n		let out := [];\n		let i := 0;\n		let n := length text;\n\n		while ( i < n ) {\n			let ch := substr( text, i, 1 );\n			let cp := ord( text, i );\n\n			if ( cp > 127 ) {\n				die "quoted_printable.decode rejects non-ASCII input";\n			}\n\n			if ( ch eq "=" ) {\n				if ( i + 1 >= n ) {\n					die "malformed quoted-printable escape" if strict;\n					out.push(61);\n					i++;\n					next;\n				}\n\n				let ch1 := substr( text, i + 1, 1 );\n				if ( ch1 eq "\\r" ) {\n					if ( i + 2 < n and substr( text, i + 2, 1 ) eq "\\n" ) {\n						i += 3;\n					}\n					else {\n						i += 2;\n					}\n					next;\n				}\n				if ( ch1 eq "\\n" ) {\n					i += 2;\n					next;\n				}\n\n				if ( i + 2 < n ) {\n					let hi := _hex_value(ch1);\n					let lo := _hex_value( substr( text, i + 2, 1 ) );\n					if ( hi >= 0 and lo >= 0 ) {\n						out.push( hi * 16 + lo );\n						i += 3;\n						next;\n					}\n				}\n\n				die "malformed quoted-printable escape" if strict;\n				out.push(61);\n				i++;\n				next;\n			}\n\n			out.push(cp);\n			i++;\n		}\n\n		return out;\n	}\n\n	encode := function ( BinaryString bytes, ... PairList options ) {\n		let opts := _parse_options(options);\n		let raw := _binary_to_bytes(bytes);\n\n		if ( opts{binary} ) {\n			return _encode_segment(\n				raw,\n				opts{line_length},\n				opts{newline},\n			);\n		}\n\n		return _encode_text_bytes(\n			raw,\n			opts{line_length},\n			opts{newline},\n		);\n	};\n\n	decode := function ( String text, ... PairList options ) {\n		let opts := _parse_options(options);\n		return _bytes_to_binary( _decode_text_bytes( text, opts{strict} ) );\n	};\n}\n';
         virtualFiles["/modules/std/gui.zzm"] = '=encoding utf8\n\n=head1 NAME\n\nstd/gui - User-facing GUI constructor helpers.\n\n=head1 SYNOPSIS\n\n  from std/gui import *;\n\n  let w := Window(\n  	title: "Demo",\n  	VBox(\n  		Label( text: "Name:" ),\n  		Input( id: "name" ),\n  		Button( text: "OK", id: "submit" ),\n  	),\n  );\n\n=head1 IMPLEMENTATION SUPPORT\n\nThis module is supported by zuzu.pl, zuzu-rust, and zuzu-js on Electron.\nIt is not supported by zuzu-js on Node. It is partially supported by\nzuzu-js in the browser: core GUI and widget lifecycle coverage passes,\nbut filesystem-backed file and directory dialogue coverage is unsupported.\n\n=head1 DESCRIPTION\n\nThis module provides thin constructor helpers over C<std/gui/objects>.\nHost runtimes expose the shared widget, object tree, event, and window\nlifecycle APIs when GUI support is available. It also re-exports\nbackend-native file and directory dialogue hooks for C<std/gui/dialogue>.\n\nThe module exports C<EM>, the standard UI font height in logical\npixels, derived from C<std/gui/objects> metadata.\n\n=head1 EXPORTS\n\n=head2 Constants\n\n=over\n\n=item C<EM>\n\nType: C<Number>. Standard UI font height in logical pixels.\n\n=item C<GUI_XML_NS>\n\nType: C<String>. XML namespace URI used by GUI XML serialization and\nparsing.\n\n=back\n\n=head2 Functions\n\n=over\n\n=item C<< Window(... PairList p, Array c) >>, C<< VBox(... PairList p, Array c) >>, C<< HBox(... PairList p, Array c) >>, C<< Frame(... PairList p, Array c) >>\n\nParameters: C<p> are widget properties and C<c> contains child widgets.\nReturns: widget object. Constructs window and layout widgets.\n\n=item C<< Label(... PairList p, Array c) >>, C<< Text(... PairList p, Array c) >>, C<< RichText(... PairList p, Array c) >>, C<< Image(... PairList p, Array c) >>\n\nParameters: C<p> are widget properties and C<c> contains child widgets.\nReturns: widget object. Constructs content widgets.\n\n=item C<< Input(... PairList p, Array c) >>, C<< DatePicker(... PairList p, Array c) >>, C<< Checkbox(... PairList p, Array c) >>, C<< Radio(... PairList p, Array c) >>, C<< RadioGroup(... PairList p, Array c) >>, C<< Select(... PairList p, Array c) >>\n\nParameters: C<p> are widget properties and C<c> contains child widgets.\nReturns: widget object. Constructs input widgets.\n\n=item C<< Menu(... PairList p, Array c) >>, C<< MenuItem(... PairList p, Array c) >>, C<< Button(... PairList p, Array c) >>, C<< Separator(... PairList p, Array c) >>, C<< Slider(... PairList p, Array c) >>, C<< Progress(... PairList p, Array c) >>\n\nParameters: C<p> are widget properties and C<c> contains child widgets.\nReturns: widget object. Constructs command and control widgets.\n\n=item C<< Tabs(... PairList p, Array c) >>, C<< Tab(... PairList p, Array c) >>, C<< ListView(... PairList p, Array c) >>, C<< TreeView(... PairList p, Array c) >>\n\nParameters: C<p> are widget properties and C<c> contains child widgets.\nReturns: widget object. Constructs tabular and collection widgets.\n\n=item C<< unbind(BindingToken token) >>\n\nParameters: C<token> is a binding token. Returns: C<null>. Removes a GUI\nbinding.\n\n=item C<< gui_from_xml(String xml) >>, C<< gui_from_xml_file(path) >>\n\nParameters: C<xml> is GUI XML text and C<path> is a file path. Returns:\nwidget object. Builds a GUI object tree from XML.\n\n=item C<< gui_to_xml(Widget root) >>\n\nParameters: C<root> is a GUI widget. Returns: C<String>. Serializes a\nGUI object tree to XML.\n\n=back\n\n=head2 Classes\n\n=over\n\n=item C<BindingToken>\n\nRepresents a model/widget binding.\n\n=over\n\n=item C<< token.is_active() >>\n\nParameters: none. Returns: C<Boolean>. Returns true while the binding is\nactive.\n\n=item C<< token.set_listener(token) >>\n\nParameters: C<token> is a listener token. Returns: C<BindingToken>.\nStores the listener token associated with the binding.\n\n=item C<< token.sync_model_to_widget() >>, C<< token.sync_widget_to_model() >>\n\nParameters: none. Returns: C<null>. Synchronizes the bound values.\n\n=item C<< token.unbind() >>\n\nParameters: none. Returns: C<null>. Removes the binding.\n\n=back\n\n=back\n\n=head1 COPYRIGHT AND LICENCE\n\nB<< std/gui >> 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\nfrom std/gui/objects import\n	Window as _WindowClass,\n	VBox as _VBoxClass,\n	HBox as _HBoxClass,\n	Frame as _FrameClass,\n	Label as _LabelClass,\n	Text as _TextClass,\n	RichText as _RichTextClass,\n	Image as _ImageClass,\n	Input as _InputClass,\n	DatePicker as _DatePickerClass,\n	Checkbox as _CheckboxClass,\n	Radio as _RadioClass,\n	RadioGroup as _RadioGroupClass,\n	Select as _SelectClass,\n	Menu as _MenuClass,\n	MenuItem as _MenuItemClass,\n	Button as _ButtonClass,\n	Separator as _SeparatorClass,\n	Slider as _SliderClass,\n	Progress as _ProgressClass,\n	Tabs as _TabsClass,\n	Tab as _TabClass,\n	ListView as _ListViewClass,\n	TreeView as _TreeViewClass,\n	Widget,\n	Event,\n	ListenerToken,\n	native_file_open,\n	native_file_save,\n	native_directory_open,\n	native_directory_save,\n	native_colour_picker,\n	meta as _gui_meta;\n\nfrom std/gui/objects try import\n	native_alert,\n	native_confirm,\n	native_prompt;\n\nfrom std/data/xml import XML;\nfrom std/data/xml/escape import escape_xml;\nfrom std/internals import getupperprop;\nfrom std/path/zz import ZZPath;\nfrom std/string import join, split, substr, trim;\n\n\nconst Number EM := _gui_meta{font_size_pixels};\n\nfunction _assert_known_props ( String ctor, PairList props, Array allowed ) {\n	let geometry := [\n		"width",\n		"height",\n		"minwidth",\n		"minheight",\n		"maxwidth",\n		"maxheight",\n	];\n	for ( let key in props.keys() ) {\n		if ( key \u2209 allowed and key \u2209 geometry ) {\n			die `GUI_PROP_UNKNOWN: ${ctor} does not accept property \'${key}\'`;\n		}\n	}\n}\n\nfunction _assert_prop_value ( String ctor, String prop, value, Array allowed ) {\n	if ( value \u2209 allowed ) {\n		die `GUI_PROP_TYPE: ${ctor} property \'${prop}\' has invalid value`;\n	}\n}\n\nfunction _assert_prop_array ( String ctor, String prop, value ) {\n	if ( not( value instanceof Array ) ) {\n		die `GUI_PROP_TYPE: ${ctor} property \'${prop}\' expects Array`;\n	}\n}\n\nfunction _with_geometry_props ( Array allowed ) {\n	for ( let key in [\n		"width",\n		"height",\n		"minwidth",\n		"minheight",\n		"maxwidth",\n		"maxheight",\n	] ) {\n		allowed.push(key) unless key \u2208 allowed;\n	}\n	return allowed;\n}\n\nfunction _apply_geometry ( Widget widget, PairList p ) {\n	for ( let key in [\n		"width",\n		"height",\n		"minwidth",\n		"minheight",\n		"maxwidth",\n		"maxheight",\n	] ) {\n		if ( p.has(key) ) {\n			widget.(key)( p.get(key) );\n		}\n	}\n	return widget;\n}\n\nfunction Window ( ... PairList p, Array c ) {\n	_assert_known_props(\n		"Window",\n		p,\n		_with_geometry_props( [\n			"id",\n			"title",\n			"width",\n			"height",\n			"resizable",\n			"modal",\n			"visible",\n			"enabled",\n			"disabled",\n		] ),\n	);\n\n	return new _WindowClass(\n		id: p.get( "id", null ),\n		title: p.get( "title", "" ),\n		width: p.get( "width", 800 ),\n		height: p.get( "height", 600 ),\n		minwidth: p.get( "minwidth", null ),\n		minheight: p.get( "minheight", null ),\n		maxwidth: p.get( "maxwidth", null ),\n		maxheight: p.get( "maxheight", null ),\n		resizable: p.get( "resizable", true ),\n		modal: p.get( "modal", false ),\n		visible: p.get( "visible", true ),\n		enabled: p.get( "enabled", true ),\n		disabled: p.get( "disabled", false ),\n		children: c,\n	);\n}\n\nfunction VBox ( ... PairList p, Array c ) {\n	_assert_known_props(\n		"VBox",\n		p,\n		[\n			"id",\n			"align",\n			"gap",\n			"padding",\n			"visible",\n			"enabled",\n			"disabled",\n		],\n	);\n\n	_assert_prop_value(\n		"VBox",\n		"align",\n		p.get( "align", "top" ),\n		[ "top", "centre", "bottom", "stretch" ],\n	);\n\n	return _apply_geometry( new _VBoxClass(\n		id: p.get( "id", null ),\n		align: p.get( "align", "top" ),\n		gap: p.get( "gap", 0 ),\n		padding: p.get( "padding", 0 ),\n		visible: p.get( "visible", true ),\n		enabled: p.get( "enabled", true ),\n		disabled: p.get( "disabled", false ),\n		children: c,\n	), p );\n}\n\nfunction HBox ( ... PairList p, Array c ) {\n	_assert_known_props(\n		"HBox",\n		p,\n		_with_geometry_props( [\n			"id",\n			"align",\n			"gap",\n			"padding",\n			"visible",\n			"enabled",\n			"disabled",\n		] ),\n	);\n\n	_assert_prop_value(\n		"HBox",\n		"align",\n		p.get( "align", "left" ),\n		[ "left", "centre", "right", "stretch" ],\n	);\n\n	return new _HBoxClass(\n		id: p.get( "id", null ),\n		align: p.get( "align", "left" ),\n		gap: p.get( "gap", 0 ),\n		padding: p.get( "padding", 0 ),\n		width: p.get( "width", null ),\n		height: p.get( "height", null ),\n		minwidth: p.get( "minwidth", null ),\n		minheight: p.get( "minheight", null ),\n		maxwidth: p.get( "maxwidth", null ),\n		maxheight: p.get( "maxheight", null ),\n		visible: p.get( "visible", true ),\n		enabled: p.get( "enabled", true ),\n		disabled: p.get( "disabled", false ),\n		children: c,\n	);\n}\n\nfunction Frame ( ... PairList p, Array c ) {\n	_assert_known_props(\n		"Frame",\n		p,\n		[\n			"id",\n			"label",\n			"collapsible",\n			"collapsed",\n			"visible",\n			"enabled",\n			"disabled",\n		],\n	);\n\n	return _apply_geometry( new _FrameClass(\n		id: p.get( "id", null ),\n		label: p.get( "label", "" ),\n		collapsible: p.get( "collapsible", false ),\n		collapsed: p.get( "collapsed", false ),\n		visible: p.get( "visible", true ),\n		enabled: p.get( "enabled", true ),\n		disabled: p.get( "disabled", false ),\n		children: c,\n	), p );\n}\n\nfunction Label ( ... PairList p, Array c ) {\n	_assert_known_props(\n		"Label",\n		p,\n		[ "id", "text", "for", "visible", "enabled", "disabled" ],\n	);\n\n	let label := new _LabelClass(\n		id: p.get( "id", null ),\n		text: p.get( "text", "" ),\n		visible: p.get( "visible", true ),\n		enabled: p.get( "enabled", true ),\n		disabled: p.get( "disabled", false ),\n		children: c,\n	);\n	if ( p.has("for") ) {\n		label.set_for_id( p.get( "for", null ) );\n	}\n\n	return _apply_geometry( label, p );\n}\n\nfunction Text ( ... PairList p, Array c ) {\n	_assert_known_props(\n		"Text",\n		p,\n		[\n			"id",\n			"value",\n			"multiline",\n			"readonly",\n			"wrap",\n			"visible",\n			"enabled",\n			"disabled",\n		],\n	);\n\n	return _apply_geometry( new _TextClass(\n		id: p.get( "id", null ),\n		value: p.get( "value", "" ),\n		multiline: p.get( "multiline", false ),\n		readonly: p.get( "readonly", false ),\n		wrap: p.get( "wrap", true ),\n		visible: p.get( "visible", true ),\n		enabled: p.get( "enabled", true ),\n		disabled: p.get( "disabled", false ),\n		children: c,\n	), p );\n}\n\nfunction RichText ( ... PairList p, Array c ) {\n	_assert_known_props(\n		"RichText",\n		p,\n		[\n			"id",\n			"value",\n			"multiline",\n			"readonly",\n			"visible",\n			"enabled",\n			"disabled",\n		],\n	);\n\n	return _apply_geometry( new _RichTextClass(\n		id: p.get( "id", null ),\n		value: p.get( "value", "" ),\n		multiline: p.get( "multiline", true ),\n		readonly: p.get( "readonly", true ),\n		visible: p.get( "visible", true ),\n		enabled: p.get( "enabled", true ),\n		disabled: p.get( "disabled", false ),\n		children: c,\n	), p );\n}\n\nfunction Image ( ... PairList p, Array c ) {\n	_assert_known_props(\n		"Image",\n		p,\n		[ "id", "src", "alt", "fit", "visible", "enabled", "disabled" ],\n	);\n\n	_assert_prop_value(\n		"Image",\n		"fit",\n		p.get( "fit", "none" ),\n		[ "none", "contain", "cover", "stretch" ],\n	);\n\n	return _apply_geometry( new _ImageClass(\n		id: p.get( "id", null ),\n		src: p.get( "src", "" ),\n		alt: p.get( "alt", "" ),\n		fit: p.get( "fit", "none" ),\n		visible: p.get( "visible", true ),\n		enabled: p.get( "enabled", true ),\n		disabled: p.get( "disabled", false ),\n		children: c,\n	), p );\n}\n\nfunction Input ( ... PairList p, Array c ) {\n	_assert_known_props(\n		"Input",\n		p,\n		[\n			"id",\n			"value",\n			"placeholder",\n			"multiline",\n			"readonly",\n			"password",\n			"required",\n			"visible",\n			"enabled",\n			"disabled",\n		],\n	);\n\n	return _apply_geometry( new _InputClass(\n		id: p.get( "id", null ),\n		value: p.get( "value", "" ),\n		placeholder: p.get( "placeholder", "" ),\n		multiline: p.get( "multiline", false ),\n		readonly: p.get( "readonly", false ),\n		password: p.get( "password", false ),\n		required: p.get( "required", false ),\n		visible: p.get( "visible", true ),\n		enabled: p.get( "enabled", true ),\n		disabled: p.get( "disabled", false ),\n		children: c,\n	), p );\n}\n\nfunction DatePicker ( ... PairList p, Array c ) {\n	_assert_known_props(\n		"DatePicker",\n		p,\n		[\n			"id",\n			"value",\n			"min",\n			"max",\n			"first_day_of_week",\n			"visible",\n			"enabled",\n			"disabled",\n		],\n	);\n\n	return _apply_geometry( new _DatePickerClass(\n		id: p.get( "id", null ),\n		value: p.get( "value", null ),\n		min: p.get( "min", null ),\n		max: p.get( "max", null ),\n		first_day_of_week: p.get( "first_day_of_week", 0 ),\n		visible: p.get( "visible", true ),\n		enabled: p.get( "enabled", true ),\n		disabled: p.get( "disabled", false ),\n		children: c,\n	), p );\n}\n\nfunction Checkbox ( ... PairList p, Array c ) {\n	_assert_known_props(\n		"Checkbox",\n		p,\n		[\n			"id",\n			"label",\n			"checked",\n			"indeterminate",\n			"visible",\n			"enabled",\n			"disabled",\n		],\n	);\n\n	return _apply_geometry( new _CheckboxClass(\n		id: p.get( "id", null ),\n		label: p.get( "label", "" ),\n		checked: p.get( "checked", false ),\n		indeterminate: p.get( "indeterminate", false ),\n		visible: p.get( "visible", true ),\n		enabled: p.get( "enabled", true ),\n		disabled: p.get( "disabled", false ),\n		children: c,\n	), p );\n}\n\nfunction Radio ( ... PairList p, Array c ) {\n	_assert_known_props(\n		"Radio",\n		p,\n		[\n			"id",\n			"label",\n			"value",\n			"group",\n			"checked",\n			"visible",\n			"enabled",\n			"disabled",\n		],\n	);\n\n	return _apply_geometry( new _RadioClass(\n		id: p.get( "id", null ),\n		label: p.get( "label", "" ),\n		value: p.get( "value", "" ),\n		group: p.get( "group", null ),\n		checked: p.get( "checked", false ),\n		visible: p.get( "visible", true ),\n		enabled: p.get( "enabled", true ),\n		disabled: p.get( "disabled", false ),\n		children: c,\n	), p );\n}\n\nfunction RadioGroup ( ... PairList p, Array c ) {\n	_assert_known_props(\n		"RadioGroup",\n		p,\n		[\n			"id",\n			"name",\n			"value",\n			"visible",\n			"enabled",\n			"disabled",\n		],\n	);\n\n	return _apply_geometry( new _RadioGroupClass(\n		id: p.get( "id", null ),\n		name: p.get( "name", "" ),\n		value: p.get( "value", null ),\n		visible: p.get( "visible", true ),\n		enabled: p.get( "enabled", true ),\n		disabled: p.get( "disabled", false ),\n		children: c,\n	), p );\n}\n\nfunction Select ( ... PairList p, Array c ) {\n	_assert_known_props(\n		"Select",\n		p,\n		[\n			"id",\n			"value",\n			"options",\n			"multiple",\n			"visible",\n			"enabled",\n			"disabled",\n		],\n	);\n\n	if ( p.has("options") ) {\n		_assert_prop_array( "Select", "options", p.get("options") );\n	}\n\n	return _apply_geometry( new _SelectClass(\n		id: p.get( "id", null ),\n		value: p.get( "value", null ),\n		options: p.get( "options", [] ),\n		multiple: p.get( "multiple", false ),\n		visible: p.get( "visible", true ),\n		enabled: p.get( "enabled", true ),\n		disabled: p.get( "disabled", false ),\n		children: c,\n	), p );\n}\n\nfunction Menu ( ... PairList p, Array c ) {\n	_assert_known_props(\n		"Menu",\n		p,\n		[ "id", "text", "visible", "enabled", "disabled" ],\n	);\n\n	return _apply_geometry( new _MenuClass(\n		id: p.get( "id", null ),\n		text: p.get( "text", "" ),\n		visible: p.get( "visible", true ),\n		enabled: p.get( "enabled", true ),\n		disabled: p.get( "disabled", false ),\n		children: c,\n	), p );\n}\n\nfunction MenuItem ( ... PairList p, Array c ) {\n	_assert_known_props(\n		"MenuItem",\n		p,\n		[ "id", "text", "disabled", "visible", "enabled" ],\n	);\n\n	return _apply_geometry( new _MenuItemClass(\n		id: p.get( "id", null ),\n		text: p.get( "text", "" ),\n		visible: p.get( "visible", true ),\n		enabled: p.get( "enabled", true ),\n		disabled: p.get( "disabled", false ),\n		children: c,\n	), p );\n}\n\nfunction Button ( ... PairList p, Array c ) {\n	_assert_known_props(\n		"Button",\n		p,\n		_with_geometry_props( [\n			"id",\n			"text",\n			"variant",\n			"visible",\n			"enabled",\n			"disabled",\n		] ),\n	);\n\n	_assert_prop_value(\n		"Button",\n		"variant",\n		p.get( "variant", "default" ),\n		[ "default", "primary", "danger" ],\n	);\n\n	return new _ButtonClass(\n		id: p.get( "id", null ),\n		text: p.get( "text", "" ),\n		variant: p.get( "variant", "default" ),\n		width: p.get( "width", null ),\n		height: p.get( "height", null ),\n		minwidth: p.get( "minwidth", null ),\n		minheight: p.get( "minheight", null ),\n		maxwidth: p.get( "maxwidth", null ),\n		maxheight: p.get( "maxheight", null ),\n		visible: p.get( "visible", true ),\n		enabled: p.get( "enabled", true ),\n		disabled: p.get( "disabled", false ),\n		children: c,\n	);\n}\n\nfunction Separator ( ... PairList p, Array c ) {\n	_assert_known_props(\n		"Separator",\n		p,\n		[ "id", "orientation", "visible", "enabled", "disabled" ],\n	);\n\n	_assert_prop_value(\n		"Separator",\n		"orientation",\n		p.get( "orientation", "horizontal" ),\n		[ "horizontal", "vertical" ],\n	);\n\n	return _apply_geometry( new _SeparatorClass(\n		id: p.get( "id", null ),\n		orientation: p.get( "orientation", "horizontal" ),\n		visible: p.get( "visible", true ),\n		enabled: p.get( "enabled", true ),\n		disabled: p.get( "disabled", false ),\n		children: c,\n	), p );\n}\n\nfunction Slider ( ... PairList p, Array c ) {\n	_assert_known_props(\n		"Slider",\n		p,\n		[\n			"id",\n			"value",\n			"min",\n			"max",\n			"step",\n			"orientation",\n			"readonly",\n			"visible",\n			"enabled",\n			"disabled",\n		],\n	);\n\n	_assert_prop_value(\n		"Slider",\n		"orientation",\n		p.get( "orientation", "horizontal" ),\n		[ "horizontal", "vertical" ],\n	);\n\n	return _apply_geometry( new _SliderClass(\n		id: p.get( "id", null ),\n		value: p.get( "value", 0 ),\n		min: p.get( "min", 0 ),\n		max: p.get( "max", 100 ),\n		step: p.get( "step", 1 ),\n		orientation: p.get( "orientation", "horizontal" ),\n		readonly: p.get( "readonly", false ),\n		visible: p.get( "visible", true ),\n		enabled: p.get( "enabled", true ),\n		disabled: p.get( "disabled", false ),\n		children: c,\n	), p );\n}\n\nfunction Progress ( ... PairList p, Array c ) {\n	_assert_known_props(\n		"Progress",\n		p,\n		[\n			"id",\n			"value",\n			"min",\n			"max",\n			"indeterminate",\n			"show_text",\n			"visible",\n			"enabled",\n			"disabled",\n		],\n	);\n\n	return _apply_geometry( new _ProgressClass(\n		id: p.get( "id", null ),\n		value: p.get( "value", 0 ),\n		min: p.get( "min", 0 ),\n		max: p.get( "max", 100 ),\n		indeterminate: p.get( "indeterminate", false ),\n		show_text: p.get( "show_text", false ),\n		visible: p.get( "visible", true ),\n		enabled: p.get( "enabled", true ),\n		disabled: p.get( "disabled", false ),\n		children: c,\n	), p );\n}\n\nfunction Tabs ( ... PairList p, Array c ) {\n	_assert_known_props(\n		"Tabs",\n		p,\n		[\n			"id",\n			"selected",\n			"placement",\n			"visible",\n			"enabled",\n			"disabled",\n		],\n	);\n\n	_assert_prop_value(\n		"Tabs",\n		"placement",\n		p.get( "placement", "top" ),\n		[ "top", "bottom", "left", "right" ],\n	);\n\n	return _apply_geometry( new _TabsClass(\n		id: p.get( "id", null ),\n		selected: p.get( "selected", null ),\n		placement: p.get( "placement", "top" ),\n		visible: p.get( "visible", true ),\n		enabled: p.get( "enabled", true ),\n		disabled: p.get( "disabled", false ),\n		children: c,\n	), p );\n}\n\nfunction Tab ( ... PairList p, Array c ) {\n	_assert_known_props(\n		"Tab",\n		p,\n		[\n			"id",\n			"title",\n			"value",\n			"selected",\n			"closable",\n			"icon",\n			"visible",\n			"enabled",\n			"disabled",\n		],\n	);\n\n	return _apply_geometry( new _TabClass(\n		id: p.get( "id", null ),\n		title: p.get( "title", "" ),\n		value: p.get( "value", "" ),\n		selected: p.get( "selected", false ),\n		closable: p.get( "closable", false ),\n		icon: p.get( "icon", null ),\n		visible: p.get( "visible", true ),\n		enabled: p.get( "enabled", true ),\n		disabled: p.get( "disabled", false ),\n		children: c,\n	), p );\n}\n\nfunction ListView ( ... PairList p, Array c ) {\n	_assert_known_props(\n		"ListView",\n		p,\n		[\n			"id",\n			"items",\n			"selected_index",\n			"multiple",\n			"visible",\n			"enabled",\n			"disabled",\n		],\n	);\n\n	if ( p.has("items") ) {\n		_assert_prop_array( "ListView", "items", p.get("items") );\n	}\n\n	return _apply_geometry( new _ListViewClass(\n		id: p.get( "id", null ),\n		items: p.get( "items", [] ),\n		selected_index: p.get( "selected_index", null ),\n		multiple: p.get( "multiple", false ),\n		visible: p.get( "visible", true ),\n		enabled: p.get( "enabled", true ),\n		disabled: p.get( "disabled", false ),\n		children: c,\n	), p );\n}\n\nfunction TreeView ( ... PairList p, Array c ) {\n	_assert_known_props(\n		"TreeView",\n		p,\n		[\n			"id",\n			"items",\n			"selected_path",\n			"multiple",\n			"visible",\n			"enabled",\n			"disabled",\n		],\n	);\n\n	if ( p.has("items") ) {\n		_assert_prop_array( "TreeView", "items", p.get("items") );\n	}\n	if ( p.has("selected_path") ) {\n		_assert_prop_array( "TreeView", "selected_path", p.get("selected_path") );\n	}\n\n	return _apply_geometry( new _TreeViewClass(\n		id: p.get( "id", null ),\n		items: p.get( "items", [] ),\n		selected_path: p.get( "selected_path", [] ),\n		multiple: p.get( "multiple", false ),\n		visible: p.get( "visible", true ),\n		enabled: p.get( "enabled", true ),\n		disabled: p.get( "disabled", false ),\n		children: c,\n	), p );\n}\n\nfunction _binding_path_class ( path_class ) {\n	if ( path_class \u2261 null ) {\n		return ZZPath;\n	}\n	if ( not( path_class instanceof Class ) ) {\n		die "GUI_BIND_PATH: paths special property must be Class or null";\n	}\n	return path_class;\n}\n\nfunction _binding_compile_path ( String path_text, path_class ) {\n	if ( path_class \u2261 null ) {\n		try {\n			return new ZZPath( path: path_text );\n		}\n		catch ( Exception e ) {\n			die `GUI_BIND_PATH: ${e{message}}`;\n		}\n	}\n\n	let path_type := _binding_path_class(path_class);\n	try {\n		return new path_type( path: path_text );\n	}\n	catch ( Exception e ) {\n		die `GUI_BIND_PATH: ${e{message}}`;\n	}\n}\n\nfunction _binding_path ( pathish, path_class ) {\n	if ( pathish instanceof String ) {\n		return _binding_compile_path( pathish, path_class );\n	}\n	if (\n		pathish can first\n		and ( pathish can assign_first or pathish can ref_first )\n	) {\n		return pathish;\n	}\n\n	die "GUI_BIND_PATH: binding path must be String or path-like Object";\n}\n\nfunction _binding_get ( model, path ) {\n	return path.first( model, null );\n}\n\nfunction _binding_set ( model, path, value ) {\n	if ( path can assign_first ) {\n		return path.assign_first( model, value );\n	}\n\n	let ref := path.ref_first(model);\n	return ref(value);\n}\n\nclass BindingToken {\n	let Widget widget but weak;\n	let String widget_prop;\n	let model;\n	let model_path;\n	let String event := "change";\n	let listener := null;\n	let Boolean _active := true;\n\n	method is_active () {\n		return _active;\n	}\n\n	method set_listener ( token ) {\n		listener := token;\n		return self;\n	}\n\n	method sync_model_to_widget () {\n		widget.(widget_prop)( _binding_get( model, model_path ) );\n		return self;\n	}\n\n	method sync_widget_to_model () {\n		_binding_set( model, model_path, widget.(widget_prop)() );\n		return self;\n	}\n\n	method unbind () {\n		if ( _active and listener \u2262 null ) {\n			widget.off(listener);\n		}\n		_active := false;\n		return self;\n	}\n}\n\nfunction bind (\n	Widget widget,\n	String widget_prop,\n	model,\n	model_path,\n	... PairList p\n) {\n	let path := _binding_path( model_path, getupperprop( 1, "paths" ) );\n\n	let token := new BindingToken(\n		widget: widget,\n		widget_prop: widget_prop,\n		model: model,\n		model_path: path,\n		event: p.get( "event", "change" ),\n	);\n	let event_name := p.get( "event", "change" );\n\n	switch ( p.get( "initial", "model" ): eq ) {\n		case "model":\n			token.sync_model_to_widget();\n		case "widget":\n			token.sync_widget_to_model();\n		case "none":\n			// No initial sync.\n		default:\n			die "GUI_BIND_INITIAL: initial must be model, widget, or none";\n	}\n\n	token.set_listener(\n		widget.on( event_name, function () {\n			if ( token.is_active() ) {\n				token.sync_widget_to_model();\n			}\n		} ),\n	);\n	return token;\n}\n\nfunction unbind ( BindingToken token ) {\n	return token.unbind();\n}\n\nlet GUI_XML_NS := "https://zuzulang.org/ns/std/gui";\n\nfunction _xml_error ( String code, String message ) {\n	die `${code}: ${message}`;\n}\n\nfunction _xml_tag_name ( node ) {\n	return node.localName() ?: node.nodeName();\n}\n\nfunction _xml_assert_namespace ( node ) {\n	let ns := node.namespaceURI();\n	if ( ns \u2262 null and ns \u2262 "" and ns \u2262 GUI_XML_NS ) {\n		_xml_error(\n			"GUI_XML_STRUCTURE",\n			`unsupported GUI XML namespace \'${ns}\'`,\n		);\n	}\n}\n\nfunction _xml_common_allowed ( Array extra ) {\n	let out := [\n		"id",\n		"visible",\n		"enabled",\n		"disabled",\n		"width",\n		"height",\n		"minwidth",\n		"minheight",\n		"maxwidth",\n		"maxheight",\n	];\n	for ( let attr in extra ) {\n		out.push(attr);\n	}\n	return out;\n}\n\nfunction _xml_allowed_attrs ( String tag ) {\n	switch ( tag: eq ) {\n		case "Window":\n			return _xml_common_allowed(\n				[ "title", "width", "height", "resizable", "modal" ],\n			);\n		case "VBox", "HBox":\n			return _xml_common_allowed( [ "align", "gap", "padding" ] );\n		case "Frame":\n			return _xml_common_allowed( [ "label", "collapsible", "collapsed" ] );\n		case "Label":\n			return _xml_common_allowed( [ "text", "for" ] );\n		case "Text":\n			return _xml_common_allowed(\n				[ "value", "multiline", "readonly", "wrap" ],\n			);\n		case "RichText":\n			return _xml_common_allowed(\n				[ "value", "multiline", "readonly" ],\n			);\n		case "Image":\n			return _xml_common_allowed( [ "src", "alt", "fit" ] );\n		case "Input":\n			return _xml_common_allowed( [\n				"value",\n				"placeholder",\n				"multiline",\n				"readonly",\n				"password",\n				"required",\n			] );\n		case "DatePicker":\n			return _xml_common_allowed(\n				[ "value", "min", "max", "first_day_of_week" ],\n			);\n		case "Checkbox":\n			return _xml_common_allowed( [ "label", "checked", "indeterminate" ] );\n		case "Radio":\n			return _xml_common_allowed( [ "label", "value", "group", "checked" ] );\n		case "RadioGroup":\n			return _xml_common_allowed( [ "name", "value" ] );\n		case "Select":\n			return _xml_common_allowed( [ "value", "multiple" ] );\n		case "Menu":\n			return _xml_common_allowed( [ "text" ] );\n		case "MenuItem":\n			return _xml_common_allowed( [ "text" ] );\n		case "Button":\n			return _xml_common_allowed( [ "text", "variant" ] );\n		case "Separator":\n			return _xml_common_allowed( [ "orientation" ] );\n		case "Slider":\n			return _xml_common_allowed( [\n				"value",\n				"min",\n				"max",\n				"step",\n				"orientation",\n				"readonly",\n			] );\n		case "Progress":\n			return _xml_common_allowed( [\n				"value",\n				"min",\n				"max",\n				"indeterminate",\n				"show_text",\n			] );\n		case "Tabs":\n			return _xml_common_allowed( [ "selected", "placement" ] );\n		case "Tab":\n			return _xml_common_allowed(\n				[ "title", "value", "selected", "closable", "icon" ],\n			);\n		case "ListView":\n			return _xml_common_allowed( [ "selected_index", "multiple" ] );\n		case "TreeView":\n			return _xml_common_allowed( [ "selected_path", "multiple" ] );\n	}\n\n	_xml_error( "GUI_XML_STRUCTURE", `unsupported GUI XML element \'${tag}\'` );\n}\n\nfunction _xml_bool_attrs ( String tag ) {\n	return [\n		"visible",\n		"enabled",\n		"disabled",\n		"resizable",\n		"modal",\n		"collapsible",\n		"collapsed",\n		"multiline",\n		"readonly",\n		"wrap",\n		"password",\n		"required",\n		"checked",\n		"indeterminate",\n		"multiple",\n		"show_text",\n		"selected",\n		"closable",\n	];\n}\n\nfunction _xml_number_attrs ( String tag ) {\n	return [\n		"width",\n		"height",\n		"minwidth",\n		"minheight",\n		"maxwidth",\n		"maxheight",\n		"gap",\n		"padding",\n		"first_day_of_week",\n		"selected_index",\n		"value",\n		"min",\n		"max",\n		"step",\n	];\n}\n\nfunction _xml_bool ( String tag, String attr, String raw ) {\n	switch ( lc(raw): eq ) {\n		case "true", "1", "yes", "on": return true;\n		case "false", "0", "no", "off": return false;\n	}\n	_xml_error(\n		"GUI_XML_ATTR_TYPE",\n		`${tag}.${attr} expects a boolean XML attribute`,\n	);\n}\n\nfunction _xml_number ( String tag, String attr, String raw ) {\n	if ( not ( raw ~ /^-?[0-9]+(\\.[0-9]+)?$/ ) ) {\n		_xml_error(\n			"GUI_XML_ATTR_TYPE",\n			`${tag}.${attr} expects a numeric XML attribute`,\n		);\n	}\n	return 0 + raw;\n}\n\nfunction _xml_int_list ( String tag, String attr, String raw ) {\n	let out := [];\n	return out if raw eq "";\n	for ( let part in split( raw, "," ) ) {\n		let item := trim(part);\n		if ( not ( item ~ /^-?[0-9]+$/ ) ) {\n			_xml_error(\n				"GUI_XML_ATTR_TYPE",\n				`${tag}.${attr} expects comma-separated integers`,\n			);\n		}\n		out.push( 0 + item );\n	}\n	return out;\n}\n\nfunction _xml_coerce_attr ( String tag, String attr, String raw ) {\n	if ( attr eq "selected" and tag eq "Tabs" ) {\n		return raw;\n	}\n	if ( attr eq "value" and tag \u2209 [ "Slider", "Progress" ] ) {\n		return raw;\n	}\n	if ( attr eq "min" and tag eq "DatePicker" ) {\n		return raw;\n	}\n	if ( attr eq "max" and tag eq "DatePicker" ) {\n		return raw;\n	}\n	if ( attr eq "selected_path" ) {\n		return _xml_int_list( tag, attr, raw );\n	}\n	if ( attr \u2208 _xml_bool_attrs(tag) ) {\n		return _xml_bool( tag, attr, raw );\n	}\n	if ( attr \u2208 _xml_number_attrs(tag) ) {\n		return _xml_number( tag, attr, raw );\n	}\n	return raw;\n}\n\nfunction _xml_attrs ( node ) {\n	let tag := _xml_tag_name(node);\n	let props := {};\n	let meta := {};\n	let meta_keys := [];\n	let style := {};\n	let style_keys := [];\n	let allowed := _xml_allowed_attrs(tag);\n\n	for ( let attr in node.attributeNames() ) {\n		next if attr eq "xmlns";\n		next if substr( attr, 0, 6 ) eq "xmlns:";\n		let value := node.getAttribute(attr);\n		if ( substr( attr, 0, 5 ) eq "meta." ) {\n			let key := substr( attr, 5 );\n			_xml_error( "GUI_XML_ATTR_UNKNOWN", "empty meta attribute name" )\n				if key eq "";\n			meta{(key)} := value;\n			meta_keys.push(key);\n			next;\n		}\n		if ( substr( attr, 0, 6 ) eq "style." ) {\n			let key := substr( attr, 6 );\n			_xml_error( "GUI_XML_ATTR_UNKNOWN", "empty style attribute name" )\n				if key eq "";\n			style{(key)} := value;\n			style_keys.push(key);\n			next;\n		}\n		if ( attr \u2209 allowed ) {\n			_xml_error(\n				"GUI_XML_ATTR_UNKNOWN",\n				`${tag} does not accept XML attribute \'${attr}\'`,\n			);\n		}\n		props{(attr)} := _xml_coerce_attr( tag, attr, value );\n	}\n\n	return {\n		props: props,\n		meta: meta,\n		meta_keys: meta_keys,\n		style: style,\n		style_keys: style_keys,\n	};\n}\n\nfunction _xml_apply_meta ( Widget widget, Dict meta, Array keys ) {\n	for ( let key in keys ) {\n		widget.meta( key, meta{(key)} );\n	}\n	if ( keys.length() > 0 ) {\n		widget.meta( "__xml_meta_keys", keys );\n	}\n	return widget;\n}\n\nfunction _xml_apply_style ( Widget widget, Dict style, Array keys ) {\n	for ( let key in keys ) {\n		widget.style( key, style{(key)} );\n	}\n	if ( keys.length() > 0 ) {\n		widget.meta( "__xml_style_keys", keys );\n	}\n	return widget;\n}\n\nfunction _xml_widget_from_node ( node ) {\n	_xml_assert_namespace(node);\n\n	let tag := _xml_tag_name(node);\n	let child_widgets := [];\n	for ( let child in node.children() ) {\n		child_widgets.push( _xml_widget_from_node(child) );\n	}\n	let parsed := _xml_attrs(node);\n	let p := parsed{props};\n	let widget;\n\n	switch ( tag: eq ) {\n		case "Window":\n			widget := new _WindowClass(\n				id: p.get( "id", null ),\n				title: p.get( "title", "" ),\n				width: p.get( "width", 800 ),\n				height: p.get( "height", 600 ),\n				resizable: p.get( "resizable", true ),\n				modal: p.get( "modal", false ),\n				visible: p.get( "visible", true ),\n				enabled: p.get( "enabled", true ),\n				disabled: p.get( "disabled", false ),\n				children: child_widgets,\n			);\n		case "VBox":\n			widget := new _VBoxClass(\n				id: p.get( "id", null ),\n				align: p.get( "align", "top" ),\n				gap: p.get( "gap", 0 ),\n				padding: p.get( "padding", 0 ),\n				visible: p.get( "visible", true ),\n				enabled: p.get( "enabled", true ),\n				disabled: p.get( "disabled", false ),\n				children: child_widgets,\n			);\n		case "HBox":\n			widget := new _HBoxClass(\n				id: p.get( "id", null ),\n				align: p.get( "align", "left" ),\n				gap: p.get( "gap", 0 ),\n				padding: p.get( "padding", 0 ),\n				visible: p.get( "visible", true ),\n				enabled: p.get( "enabled", true ),\n				disabled: p.get( "disabled", false ),\n				children: child_widgets,\n			);\n		case "Frame":\n			widget := new _FrameClass(\n				id: p.get( "id", null ),\n				label: p.get( "label", "" ),\n				collapsible: p.get( "collapsible", false ),\n				collapsed: p.get( "collapsed", false ),\n				visible: p.get( "visible", true ),\n				enabled: p.get( "enabled", true ),\n				disabled: p.get( "disabled", false ),\n				children: child_widgets,\n			);\n		case "Label":\n			widget := Label(\n				id: p.get( "id", null ),\n				text: p.get( "text", "" ),\n				("for"): p.get( "for", null ),\n				visible: p.get( "visible", true ),\n				enabled: p.get( "enabled", true ),\n				disabled: p.get( "disabled", false ),\n			);\n		case "Text":\n			widget := Text(\n				id: p.get( "id", null ),\n				value: p.get( "value", "" ),\n				multiline: p.get( "multiline", false ),\n				readonly: p.get( "readonly", false ),\n				wrap: p.get( "wrap", true ),\n				visible: p.get( "visible", true ),\n				enabled: p.get( "enabled", true ),\n				disabled: p.get( "disabled", false ),\n			);\n		case "RichText":\n			widget := RichText(\n				id: p.get( "id", null ),\n				value: p.get( "value", "" ),\n				multiline: p.get( "multiline", true ),\n				readonly: p.get( "readonly", true ),\n				visible: p.get( "visible", true ),\n				enabled: p.get( "enabled", true ),\n				disabled: p.get( "disabled", false ),\n			);\n		case "Image":\n			widget := Image(\n				id: p.get( "id", null ),\n				src: p.get( "src", "" ),\n				alt: p.get( "alt", "" ),\n				fit: p.get( "fit", "none" ),\n				visible: p.get( "visible", true ),\n				enabled: p.get( "enabled", true ),\n				disabled: p.get( "disabled", false ),\n			);\n		case "Input":\n			widget := Input(\n				id: p.get( "id", null ),\n				value: p.get( "value", "" ),\n				placeholder: p.get( "placeholder", "" ),\n				multiline: p.get( "multiline", false ),\n				readonly: p.get( "readonly", false ),\n				password: p.get( "password", false ),\n				required: p.get( "required", false ),\n				visible: p.get( "visible", true ),\n				enabled: p.get( "enabled", true ),\n				disabled: p.get( "disabled", false ),\n			);\n		case "DatePicker":\n			widget := DatePicker(\n				id: p.get( "id", null ),\n				value: p.get( "value", null ),\n				min: p.get( "min", null ),\n				max: p.get( "max", null ),\n				first_day_of_week: p.get( "first_day_of_week", 0 ),\n				visible: p.get( "visible", true ),\n				enabled: p.get( "enabled", true ),\n				disabled: p.get( "disabled", false ),\n			);\n		case "Checkbox":\n			widget := Checkbox(\n				id: p.get( "id", null ),\n				label: p.get( "label", "" ),\n				checked: p.get( "checked", false ),\n				indeterminate: p.get( "indeterminate", false ),\n				visible: p.get( "visible", true ),\n				enabled: p.get( "enabled", true ),\n				disabled: p.get( "disabled", false ),\n			);\n		case "Radio":\n			widget := Radio(\n				id: p.get( "id", null ),\n				label: p.get( "label", "" ),\n				value: p.get( "value", "" ),\n				group: p.get( "group", null ),\n				checked: p.get( "checked", false ),\n				visible: p.get( "visible", true ),\n				enabled: p.get( "enabled", true ),\n				disabled: p.get( "disabled", false ),\n			);\n		case "RadioGroup":\n			widget := new _RadioGroupClass(\n				id: p.get( "id", null ),\n				name: p.get( "name", "" ),\n				value: p.get( "value", null ),\n				visible: p.get( "visible", true ),\n				enabled: p.get( "enabled", true ),\n				disabled: p.get( "disabled", false ),\n				children: child_widgets,\n			);\n		case "Select":\n			widget := Select(\n				id: p.get( "id", null ),\n				value: p.get( "value", null ),\n				multiple: p.get( "multiple", false ),\n				visible: p.get( "visible", true ),\n				enabled: p.get( "enabled", true ),\n				disabled: p.get( "disabled", false ),\n			);\n		case "Menu":\n			widget := new _MenuClass(\n				id: p.get( "id", null ),\n				text: p.get( "text", "" ),\n				visible: p.get( "visible", true ),\n				enabled: p.get( "enabled", true ),\n				disabled: p.get( "disabled", false ),\n				children: child_widgets,\n			);\n		case "MenuItem":\n			widget := MenuItem(\n				id: p.get( "id", null ),\n				text: p.get( "text", "" ),\n				visible: p.get( "visible", true ),\n				enabled: p.get( "enabled", true ),\n				disabled: p.get( "disabled", false ),\n			);\n		case "Button":\n			widget := Button(\n				id: p.get( "id", null ),\n				text: p.get( "text", "" ),\n				variant: p.get( "variant", "default" ),\n				visible: p.get( "visible", true ),\n				enabled: p.get( "enabled", true ),\n				disabled: p.get( "disabled", false ),\n			);\n		case "Separator":\n			widget := Separator(\n				id: p.get( "id", null ),\n				orientation: p.get( "orientation", "horizontal" ),\n				visible: p.get( "visible", true ),\n				enabled: p.get( "enabled", true ),\n				disabled: p.get( "disabled", false ),\n			);\n		case "Slider":\n			widget := Slider(\n				id: p.get( "id", null ),\n				value: p.get( "value", 0 ),\n				min: p.get( "min", 0 ),\n				max: p.get( "max", 100 ),\n				step: p.get( "step", 1 ),\n				orientation: p.get( "orientation", "horizontal" ),\n				readonly: p.get( "readonly", false ),\n				visible: p.get( "visible", true ),\n				enabled: p.get( "enabled", true ),\n				disabled: p.get( "disabled", false ),\n			);\n		case "Progress":\n			widget := Progress(\n				id: p.get( "id", null ),\n				value: p.get( "value", 0 ),\n				min: p.get( "min", 0 ),\n				max: p.get( "max", 100 ),\n				indeterminate: p.get( "indeterminate", false ),\n				show_text: p.get( "show_text", false ),\n				visible: p.get( "visible", true ),\n				enabled: p.get( "enabled", true ),\n				disabled: p.get( "disabled", false ),\n			);\n		case "Tabs":\n			widget := new _TabsClass(\n				id: p.get( "id", null ),\n				selected: p.get( "selected", null ),\n				placement: p.get( "placement", "top" ),\n				visible: p.get( "visible", true ),\n				enabled: p.get( "enabled", true ),\n				disabled: p.get( "disabled", false ),\n				children: child_widgets,\n			);\n		case "Tab":\n			widget := new _TabClass(\n				id: p.get( "id", null ),\n				title: p.get( "title", "" ),\n				value: p.get( "value", "" ),\n				selected: p.get( "selected", false ),\n				closable: p.get( "closable", false ),\n				icon: p.get( "icon", null ),\n				visible: p.get( "visible", true ),\n				enabled: p.get( "enabled", true ),\n				disabled: p.get( "disabled", false ),\n				children: child_widgets,\n			);\n		case "ListView":\n			widget := ListView(\n				id: p.get( "id", null ),\n				selected_index: p.get( "selected_index", null ),\n				multiple: p.get( "multiple", false ),\n				visible: p.get( "visible", true ),\n				enabled: p.get( "enabled", true ),\n				disabled: p.get( "disabled", false ),\n			);\n		case "TreeView":\n			widget := TreeView(\n				id: p.get( "id", null ),\n				selected_path: p.get( "selected_path", [] ),\n				multiple: p.get( "multiple", false ),\n				visible: p.get( "visible", true ),\n				enabled: p.get( "enabled", true ),\n				disabled: p.get( "disabled", false ),\n			);\n		default:\n			_xml_error(\n				"GUI_XML_STRUCTURE",\n				`unsupported GUI XML element \'${tag}\'`,\n			);\n	}\n\n	_xml_apply_meta( widget, parsed{meta}, parsed{meta_keys} );\n	return _xml_apply_style( widget, parsed{style}, parsed{style_keys} );\n}\n\nfunction gui_from_xml ( String xml ) {\n	return _xml_widget_from_node( XML.parse(xml).documentElement() );\n}\n\nfunction gui_from_xml_file ( path ) {\n	die "XML.load is denied by runtime policy" if __system__{deny_fs};\n	from std/io import Path;\n	let file := path instanceof Path ? path : new Path(path);\n	return _xml_widget_from_node( XML.load(file).documentElement() );\n}\n\nfunction _xml_tag_for_widget ( Widget widget ) {\n	if ( widget instanceof _WindowClass ) { return "Window"; }\n	if ( widget instanceof _VBoxClass ) { return "VBox"; }\n	if ( widget instanceof _HBoxClass ) { return "HBox"; }\n	if ( widget instanceof _FrameClass ) { return "Frame"; }\n	if ( widget instanceof _LabelClass ) { return "Label"; }\n	if ( widget instanceof _TextClass ) { return "Text"; }\n	if ( widget instanceof _RichTextClass ) { return "RichText"; }\n	if ( widget instanceof _ImageClass ) { return "Image"; }\n	if ( widget instanceof _InputClass ) { return "Input"; }\n	if ( widget instanceof _DatePickerClass ) { return "DatePicker"; }\n	if ( widget instanceof _CheckboxClass ) { return "Checkbox"; }\n	if ( widget instanceof _RadioClass ) { return "Radio"; }\n	if ( widget instanceof _RadioGroupClass ) { return "RadioGroup"; }\n	if ( widget instanceof _SelectClass ) { return "Select"; }\n	if ( widget instanceof _MenuClass ) { return "Menu"; }\n	if ( widget instanceof _MenuItemClass ) { return "MenuItem"; }\n	if ( widget instanceof _ButtonClass ) { return "Button"; }\n	if ( widget instanceof _SeparatorClass ) { return "Separator"; }\n	if ( widget instanceof _SliderClass ) { return "Slider"; }\n	if ( widget instanceof _ProgressClass ) { return "Progress"; }\n	if ( widget instanceof _TabsClass ) { return "Tabs"; }\n	if ( widget instanceof _TabClass ) { return "Tab"; }\n	if ( widget instanceof _ListViewClass ) { return "ListView"; }\n	if ( widget instanceof _TreeViewClass ) { return "TreeView"; }\n	_xml_error( "GUI_XML_STRUCTURE", "unsupported widget for gui_to_xml" );\n}\n\nfunction _xml_attr ( String name, value ) {\n	return "" if value \u2261 null;\n	return ` ${name}="${escape_xml(value)}"`;\n}\n\nfunction _xml_attr_if ( String name, value, fallback ) {\n	return "" if value \u2261 fallback;\n	return _xml_attr( name, value );\n}\n\nfunction _xml_bool_attr_if ( String name, value, fallback ) {\n	let normalized := value ? true : false;\n	let normalized_fallback := fallback ? true : false;\n	return "" if normalized \u2261 normalized_fallback;\n	return _xml_attr( name, normalized ? "true" : "false" );\n}\n\nfunction _xml_attr_nonempty ( String name, value ) {\n	return "" if value \u2261 null or value eq "";\n	return _xml_attr( name, value );\n}\n\nfunction _xml_join_ints ( Array values ) {\n	let out := [];\n	for ( let value in values ) {\n		out.push( "" _ value );\n	}\n	return join( ",", out );\n}\n\nfunction _xml_meta_attrs ( Widget widget ) {\n	let keys := widget.meta( "__xml_meta_keys" ) ?: [];\n	let out := "";\n	for ( let key in keys ) {\n		out _= _xml_attr( "meta." _ key, widget.meta(key) );\n	}\n	return out;\n}\n\nfunction _xml_style_attrs ( Widget widget ) {\n	let keys := widget.meta( "__xml_style_keys" ) ?: [];\n	let out := "";\n	for ( let key in keys ) {\n		out _= _xml_attr( "style." _ key, widget.style(key) );\n	}\n	return out;\n}\n\nfunction _xml_common_attrs ( Widget widget ) {\n	let out := "";\n	out _= _xml_attr( "id", widget.id() ) if widget.id() \u2262 null;\n	out _= _xml_bool_attr_if( "visible", widget.visible(), true );\n	out _= _xml_bool_attr_if( "disabled", not widget.enabled(), false );\n	out _= _xml_meta_attrs(widget);\n	out _= _xml_style_attrs(widget);\n	return out;\n}\n\nfunction _xml_widget_attrs ( Widget widget ) {\n	let out := _xml_common_attrs(widget);\n	if ( widget instanceof _WindowClass ) {\n		out _= _xml_attr_if( "title", widget.title(), "" );\n	}\n	else if ( widget instanceof _VBoxClass or widget instanceof _HBoxClass ) {\n		let default_align := widget instanceof _VBoxClass ? "top" : "left";\n		out _= _xml_attr_if( "align", widget.align(), default_align );\n		out _= _xml_attr_if( "gap", widget.gap(), 0 );\n		out _= _xml_attr_if( "padding", widget.padding(), 0 )\n			unless widget.padding() instanceof Array;\n	}\n	else if ( widget instanceof _FrameClass ) {\n		out _= _xml_attr_if( "label", widget.label(), "" );\n		out _= _xml_bool_attr_if( "collapsible", widget.collapsible(), false );\n		out _= _xml_bool_attr_if( "collapsed", widget.collapsed(), false );\n	}\n	else if ( widget instanceof _LabelClass ) {\n		out _= _xml_attr_if( "text", widget.text(), "" );\n		out _= _xml_attr_nonempty( "for", widget.for_id() );\n	}\n	else if ( widget instanceof _TextClass ) {\n		out _= _xml_attr_if( "value", widget.value(), "" );\n		out _= _xml_bool_attr_if( "multiline", widget.multiline(), false );\n		out _= _xml_bool_attr_if( "readonly", widget.readonly(), false );\n		out _= _xml_bool_attr_if( "wrap", widget.wrap(), true );\n	}\n	else if ( widget instanceof _RichTextClass ) {\n		out _= _xml_attr_if( "value", widget.value(), "" );\n		out _= _xml_bool_attr_if( "multiline", widget.multiline(), true );\n		out _= _xml_bool_attr_if( "readonly", widget.readonly(), true );\n	}\n	else if ( widget instanceof _ImageClass ) {\n		out _= _xml_attr_if( "src", widget.src(), "" );\n		out _= _xml_attr_if( "alt", widget.alt(), "" );\n		out _= _xml_attr_if( "fit", widget.fit(), "none" );\n	}\n	else if ( widget instanceof _InputClass ) {\n		out _= _xml_attr_if( "value", widget.value(), "" );\n		out _= _xml_attr_if( "placeholder", widget.placeholder(), "" );\n		out _= _xml_bool_attr_if( "multiline", widget.multiline(), false );\n		out _= _xml_bool_attr_if( "readonly", widget.readonly(), false );\n		out _= _xml_bool_attr_if( "password", widget.password(), false );\n		out _= _xml_bool_attr_if( "required", widget.required(), false );\n	}\n	else if ( widget instanceof _DatePickerClass ) {\n		out _= _xml_attr( "value", widget.value() );\n		out _= _xml_attr( "min", widget.min() ) if widget.min() \u2262 null;\n		out _= _xml_attr( "max", widget.max() ) if widget.max() \u2262 null;\n		out _= _xml_attr_if(\n			"first_day_of_week",\n			widget.first_day_of_week(),\n			0,\n		);\n	}\n	else if ( widget instanceof _CheckboxClass ) {\n		out _= _xml_attr_if( "label", widget.label(), "" );\n		out _= _xml_bool_attr_if( "checked", widget.checked(), false );\n		out _= _xml_bool_attr_if( "indeterminate", widget.indeterminate(), false );\n	}\n	else if ( widget instanceof _RadioClass ) {\n		out _= _xml_attr_if( "label", widget.label(), "" );\n		out _= _xml_attr_if( "value", widget.value(), "" );\n		out _= _xml_attr_nonempty( "group", widget.group() );\n		out _= _xml_bool_attr_if( "checked", widget.checked(), false );\n	}\n	else if ( widget instanceof _RadioGroupClass ) {\n		out _= _xml_attr_if( "name", widget.name(), "" );\n		out _= _xml_attr( "value", widget.value() ) if widget.value() \u2262 null;\n	}\n	else if ( widget instanceof _SelectClass ) {\n		out _= _xml_attr( "value", widget.value() ) if widget.value() \u2262 null;\n		out _= _xml_bool_attr_if( "multiple", widget.multiple(), false );\n	}\n	else if ( widget instanceof _MenuClass ) {\n		out _= _xml_attr_if( "text", widget.text(), "" );\n	}\n	else if ( widget instanceof _MenuItemClass ) {\n		out _= _xml_attr_if( "text", widget.text(), "" );\n	}\n	else if ( widget instanceof _ButtonClass ) {\n		out _= _xml_attr_if( "text", widget.text(), "" );\n		out _= _xml_attr_if( "variant", widget.variant(), "default" );\n	}\n	else if ( widget instanceof _SeparatorClass ) {\n		out _= _xml_attr_if( "orientation", widget.orientation(), "horizontal" );\n	}\n	else if ( widget instanceof _SliderClass ) {\n		out _= _xml_attr_if( "value", widget.value(), 0 );\n		out _= _xml_attr_if( "min", widget.min(), 0 );\n		out _= _xml_attr_if( "max", widget.max(), 100 );\n		out _= _xml_attr_if( "step", widget.step(), 1 );\n		out _= _xml_attr_if( "orientation", widget.orientation(), "horizontal" );\n		out _= _xml_bool_attr_if( "readonly", widget.readonly(), false );\n	}\n	else if ( widget instanceof _ProgressClass ) {\n		out _= _xml_attr_if( "value", widget.value(), 0 );\n		out _= _xml_attr_if( "min", widget.min(), 0 );\n		out _= _xml_attr_if( "max", widget.max(), 100 );\n		out _= _xml_bool_attr_if( "indeterminate", widget.indeterminate(), false );\n		out _= _xml_bool_attr_if( "show_text", widget.show_text(), false );\n	}\n	else if ( widget instanceof _TabsClass ) {\n		out _= _xml_attr( "selected", widget.selected() )\n			if widget.selected() \u2262 null;\n		out _= _xml_attr_if( "placement", widget.placement(), "top" );\n	}\n	else if ( widget instanceof _TabClass ) {\n		out _= _xml_attr_if( "title", widget.title(), "" );\n		out _= _xml_attr_if( "value", widget.value(), "" );\n		out _= _xml_attr( "icon", widget.icon() ) if widget.icon() \u2262 null;\n		out _= _xml_bool_attr_if( "selected", widget.selected(), false );\n		out _= _xml_bool_attr_if( "closable", widget.closable(), false );\n	}\n	else if ( widget instanceof _ListViewClass ) {\n		out _= _xml_attr( "selected_index", widget.selected_index() )\n			if widget.selected_index() \u2262 null;\n		out _= _xml_bool_attr_if( "multiple", widget.multiple(), false );\n	}\n	else if ( widget instanceof _TreeViewClass ) {\n		let selected_path := widget.selected_path();\n		out _= _xml_attr( "selected_path", _xml_join_ints(selected_path) )\n			if selected_path.length() > 0;\n		out _= _xml_bool_attr_if( "multiple", widget.multiple(), false );\n	}\n	return out;\n}\n\nfunction _xml_serialize_widget ( Widget widget, Number depth ) {\n	let indent := "";\n	let i := 0;\n	while ( i < depth ) {\n		indent _= "\\t";\n		i++;\n	}\n\n	let tag := _xml_tag_for_widget(widget);\n	let attrs := _xml_widget_attrs(widget);\n	attrs _= _xml_attr( "xmlns", GUI_XML_NS ) if depth = 0;\n	let children := widget.children();\n	if ( children.length() = 0 ) {\n		return indent _ "<" _ tag _ attrs _ " />";\n	}\n\n	let parts := [];\n	for ( let child in children ) {\n		parts.push( _xml_serialize_widget( child, depth + 1 ) );\n	}\n\n	return indent _ "<" _ tag _ attrs _ ">\\n"\n		_ join( "\\n", parts )\n		_ "\\n" _ indent _ "</" _ tag _ ">";\n}\n\nfunction gui_to_xml ( Widget root ) {\n	return _xml_serialize_widget( root, 0 ) _ "\\n";\n}\n';
@@ -45347,10 +46463,9 @@ 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: ["/__zuzu_browser_modules__/0"],
+          includePaths: [],
           jsModules,
           virtualFiles
         };
@@ -45726,7 +46841,7 @@ class ZZTemplate extends ZTemplate {
     }
   });
 
-  // ../../../../../tmp/zuzu-browser-build.WePoiO/browser-worker-entry.generated.js
+  // ../../../../../tmp/zuzu-browser-build.fADF4k/browser-worker-entry.generated.js
   var { createBrowserStdlib } = require_browser_stdlib_generated();
   globalThis.__ZUZU_BROWSER_DEFAULT_RUNTIME_OPTIONS__ = createBrowserStdlib();
   var { installBrowserWorker } = require_browser_worker_entry();