@mirascript/mirascript 0.1.76 → 0.1.79

package/dist/{chunk-ZRLBJK6A.js → chunk-BPFOJ4Q6.js}

@@ -1,6 +1,5 @@
 import {
   DiagnosticCode,
-  NegativeInfinity,
   NotNumber,
   PositiveInfinity,
   VM_ARRAY_MAX_LENGTH,
@@ -20,6 +19,7 @@ import {
   fromEntries,
   getOwnPropertyNames,
   getPrototypeOf,
+  getRecord,
   getVmType,
   hasOwn,
   hasOwnEnumerable,
@@ -48,122 +48,19 @@ import {
   keys,
   keysLength,
   parseDiagnostics,
+  setRecord,
+  toBoolean,
+  toFormat,
+  toNumber,
   toString,
   values
-} from "./chunk-VI74OKFU.js";
+} from "./chunk-LSPCAN32.js";
 
 // src/compiler/load-module.ts
 import { loadModule } from "@mirascript/bindings";
-await loadModule();
-
-// src/helpers/convert/index.ts
-var convert_exports = {};
-__export(convert_exports, {
-  toBoolean: () => toBoolean,
-  toFormat: () => toFormat,
-  toNumber: () => toNumber,
-  toString: () => toString
-});
-
-// src/helpers/convert/to-number.ts
-function parseNumericLiteral(value) {
-  if (value === "") return null;
-  const ch0 = value.charAt(0);
-  if (ch0 < "0" || ch0 > "9") {
-    return null;
-  }
-  if (/^0[bB][01]+$/.test(value)) {
-    const num2 = Number.parseInt(value.slice(2), 2);
-    return isNaN(num2) ? null : num2;
-  }
-  if (/^0[oO][0-7]+$/.test(value)) {
-    const num2 = Number.parseInt(value.slice(2), 8);
-    return isNaN(num2) ? null : num2;
-  }
-  if (/^0[xX][0-9a-fA-F]+$/.test(value)) {
-    const num2 = Number.parseInt(value.slice(2), 16);
-    return isNaN(num2) ? null : num2;
-  }
-  if (/^[0-9]+(\.[0-9]+)?([eE][+-]?[0-9]+)?$/.test(value)) {
-    const num2 = Number.parseFloat(value);
-    return isNaN(num2) ? null : num2;
-  }
-  return null;
-}
-function stringToNumber(value) {
-  value = value.trim();
-  if (value === "") return null;
-  if (value === "inf" || value === "+inf" || value === "Infinity" || value === "+Infinity") {
-    return PositiveInfinity;
-  }
-  if (value === "-inf" || value === "-Infinity") {
-    return NegativeInfinity;
-  }
-  if (value === "nan" || value === "NaN") {
-    return NotNumber;
-  }
-  if (value.startsWith("-")) {
-    const num2 = parseNumericLiteral(value.slice(1));
-    if (num2 !== null) return -num2;
-    return null;
-  } else if (value.startsWith("+")) {
-    return parseNumericLiteral(value.slice(1));
-  } else {
-    return parseNumericLiteral(value);
-  }
-}
-function toNumber(value, fallback) {
-  if (typeof value === "number") return value;
-  if (typeof value == "boolean") return value ? 1 : 0;
-  if (typeof value == "string") {
-    const num2 = stringToNumber(value);
-    if (num2 !== null) return num2;
-  }
-  if (fallback === void 0) {
-    throw new VmError(`Failed to convert value to number: ${display(value)}`, NotNumber);
-  }
-  return fallback;
-}
-
-// src/helpers/convert/to-format.ts
-function formatNumber(finite) {
-  if (finite === 0) return "0";
-  const s2 = finite.toString();
-  let ps;
-  const abs3 = Math.abs(finite);
-  if (abs3 >= 1e3 || abs3 < 1e-3) {
-    const ps1 = finite.toExponential();
-    const ps2 = finite.toExponential(5);
-    ps = ps1.length < ps2.length ? ps1 : ps2;
-  } else {
-    ps = finite.toPrecision(6);
-  }
-  return ps.length < s2.length ? ps : s2;
-}
-function toFormat(value, format2) {
-  const f = format2 == null ? "" : format2.trim();
-  if (typeof value == "number") {
-    if (!isFinite(value)) {
-      return toString(value, void 0);
-    }
-    if (/^\.\d+$/.test(f)) {
-      let digits = Math.trunc(Number(f.slice(1)));
-      if (!(digits <= 100)) digits = 100;
-      return value.toFixed(digits);
-    } else {
-      return formatNumber(value);
-    }
-  }
-  return toString(value, void 0);
-}
-
-// src/helpers/convert/to-boolean.ts
-function toBoolean(value, fallback) {
-  if (typeof value === "boolean") return value;
-  if (fallback === void 0) {
-    throw new VmError(`Failed to convert value to boolean: ${display(value)}`, false);
-  }
-  return fallback;
+try {
+  await loadModule();
+} catch (error) {
 }
 
 // src/vm/types/wrapper.ts
@@ -298,13 +195,11 @@ function unwrapFromVmValue(value, bindThisArg = true) {
   return bindThisArg ? bindThis(f.value, f.thisArg) : f.value;
 }
 
-// src/vm/types/extern.ts
+// src/vm/types/extern/tag.ts
 var ObjectPrototype = Object.prototype;
-var ObjectToString = ObjectPrototype.toString;
-var FunctionToString = Function.prototype.toString;
-var ArrayToString = Array.prototype.toString;
-var ArrayMap = Array.prototype.map;
-var TypedArrayToString = Uint8Array.prototype.toString;
+function getJsObjectTag(value) {
+  return ObjectPrototype.toString.call(value).slice(8, -1);
+}
 function classNameOf(kls) {
   const { displayName } = kls;
   if (typeof displayName === "string" && displayName.trim()) {
@@ -316,6 +211,94 @@ function classNameOf(kls) {
   }
   return null;
 }
+function getTag(value) {
+  const tag = getJsObjectTag(value);
+  if (tag === "Function") {
+    if ("prototype" in value && typeof value.prototype == "object") {
+      const className = classNameOf(value);
+      if (!className) return `class`;
+      return `class ${className}`;
+    }
+    return `function`;
+  }
+  if (tag === "AsyncFunction") {
+    return `async function`;
+  }
+  if (tag === "GeneratorFunction") {
+    return `function*`;
+  }
+  if (tag === "AsyncGeneratorFunction") {
+    return `async function*`;
+  }
+  if (tag === "Object") {
+    const proto = getPrototypeOf(value);
+    if (proto === ObjectPrototype) {
+      return "Object";
+    }
+    if (proto == null) {
+      return "Object: null prototype";
+    }
+    if (typeof proto.constructor === "function") {
+      return classNameOf(proto.constructor) ?? "Object";
+    }
+  }
+  return tag;
+}
+
+// src/vm/types/extern/utils.ts
+function isArrayLike(value) {
+  return isArray(value) || ArrayBuffer.isView(value) && "length" in value;
+}
+function getKeys(value, includeNonEnumerable) {
+  if (!includeNonEnumerable) {
+    const keys5 = [];
+    for (const key in value) {
+      keys5.push(key);
+    }
+    return keys5;
+  }
+  const keys4 = /* @__PURE__ */ new Set();
+  let e2 = value;
+  while (e2 != null && (typeof e2 == "object" || typeof e2 == "function")) {
+    for (const key of getOwnPropertyNames(e2)) {
+      keys4.add(key);
+    }
+    e2 = getPrototypeOf(e2);
+  }
+  return Array.from(keys4);
+}
+var ObjectToString = Object.prototype.toString;
+var FunctionToString = Function.prototype.toString;
+var ArrayToString = Array.prototype.toString;
+var TypedArrayToString = Uint8Array.prototype.toString;
+function hasCustomToString(value) {
+  const { toString: toString2 } = value;
+  if (typeof toString2 != "function") return false;
+  if (toString2 === ObjectToString || toString2 === FunctionToString || toString2 === ArrayToString || toString2 === TypedArrayToString)
+    return false;
+  return true;
+}
+
+// src/vm/types/extern/access.ts
+var pFunction = Function.prototype;
+var pArray = Array.prototype;
+var pObject = Object.prototype;
+function canAccessProperty(value, key, read) {
+  if (key.startsWith("_")) return false;
+  if (typeof value == "function" && (key === "prototype" || key === "arguments" || key === "caller")) return false;
+  if (hasOwn(value, key)) return true;
+  if (!read) return true;
+  if (!(key in value)) return false;
+  if (key === "constructor") return false;
+  const prop = value[key];
+  if (key in pFunction && prop === pFunction[key]) return false;
+  if (key in pArray && prop === pArray[key]) return false;
+  if (key in pObject && prop === pObject[key]) return false;
+  return true;
+}
+
+// src/vm/types/extern/index.ts
+var ArrayMap = Array.prototype.map;
 var VmExtern = class extends VmWrapper {
   constructor(value, thisArg = null) {
     super(value);
@@ -326,18 +309,7 @@ var VmExtern = class extends VmWrapper {
    * This method will be used in {@link get}, {@link set}, {@link has}, and {@link keys} methods
    */
   access(key, read) {
-    if (key.startsWith("_")) return false;
-    if (typeof this.value == "function" && (key === "prototype" || key === "arguments" || key === "caller"))
-      return false;
-    if (hasOwn(this.value, key)) return true;
-    if (!read) return true;
-    if (!(key in this.value)) return false;
-    if (key === "constructor") return false;
-    const prop = this.value[key];
-    if (key in Function.prototype && prop === Function.prototype[key]) return false;
-    if (key in Array.prototype && prop === Array.prototype[key]) return false;
-    if (key in Object.prototype && prop === Object.prototype[key]) return false;
-    return true;
+    return canAccessProperty(this.value, key, read);
   }
   /** 决定是否对属性进行包装 */
   assumeVmValue(value, key) {
@@ -379,23 +351,8 @@ var VmExtern = class extends VmWrapper {
   }
   /** @inheritdoc */
   keys(includeNonEnumerable = false) {
-    if (!includeNonEnumerable) {
-      const keys4 = [];
-      for (const key in this.value) {
-        if (this.access(key, true)) keys4.push(key);
-      }
-      return keys4;
-    } else {
-      const keys4 = /* @__PURE__ */ new Set();
-      let e2 = this.value;
-      while (e2 != null && (typeof e2 == "object" || typeof e2 == "function")) {
-        for (const key of getOwnPropertyNames(e2)) {
-          keys4.add(key);
-        }
-        e2 = getPrototypeOf(e2);
-      }
-      return Array.from(keys4).filter((key) => this.access(key, true));
-    }
+    const keys4 = getKeys(this.value, includeNonEnumerable);
+    return keys4.filter((key) => this.access(key, true));
   }
   /** @inheritdoc */
   same(other) {
@@ -408,15 +365,14 @@ var VmExtern = class extends VmWrapper {
    * By default, this method returns true if the wrapped value is an Array or a TypedArray.
    */
   isArrayLike() {
-    return isArray(this.value) || ArrayBuffer.isView(this.value) && "length" in this.value;
+    return isArrayLike(this.value);
   }
   /** @inheritdoc */
   toString(useBraces) {
-    const { toString: toString2 } = this.value;
-    if (typeof toString2 != "function" || toString2 === ObjectToString || toString2 === FunctionToString) {
-      return super.toString(useBraces);
+    if (hasCustomToString(this.value)) {
+      return String(this.value);
     }
-    if ((toString2 === ArrayToString || toString2 === TypedArrayToString) && this.isArrayLike()) {
+    if (this.isArrayLike()) {
       const mapped = ArrayMap.call(this.value, (item) => {
         if (item === void 0) return "";
         return innerToString(wrapToVmValue(item ?? null, null, null), true);
@@ -425,7 +381,7 @@ var VmExtern = class extends VmWrapper {
       if (useBraces) return `[${str}]`;
       return str;
     }
-    return String(this.value);
+    return super.toString(useBraces);
   }
   /** @inheritdoc */
   get type() {
@@ -433,32 +389,9 @@ var VmExtern = class extends VmWrapper {
   }
   /** @inheritdoc */
   get tag() {
-    const tag = ObjectToString.call(this.value).slice(8, -1);
+    const tag = getTag(this.value);
     if (this.isArrayLike()) {
       return `${tag}(${this.value.length})`;
-    } else if (tag === "Object") {
-      const proto = getPrototypeOf(this.value);
-      if (proto === ObjectPrototype) {
-        return "Object";
-      }
-      if (proto == null) {
-        return "Object: null prototype";
-      }
-      if (typeof proto.constructor === "function") {
-        return classNameOf(proto.constructor) ?? "Object";
-      }
-    } else if (tag === "Function" && "prototype" in this.value && typeof this.value.prototype == "object") {
-      const className = classNameOf(this.value);
-      if (!className) return `class`;
-      return `class ${className}`;
-    } else if (tag === "Function") {
-      return `function`;
-    } else if (tag === "AsyncFunction") {
-      return `async function`;
-    } else if (tag === "GeneratorFunction") {
-      return `function*`;
-    } else if (tag === "AsyncGeneratorFunction") {
-      return `async function*`;
     }
     return tag;
   }
@@ -888,42 +821,48 @@ var overloadNumberString = (a, b) => {
   if (typeof a == "string" || typeof b == "string") return false;
   return true;
 };
+var isArraySame = (a, b) => {
+  const len2 = a.length;
+  if (len2 !== b.length) return false;
+  for (let i = 0; i < len2; i++) {
+    if (!isSame(a[i] ?? null, b[i] ?? null)) {
+      return false;
+    }
+  }
+  return true;
+};
+var isRecordSame = (a, b) => {
+  const aKeys = keys(a);
+  const bKeys = keys(b);
+  const len2 = aKeys.length;
+  if (len2 !== bKeys.length) return false;
+  if (len2 === 0) return true;
+  for (let i = 0; i < len2; i++) {
+    const key = aKeys[i];
+    const av = a[key] ?? null;
+    const bv = getRecord(b, key);
+    if (bv === void 0) return false;
+    if (!isSame(av, bv)) return false;
+  }
+  return true;
+};
 var isSame = (a, b) => {
   if (typeof a == "number" && typeof b == "number") {
     return a === b || isNaN(a) && isNaN(b);
   }
   if (a === b) return true;
   if (a == null || typeof a != "object" || b == null || typeof b != "object") return false;
-  if (isVmWrapper(a)) return a.same(b);
-  if (isVmWrapper(b)) return b.same(a);
-  if (isVmArray(a) && isVmArray(b)) {
-    const len2 = a.length;
-    if (len2 !== b.length) {
-      return false;
-    }
-    for (let i = 0; i < len2; i++) {
-      if (!isSame(a[i] ?? null, b[i] ?? null)) {
-        return false;
-      }
-    }
-    return true;
+  const aType = getVmType(a);
+  const bType = getVmType(b);
+  if (aType !== bType) return false;
+  if (aType === "array") {
+    return isArraySame(a, b);
   }
-  if (!isVmArray(a) && !isVmArray(b)) {
-    const aKeys = keys(a);
-    const bKeys = keys(b);
-    const len2 = aKeys.length;
-    if (len2 !== bKeys.length) return false;
-    if (len2 === 0) return true;
-    let i = len2;
-    while (i--) {
-      const key = aKeys[i];
-      if (!hasOwnEnumerable(b, key)) return false;
-      const av = a[key] ?? null;
-      const bv = b[key] ?? null;
-      if (!isSame(av, bv)) return false;
-    }
-    return true;
+  if (aType === "record") {
+    return isRecordSame(a, b);
   }
+  if (isVmWrapper(a)) return a.same(b);
+  if (isVmWrapper(b)) return b.same(a);
   return false;
 };
 
@@ -1051,32 +990,32 @@ var $Nsame = (a, b) => {
 var { ceil } = Math;
 var { slice } = Array.prototype;
 var sliceCore = (value, start, end, exclusive) => {
+  $AssertInit(value);
+  $AssertInit(start);
+  $AssertInit(end);
+  if (!isVmArray(value)) {
+    throw new VmError(`Expected array, got ${display(value)}`, []);
+  }
   const { length } = value;
-  if (isNaN(start)) start = 0;
-  else if (start < 0) start = length + start;
-  if (isNaN(end)) end = exclusive ? length : length - 1;
-  else if (end < 0) end = length + end;
-  start = ceil(start);
-  if (exclusive || !isSafeInteger(end)) {
-    end = ceil(end);
+  let s2 = start != null ? toNumber(start) : 0;
+  let e2 = end != null ? toNumber(end) : length - (exclusive ? 0 : 1);
+  if (isNaN(s2)) s2 = 0;
+  else if (s2 < 0) s2 = length + s2;
+  if (isNaN(e2)) e2 = exclusive ? length : length - 1;
+  else if (e2 < 0) e2 = length + e2;
+  s2 = ceil(s2);
+  if (exclusive || !isSafeInteger(e2)) {
+    e2 = ceil(e2);
   } else {
-    end = end + 1;
+    e2 = e2 + 1;
   }
-  return slice.call(value, start, end);
+  return slice.call(value, s2, e2);
 };
 var $Slice = (value, start, end) => {
-  $AssertInit(value);
-  if (!isVmArray(value)) throw new VmError(`Expected array, got ${display(value)}`, []);
-  const s2 = start != null ? $ToNumber(start) : 0;
-  const e2 = end != null ? $ToNumber(end) : value.length - 1;
-  return sliceCore(value, s2, e2, false);
+  return sliceCore(value, start, end, false);
 };
 var $SliceExclusive = (value, start, end) => {
-  $AssertInit(value);
-  if (!isVmArray(value)) throw new VmError(`Expected array, got ${display(value)}`, []);
-  const s2 = start != null ? $ToNumber(start) : 0;
-  const e2 = end != null ? $ToNumber(end) : value.length;
-  return sliceCore(value, s2, e2, true);
+  return sliceCore(value, start, end, true);
 };
 
 // src/vm/operations/helpers.ts
@@ -1112,23 +1051,6 @@ var $GlobalFallback = () => {
 // src/vm/operations/compound.ts
 var { trunc } = Math;
 var { at } = Array.prototype;
-var $In = (value, iterable) => {
-  $AssertInit(value);
-  $AssertInit(iterable);
-  if (iterable == null) return false;
-  if (typeof iterable != "object") return false;
-  if (isVmArray(iterable)) {
-    if (value == null) {
-      for (const item of iterable) if (item == null) return true;
-      return false;
-    }
-    if (isVmPrimitive(value)) return iterable.includes(value);
-    return iterable.some((item = null) => isSame(item, value));
-  }
-  const key = toString(value, void 0);
-  if (isVmWrapper(iterable)) return iterable.has(key);
-  return hasOwnEnumerable(iterable, key);
-};
 var $Length = (value) => {
   $AssertInit(value);
   if (isVmArray(value)) return value.length;
@@ -1136,31 +1058,6 @@ var $Length = (value) => {
   if (isVmWrapper(value)) return value.keys().length;
   throw new VmError(`Value has no length: ${display(value)}`, 0);
 };
-var $Omit = (value, omitted) => {
-  $AssertInit(value);
-  if (!isVmRecord(value)) return {};
-  const result = {};
-  const valueKeys = keys(value);
-  const omittedSet = new Set(omitted.map($ToString));
-  for (const key of valueKeys) {
-    if (!omittedSet.has(key)) {
-      result[key] = value[key] ?? null;
-    }
-  }
-  return result;
-};
-var $Pick = (value, picked) => {
-  $AssertInit(value);
-  if (!isVmRecord(value)) return {};
-  const result = {};
-  for (const key of picked) {
-    const k = $ToString(key);
-    if (hasOwnEnumerable(value, k)) {
-      result[k] = value[k] ?? null;
-    }
-  }
-  return result;
-};
 var $Has = (obj, key) => {
   $AssertInit(obj);
   const pk = $ToString(key);
@@ -1189,8 +1086,7 @@ var $Get = (obj, key) => {
     }
     return obj.get(pk) ?? null;
   }
-  if (!hasOwnEnumerable(obj, pk)) return null;
-  return $El(obj[pk] ?? null);
+  return $El(getRecord(obj, pk) ?? null);
 };
 var $Set = (obj, key, value) => {
   $AssertInit(obj);
@@ -1199,13 +1095,8 @@ var $Set = (obj, key, value) => {
   if (!isVmExtern(obj)) throw new VmError(`Expected extern, got ${display(obj)}`, void 0);
   obj.set(pk, value);
 };
-var $Iterable = (value) => {
-  $AssertInit(value);
-  if (isVmWrapper(value)) return value.keys();
-  if (isVmArray(value)) return value;
-  if (value != null && typeof value == "object") return keys(value);
-  throw new VmError(`Value is not iterable: ${display(value)}`, isVmFunction(value) ? [] : [value]);
-};
+
+// src/vm/operations/spread.ts
 var $RecordSpread = (record) => {
   $AssertInit(record);
   if (record == null || isVmRecord(record)) return record;
@@ -1253,41 +1144,82 @@ var $ArraySpread = (array) => {
   throw new VmError(`Expected array, iterable extern or nil, got ${display(array)}`, []);
 };
 
-// src/vm/operations/array-range.ts
-var assertArrayLength = (len2) => {
-  if (len2 > VM_ARRAY_MAX_LENGTH) {
-    throw new RangeError(`Array length exceeds maximum limit of ${VM_ARRAY_MAX_LENGTH}`);
+// src/vm/operations/record.ts
+var $Omit = (value, omitted) => {
+  $AssertInit(value);
+  if (!isVmRecord(value)) return {};
+  const result = {};
+  const valueKeys = keys(value);
+  const omittedSet = new Set(omitted.map(String));
+  for (const key of valueKeys) {
+    if (!omittedSet.has(key)) {
+      setRecord(result, key, value[key]);
+    }
   }
+  return result;
 };
-var isEmptyRange = (start, end) => {
-  return !isFinite(start) || !isFinite(end) || start > end;
+var $Pick = (value, picked) => {
+  $AssertInit(value);
+  if (!isVmRecord(value)) return {};
+  const result = {};
+  for (const key of picked) {
+    const k = String(key);
+    if (hasOwnEnumerable(value, k)) {
+      setRecord(result, k, value[k]);
+    }
+  }
+  return result;
 };
-var $ArrayRange = (start, end) => {
-  const s2 = $ToNumber(start);
-  const e2 = $ToNumber(end);
-  if (isEmptyRange(s2, e2)) return [];
-  const n = Math.floor(e2 - s2 + 1);
-  assertArrayLength(n);
-  const arr = [];
-  arr.length = n;
-  for (let i = 0; i < n; i++) {
-    arr[i] = s2 + i;
+
+// src/vm/operations/iterable.ts
+var $In = (value, iterable) => {
+  $AssertInit(value);
+  $AssertInit(iterable);
+  if (iterable == null) return false;
+  if (typeof iterable != "object") return false;
+  if (isVmArray(iterable)) {
+    if (value == null) {
+      for (const item of iterable) if (item == null) return true;
+      return false;
+    }
+    if (isVmPrimitive(value)) return iterable.includes(value);
+    return iterable.some((item = null) => isSame(item, value));
   }
-  return arr;
+  const key = toString(value, void 0);
+  if (isVmWrapper(iterable)) return iterable.has(key);
+  return hasOwnEnumerable(iterable, key);
 };
-var $ArrayRangeExclusive = (start, end) => {
+var $Iterable = (value) => {
+  $AssertInit(value);
+  if (isVmWrapper(value)) return value.keys();
+  if (isVmArray(value)) return value;
+  if (value != null && typeof value == "object") return keys(value);
+  throw new VmError(`Value is not iterable: ${display(value)}`, isVmFunction(value) ? [] : [value]);
+};
+
+// src/vm/operations/array-range.ts
+var makeArray = (start, end, exclusive) => {
   const s2 = $ToNumber(start);
   const e2 = $ToNumber(end);
-  if (isEmptyRange(s2, e2)) return [];
-  const n = Math.ceil(e2 - s2);
-  assertArrayLength(n);
+  if (!isFinite(s2) || !isFinite(e2) || s2 > e2) {
+    return [];
+  }
+  const n = exclusive ? Math.ceil(e2 - s2) : Math.floor(e2 - s2 + 1);
+  if (n > VM_ARRAY_MAX_LENGTH) {
+    throw new RangeError(`Array length exceeds maximum limit of ${VM_ARRAY_MAX_LENGTH}`);
+  }
   const arr = [];
-  arr.length = n;
   for (let i = 0; i < n; i++) {
     arr[i] = s2 + i;
   }
   return arr;
 };
+var $ArrayRange = (start, end) => {
+  return makeArray(start, end, false);
+};
+var $ArrayRangeExclusive = (start, end) => {
+  return makeArray(start, end, true);
+};
 
 // src/compiler/create-script.ts
 function wrapScript(source, mode, script) {
@@ -1387,9 +1319,11 @@ __export(global_exports, {
   find: () => find,
   flatten: () => flatten,
   floor: () => floor,
+  fold: () => fold,
   format: () => format,
   from_json: () => from_json,
   gamma: () => gamma,
+  group_by: () => group_by,
   hypot: () => hypot,
   join: () => join,
   keys: () => keys3,
@@ -1398,7 +1332,7 @@ __export(global_exports, {
   log10: () => log10,
   log1p: () => log1p,
   log2: () => log2,
-  map: () => map2,
+  map: () => map,
   max: () => max,
   min: () => min2,
   new_array: () => new_array,
@@ -1482,7 +1416,7 @@ function expectNumber(name, value) {
   }
   return v;
 }
-function expectNumberRange(name, value, min3, max2) {
+function expectNumberRange(name, value, min3, max3) {
   const v = expectNumber(name, value);
   if (!isFinite(v)) {
     throwError(`${describeParam(name)} is not a finite number: ${display(value)}`, NotNumber);
@@ -1490,18 +1424,18 @@ function expectNumberRange(name, value, min3, max2) {
   if (v < min3) {
     throwError(`${describeParam(name)} is less than minimum value ${min3}: ${display(value)}`, min3);
   }
-  if (v > max2) {
-    throwError(`${describeParam(name)} is greater than maximum value ${max2}: ${display(value)}`, max2);
+  if (v > max3) {
+    throwError(`${describeParam(name)} is greater than maximum value ${max3}: ${display(value)}`, max3);
   }
   return v;
 }
-function expectIntegerRange(name, value, min3, max2) {
+function expectIntegerRange(name, value, min3, max3) {
   const i = expectInteger(name, value);
   if (i < min3) {
     throwError(`${describeParam(name)} is less than minimum value ${min3}: ${display(value)}`, min3);
   }
-  if (i > max2) {
-    throwError(`${describeParam(name)} is greater than maximum value ${max2}: ${display(value)}`, max2);
+  if (i > max3) {
+    throwError(`${describeParam(name)} is greater than maximum value ${max3}: ${display(value)}`, max3);
   }
   return i;
 }
@@ -1578,7 +1512,7 @@ function arrayLen(len2) {
   }
   return len2;
 }
-function map(data, mapper) {
+function iterate(data, mapper) {
   if (isVmPrimitive(data)) {
     return mapper(data, null, data) ?? null;
   }
@@ -2195,7 +2129,7 @@ var withInner = (obj, key, keyIndex, value) => {
     result[index] = withInner(result[index], key, keyIndex + 1, value);
   } else {
     const prop = toString(k, void 0);
-    result[prop] = withInner(result[prop], key, keyIndex + 1, value);
+    setRecord(result, prop, withInner(result[prop], key, keyIndex + 1, value));
   }
   return result;
 };
@@ -2256,12 +2190,12 @@ var _with = VmLib(
         if (isVmArray(key)) {
           const firstKey = key[0];
           prop = toString(firstKey, void 0);
-          val = withInner(result[prop], key, 1, value);
+          val = withInner(getRecord(result, prop), key, 1, value);
         } else {
           prop = toString(key, void 0);
           val = value;
         }
-        result[prop] = val;
+        setRecord(result, prop, val);
       }
       return result;
     }
@@ -2334,8 +2268,13 @@ var entries2 = VmLib(
         arr.push({ 0: i, 1: data[i] ?? null });
       }
       return arr;
+    } else {
+      const arr = [];
+      for (const [key, value] of entries(data)) {
+        arr.push({ 0: key, 1: value ?? null });
+      }
+      return arr;
     }
-    return entries(data).map(([key, value]) => ({ 0: key, 1: value ?? null }));
   },
   {
     summary: "返回数组或记录的键值对列表",
@@ -2369,13 +2308,13 @@ var len = VmLib(
 function mapImplWrapped(data, fnName, fn, mapper) {
   expectConst("data", data, null);
   expectCallable(fnName, fn, data);
-  return map(data, (value, index, data2) => {
+  return iterate(data, (value, index, data2) => {
     const ret = mapper(fn, value, index, data2);
     if (ret === void 0 || isVmConst(ret)) return ret;
     return null;
   });
 }
-var map2 = VmLib(
+var map = VmLib(
   (data, f) => mapImplWrapped(data, "f", f, (fn, value, key, data2) => $Call(fn, [value, key, data2])),
   {
     summary: "对数组或记录中的每个元素应用函数，并返回结果",
@@ -2517,14 +2456,24 @@ var zip = VmLib(
     }
     if (length === 0) return [];
     const result = [];
-    const isArr = isVmArray(data);
-    for (let i = 0; i < length; i++) {
-      Cp();
-      const obj = isArr ? [] : {};
-      for (const { 0: key, 1: arr } of ets) {
-        obj[key] = arr[i] ?? null;
+    if (isVmArray(data)) {
+      for (let i = 0; i < length; i++) {
+        Cp();
+        const obj = [];
+        for (const { 0: key, 1: arr } of ets) {
+          obj[key] = arr[i] ?? null;
+        }
+        result.push(obj);
+      }
+    } else {
+      for (let i = 0; i < length; i++) {
+        Cp();
+        const obj = {};
+        for (const { 0: key, 1: arr } of ets) {
+          setRecord(obj, key, arr[i]);
+        }
+        result.push(obj);
       }
-      result.push(obj);
     }
     return result;
   },
@@ -2803,8 +2752,8 @@ var repeat = VmLib(
 
 // src/vm/lib/global/sequence/new.ts
 var new_record = VmLib(
-  (size2, generator) => {
-    const n = expectIntegerRange("size", size2, 0, PositiveInfinity);
+  (size3, generator) => {
+    const n = expectIntegerRange("size", size3, 0, PositiveInfinity);
     expectCallable("generator", generator, null);
     const result = {};
     for (let i = 0; i < n; i++) {
@@ -2812,7 +2761,7 @@ var new_record = VmLib(
       if (entry == null) continue;
       const key = $Get(entry, 0);
       const value = $El($Get(entry, 1));
-      result[toString(key)] = value;
+      setRecord(result, toString(key), value);
     }
     return result;
   },
@@ -2850,6 +2799,66 @@ var new_array = VmLib(
   }
 );
 
+// src/vm/lib/global/sequence/fold.ts
+var fold = VmLib(
+  (data, initial, f) => {
+    required("initial", initial, null);
+    expectConst("data", data, null);
+    expectCallable("f", f, data);
+    let acc = initial;
+    iterate(data, (value, index, data2) => {
+      acc = $Call(f, [acc, value, index, data2]);
+    });
+    return acc;
+  },
+  {
+    summary: "对数组或记录中的每个元素应用函数，并返回累积结果",
+    params: {
+      data: { type: "array | record", description: "要折叠的数组或记录" },
+      initial: { type: "any", description: "初始累积值" },
+      f: {
+        type: "fn(acc: type(initial), value: any, key: number | string, input: type(data)) -> type(initial)",
+        description: "应用于每个元素的函数"
+      }
+    },
+    returns: { type: "type(initial)" },
+    examples: ["fold([1, 2, 3], 0, fn (acc, x) { acc + x }) // 6"]
+  }
+);
+
+// src/vm/lib/global/sequence/group.ts
+var group_by = VmLib(
+  (data, key) => {
+    expectArray("data", data, null);
+    expectCallable("key", key, data);
+    const result = /* @__PURE__ */ new Map();
+    const len2 = data.length;
+    for (let i = 0; i < len2; i++) {
+      const v = data[i] ?? null;
+      const k = toString($Call(key, [v, i, data]), void 0);
+      let arr = result.get(k);
+      if (!arr) {
+        arr = [];
+        result.set(k, arr);
+      }
+      arr.push(v);
+    }
+    return fromEntries(result);
+  },
+  {
+    summary: "根据指定的键函数对数组进行分组",
+    params: {
+      data: { type: "array", description: "要分组的数组" },
+      key: {
+        type: "fn(value: any, index: number, arr: type(data)) -> string",
+        description: "用于生成分组键的函数"
+      }
+    },
+    returns: { type: "record" },
+    examples: ['group_by([1, 2, 3, 4], fn { it % 2 }) // ("0": [2, 4], "1": [1, 3])']
+  }
+);
+
 // src/vm/lib/global/debug.ts
 import supportsColor from "supports-color";
 function defaultSerializer(arg, format2) {
@@ -2857,7 +2866,7 @@ function defaultSerializer(arg, format2) {
 }
 function serializeValue(options, arg, format2) {
   const { serializer } = options;
-  if (serializer == null || serializer === defaultSerializer) {
+  if (serializer === defaultSerializer || serializer === null) {
     return defaultSerializer(arg, format2);
   }
   try {
@@ -2927,11 +2936,7 @@ var printParser = function(args) {
       templates.push(i < values4.length - 1 ? " " : "");
     }
   }
-  return {
-    templates,
-    values: values4,
-    formats
-  };
+  return { templates, values: values4, formats };
 };
 var printFormatter = function({
   templates,
@@ -3032,15 +3037,26 @@ var { parse, stringify } = JSON;
 var to_json = VmLib(
   (data) => {
     required("data", data, null);
-    if (isVmExtern(data) || isVmModule(data)) {
-      try {
-        return stringify(data.value) ?? null;
-      } catch (ex) {
-        rethrowError("Failed to convert extern to JSON", ex, "{}");
-      }
-    }
     if (typeof data == "function") return null;
-    return stringify(data);
+    return stringify(data, (key, value) => {
+      if (typeof value == "function") {
+        return void 0;
+      }
+      if (isVmModule(value)) {
+        return value.value;
+      }
+      if (isVmExtern(value)) {
+        const extern = value.value;
+        if ("toJSON" in extern && typeof extern.toJSON == "function") {
+          return extern.toJSON();
+        }
+        if (typeof extern == "function") {
+          return void 0;
+        }
+        return extern;
+      }
+      return value;
+    });
   },
   {
     summary: "将数据转换为 JSON 字符串",
@@ -3389,7 +3405,7 @@ __export(mod_exports, {
   matrix: () => matrix_exports
 });
 
-// src/vm/lib/mod/matrix.ts
+// src/vm/lib/mod/matrix/index.ts
 var matrix_exports = {};
 __export(matrix_exports, {
   add: () => add2,
@@ -3401,12 +3417,14 @@ __export(matrix_exports, {
   invert: () => invert,
   multiply: () => multiply,
   ones: () => ones,
-  size: () => size,
+  size: () => size2,
   subtract: () => subtract,
   transpose: () => transpose,
   zeros: () => zeros
 });
-function sizeImpl(matrix) {
+
+// src/vm/lib/mod/matrix/helpers.ts
+function size(matrix) {
   if (!isVmArray(matrix)) return [];
   if (matrix.length === 0) return [0];
   const numRows = matrix.length;
@@ -3423,46 +3441,12 @@ function sizeImpl(matrix) {
 function num(v) {
   return toNumber(v, void 0);
 }
-var size = VmLib(
-  (matrix) => {
-    required("matrix", matrix, []);
-    return sizeImpl(matrix);
-  },
-  {
-    summary: "获取矩阵尺寸",
-    params: { matrix: { type: "any[][]", description: "要获取尺寸的矩阵" } },
-    returns: { type: "[number, number]" },
-    examples: ["matrix.size([[1, 2], [3, 4]]) // [2, 2]"]
-  }
-);
-var transpose = VmLib(
-  (matrix) => {
-    required("matrix", matrix, []);
-    const [numRows, numCols] = sizeImpl(matrix);
-    if (numRows == null || numCols == null) return matrix;
-    const transposed = [];
-    for (let j = 0; j < numCols; j++) {
-      Cp();
-      const tj = [];
-      for (let i = 0; i < numRows; i++) {
-        const row = matrix[i] ?? null;
-        const item = row?.[j] ?? null;
-        tj[i] = item;
-      }
-      transposed[j] = tj;
-    }
-    return transposed;
-  },
-  {
-    summary: "转置矩阵",
-    params: { matrix: { type: "any[][]", description: "要转置的矩阵" } },
-    returns: { type: "any[][]" },
-    examples: ["matrix.transpose([[1, 2], [3, 4]]) // [[1, 3], [2, 4]]"]
-  }
-);
+
+// src/vm/lib/mod/matrix/bin-ops.ts
+var { max: max2 } = Math;
 function entrywiseImpl(a, b, f, vvf, mmf, vmf, mvf) {
-  let [ar, ac] = sizeImpl(a);
-  let [br, bc] = sizeImpl(b);
+  let [ar, ac] = size(a);
+  let [br, bc] = size(b);
   if (ar == null) {
     if (br == null) {
       return f(a, b);
@@ -3513,7 +3497,7 @@ function entrywiseImpl(a, b, f, vvf, mmf, vmf, mvf) {
     if (vvf != null) {
       return vvf(a, b, ar, br);
     }
-    const rr2 = Math.max(ar, br);
+    const rr2 = max2(ar, br);
     const result2 = [];
     for (let r = 0; r < rr2; r++) {
       const aItem = a[r] ?? null;
@@ -3541,8 +3525,8 @@ function entrywiseImpl(a, b, f, vvf, mmf, vmf, mvf) {
   if (mmf != null) {
     return mmf(a, b, ar, ac, br, bc);
   }
-  const rr = Math.max(ar, br);
-  const rc = Math.max(ac, bc);
+  const rr = max2(ar, br);
+  const rc = max2(ac, bc);
   const result = [];
   for (let r = 0; r < rr; r++) {
     const rRow = [];
@@ -3651,7 +3635,7 @@ var multiply = VmLib(
       b,
       $Mul,
       (a2, b2, al, bl) => {
-        const l = Math.max(al, bl);
+        const l = max2(al, bl);
         let s2 = 0;
         for (let i = 0; i < l; i++) {
           s2 += num(a2[i]) * num(b2[i]);
@@ -3710,12 +3694,111 @@ var multiply = VmLib(
     examples: ["matrix.multiply([[1, 2], [3, 4]], [5, 6]) // [17, 39]"]
   }
 );
+
+// src/vm/lib/mod/matrix/fill.ts
+function filled(size3, value) {
+  const s2 = getNumbers(size3);
+  if (s2.length === 0) return [];
+  while (s2.length > 0) {
+    const repeat2 = arrayLen(s2.pop());
+    Cp();
+    const data = [];
+    data.length = repeat2;
+    data.fill(value);
+    value = data;
+  }
+  return value;
+}
+var zeros = VmLib((...size3) => filled(size3, 0), {
+  summary: "创建一个全零的矩阵",
+  params: { "..size": { type: "number[]", description: "矩阵的维度" } },
+  returns: { type: "number[][]" },
+  examples: ["matrix.zeros(2, 3) // [[0, 0, 0], [0, 0, 0]]"]
+});
+var ones = VmLib((...size3) => filled(size3, 1), {
+  summary: "创建一个全一的矩阵",
+  params: { "..size": { type: "number[]", description: "矩阵的维度" } },
+  returns: { type: "number[][]" },
+  examples: ["matrix.ones(2, 2) // [[1, 1], [1, 1]]"]
+});
+var identity = VmLib(
+  (...size3) => {
+    let s2 = getNumbers(size3);
+    if (s2.length === 0) return [];
+    if (s2.length > 2) throwError("Invalid matrix size", []);
+    if (s2.length === 1) s2 = [s2[0], s2[0]];
+    const m = arrayLen(s2[0]);
+    const n = arrayLen(s2[1]);
+    const ret = [];
+    for (let i = 0; i < m; i++) {
+      const row = [];
+      ret[i] = row;
+      row.length = n;
+      row.fill(0);
+      if (i < n) row[i] = 1;
+    }
+    return ret;
+  },
+  {
+    summary: "创建一个单位矩阵",
+    params: { "..size": { type: "[number] | [number, number]", description: "矩阵的维度" } },
+    returns: { type: "number[][]" },
+    examples: ["matrix.identity(3) // [[1, 0, 0], [0, 1, 0], [0, 0, 1]]"]
+  }
+);
+var diagonal = VmLib(
+  (x, k = 0) => {
+    expectArray("x", x, []);
+    const fk = expectInteger("k", k);
+    if (x.every((e2) => isArray(e2))) {
+      const diag = [];
+      for (let i = 0; i < x.length; i++) {
+        const row = x[i];
+        const r = i + fk;
+        if (r < 0) continue;
+        if (!row || r >= row.length) break;
+        diag.push(row[r] ?? null);
+      }
+      return diag;
+    }
+    const l = x.length;
+    const m = arrayLen(fk < 0 ? l - fk : l);
+    const n = arrayLen(fk > 0 ? l + fk : l);
+    const result = [];
+    for (let i = 0; i < m; i++) {
+      const row = [];
+      result[i] = row;
+      row.length = n;
+      row.fill(0);
+      for (let j = 0; j < n; j++) {
+        if (i + fk === j) {
+          row[j] = x[fk >= 0 ? i : j] ?? null;
+        }
+      }
+    }
+    return result;
+  },
+  {
+    summary: "创建一个对角矩阵或获取矩阵的对角线",
+    params: {
+      x: { type: "number[] | number[][]", description: "对角线元素或要获取对角线的矩阵" },
+      k: { type: "number", description: "对角线偏移量，默认为 0" }
+    },
+    returns: { type: "number[][] | number[]" },
+    examples: [
+      "matrix.diagonal([1, 2, 3]) // [[1, 0, 0], [0, 2, 0], [0, 0, 3]]",
+      "matrix.diagonal([[1, 2], [3, 4]]) // [1, 4]"
+    ]
+  }
+);
+
+// src/vm/lib/mod/matrix/invert.ts
 var invert = VmLib(
   (a) => {
     expectConst("a", a, null);
-    const [rows, cols] = sizeImpl(a);
+    const [rows, cols] = size(a);
     if (rows == null) return 1 / num(a);
-    if (cols == null) return map(a, (v) => 1 / num(v));
+    if (cols == null) return iterate(a, (v) => 1 / num(v));
     if (rows !== cols) throwError(`Matrix must be square`, a);
     const m = a;
     if (rows === 1) {
@@ -3800,99 +3883,46 @@ var invert = VmLib(
     examples: ["matrix.invert([[1, 2], [3, 4]]) // [[-2, 1], [1.5, -0.5]]"]
   }
 );
-function filled(size2, value) {
-  const s2 = getNumbers(size2);
-  if (s2.length === 0) return [];
-  while (s2.length > 0) {
-    const repeat2 = arrayLen(s2.pop());
-    Cp();
-    const data = [];
-    data.length = repeat2;
-    data.fill(value);
-    value = data;
-  }
-  return value;
-}
-var zeros = VmLib((...size2) => filled(size2, 0), {
-  summary: "创建一个全零的矩阵",
-  params: { "..size": { type: "number[]", description: "矩阵的维度" } },
-  returns: { type: "number[][]" },
-  examples: ["matrix.zeros(2, 3) // [[0, 0, 0], [0, 0, 0]]"]
-});
-var ones = VmLib((...size2) => filled(size2, 1), {
-  summary: "创建一个全一的矩阵",
-  params: { "..size": { type: "number[]", description: "矩阵的维度" } },
-  returns: { type: "number[][]" },
-  examples: ["matrix.ones(2, 2) // [[1, 1], [1, 1]]"]
-});
-var identity = VmLib(
-  (...size2) => {
-    let s2 = getNumbers(size2);
-    if (s2.length === 0) return [];
-    if (s2.length > 2) throwError("Invalid matrix size", []);
-    if (s2.length === 1) s2 = [s2[0], s2[0]];
-    const m = arrayLen(s2[0]);
-    const n = arrayLen(s2[1]);
-    const ret = [];
-    for (let i = 0; i < m; i++) {
-      const row = [];
-      ret[i] = row;
-      row.length = n;
-      row.fill(0);
-      if (i < n) row[i] = 1;
-    }
-    return ret;
+
+// src/vm/lib/mod/matrix/size.ts
+var size2 = VmLib(
+  (matrix) => {
+    required("matrix", matrix, []);
+    return size(matrix);
   },
   {
-    summary: "创建一个单位矩阵",
-    params: { "..size": { type: "[number] | [number, number]", description: "矩阵的维度" } },
-    returns: { type: "number[][]" },
-    examples: ["matrix.identity(3) // [[1, 0, 0], [0, 1, 0], [0, 0, 1]]"]
+    summary: "获取矩阵尺寸",
+    params: { matrix: { type: "any[][]", description: "要获取尺寸的矩阵" } },
+    returns: { type: "[number, number]" },
+    examples: ["matrix.size([[1, 2], [3, 4]]) // [2, 2]"]
   }
 );
-var diagonal = VmLib(
-  (x, k = 0) => {
-    expectArray("x", x, []);
-    const fk = expectInteger("k", k);
-    if (x.every((e2) => isArray(e2))) {
-      const diag = [];
-      for (let i = 0; i < x.length; i++) {
-        const row = x[i];
-        const r = i + fk;
-        if (r < 0) continue;
-        if (!row || r >= row.length) break;
-        diag.push(row[r] ?? null);
-      }
-      return diag;
-    }
-    const l = x.length;
-    const m = arrayLen(fk < 0 ? l - fk : l);
-    const n = arrayLen(fk > 0 ? l + fk : l);
-    const result = [];
-    for (let i = 0; i < m; i++) {
-      const row = [];
-      result[i] = row;
-      row.length = n;
-      row.fill(0);
-      for (let j = 0; j < n; j++) {
-        if (i + fk === j) {
-          row[j] = x[fk >= 0 ? i : j] ?? null;
-        }
+
+// src/vm/lib/mod/matrix/transpose.ts
+var transpose = VmLib(
+  (matrix) => {
+    required("matrix", matrix, []);
+    const [numRows, numCols] = size(matrix);
+    if (numRows == null || numCols == null) return matrix;
+    const m = matrix;
+    const transposed = [];
+    for (let j = 0; j < numCols; j++) {
+      Cp();
+      const tj = [];
+      for (let i = 0; i < numRows; i++) {
+        const row = m[i] ?? null;
+        const item = row?.[j] ?? null;
+        tj[i] = item;
       }
+      transposed[j] = tj;
     }
-    return result;
+    return transposed;
   },
   {
-    summary: "创建一个对角矩阵或获取矩阵的对角线",
-    params: {
-      x: { type: "number[] | number[][]", description: "对角线元素或要获取对角线的矩阵" },
-      k: { type: "number", description: "对角线偏移量，默认为 0" }
-    },
-    returns: { type: "number[][] | number[]" },
-    examples: [
-      "matrix.diagonal([1, 2, 3]) // [[1, 0, 0], [0, 2, 0], [0, 0, 3]]",
-      "matrix.diagonal([[1, 2], [3, 4]]) // [1, 4]"
-    ]
+    summary: "转置矩阵",
+    params: { matrix: { type: "any[][]", description: "要转置的矩阵" } },
+    returns: { type: "any[][]" },
+    examples: ["matrix.transpose([[1, 2], [3, 4]]) // [[1, 3], [2, 4]]"]
   }
 );
 
@@ -3949,7 +3979,6 @@ for (const [name, value] of entries(mod_exports)) {
 var lib = Object.freeze(Object.assign(create(null), global_exports, mod_exports));
 
 export {
-  convert_exports,
   VmExtern,
   wrapToVmValue,
   unwrapFromVmValue,
@@ -3967,4 +3996,4 @@ export {
   emitScript,
   lib
 };
-//# sourceMappingURL=chunk-ZRLBJK6A.js.map
+//# sourceMappingURL=chunk-BPFOJ4Q6.js.map