@mirascript/mirascript 0.1.62-alpha.8 → 0.1.63

package/dist/{chunk-6CAGNGY6.js → chunk-5BBTXV5A.js}

@@ -15,9 +15,11 @@ import {
   emit,
   entries,
   formatDiagnostics,
+  freeze,
   fromEntries,
   getOwnPropertyNames,
   getPrototypeOf,
+  getVmType,
   hasOwn,
   hasOwnEnumerable,
   innerToString,
@@ -46,7 +48,7 @@ import {
   parseDiagnostics,
   toString,
   values
-} from "./chunk-VRGQ23AK.js";
+} from "./chunk-HZYARHEQ.js";
 
 // src/compiler/load-module.ts
 import { loadModule } from "@mirascript/bindings";
@@ -181,21 +183,22 @@ var VmWrapper = class {
 Object.defineProperty(VmWrapper.prototype, kVmWrapper, { value: true });
 
 // src/vm/operations/common.ts
-function $AssertInit(value) {
+var $AssertInit = (value) => {
   if (value === void 0) throw new VmError(`Uninitialized value`, null);
-}
+};
 
 // src/vm/operations/call.ts
 function $Call(func, args) {
-  for (const a of args) {
-    $AssertInit(a);
+  const argsLen = args.length;
+  for (let i = 0; i < argsLen; i++) {
+    $AssertInit(args[i]);
+  }
+  if (typeof func == "function") {
+    return func(...args) ?? null;
   }
   if (isVmExtern(func)) {
     return func.call(args) ?? null;
   }
-  if (isVmFunction(func)) {
-    return func(...args) ?? null;
-  }
   throw new VmError(`Value is not callable: ${display(func)}`, null);
 }
 function $VArgs(varags) {
@@ -460,68 +463,6 @@ var VmExtern = class extends VmWrapper {
 };
 Object.defineProperty(VmExtern.prototype, kVmExtern, { value: true });
 
-// src/vm/checkpoint.ts
-var { now } = Date;
-var TIME_ORIGIN = now() - 1e3 * 3600 * 12;
-var timestamp = () => now() - TIME_ORIGIN | 0;
-var CP_DEFAULT_INTERVAL = 100;
-var MAX_DEPTH = 128;
-var CP_UNSET = -1;
-var CP_DEFAULT_TIMEOUT = 100;
-var cpTimeout = CP_DEFAULT_TIMEOUT | 0;
-var cpInterval = CP_DEFAULT_INTERVAL | 0;
-var cpDepth = 0;
-var cp = CP_UNSET | 0;
-var cpCounter = 0;
-function Cp() {
-  if ((cpCounter = cpCounter + 1 | 0) % (cpInterval | 0) !== 0) {
-    return;
-  }
-  cpCounter = 0;
-  if ((cp | 0) === (CP_UNSET | 0)) {
-    cp = timestamp() | 0;
-  } else if ((timestamp() | 0) - (cp | 0) >= (cpTimeout | 0)) {
-    throw new RangeError("Execution timed out");
-  }
-}
-function CpEnter() {
-  cpDepth = (cpDepth | 0) + 1;
-  if ((cpDepth | 0) <= 1) {
-    cp = CP_UNSET | 0;
-    cpCounter = 0;
-    cpDepth = 1;
-  } else if ((cpDepth | 0) > MAX_DEPTH) {
-    throw new RangeError("Maximum call depth exceeded");
-  } else {
-    Cp();
-  }
-}
-function CpExit() {
-  cpDepth = (cpDepth | 0) - 1;
-  if ((cpDepth | 0) < 1) {
-    cp = CP_UNSET | 0;
-    cpCounter = 0;
-    cpDepth = 0;
-  } else {
-    Cp();
-  }
-}
-var INT_MAX = 2147483647;
-function configCheckpoint(timeout = CP_DEFAULT_TIMEOUT, checkInterval = CP_DEFAULT_INTERVAL) {
-  if (typeof timeout !== "number" || timeout <= 0 || isNaN(timeout)) {
-    throw new RangeError("Invalid timeout value");
-  } else if (timeout > INT_MAX) {
-    timeout = INT_MAX;
-  }
-  if (typeof checkInterval !== "number" || checkInterval <= 0 || isNaN(checkInterval)) {
-    throw new RangeError("Invalid check interval value");
-  } else if (checkInterval > INT_MAX) {
-    checkInterval = INT_MAX;
-  }
-  cpTimeout = timeout | 0;
-  cpInterval = checkInterval | 0;
-}
-
 // src/vm/types/function.ts
 var nameIfNotAnonymous = ({ name }, fallback) => {
   if (!name) return fallback;
@@ -541,7 +482,6 @@ function VmFunction(fn, option = {}) {
     opt = {
       ...option,
       isLib: true,
-      injectCp: false,
       name: nameIfNotAnonymous(option, null)
     };
   } else {
@@ -560,26 +500,12 @@ function VmFunction(fn, option = {}) {
     deprecated: opt.deprecated ?? void 0
   };
   const name = opt.name ?? fn.name;
-  if (opt.injectCp) {
-    const original = fn;
-    info.original = original;
-    fn = ((...args) => {
-      try {
-        CpEnter();
-        const ret = original(...args);
-        return ret;
-      } finally {
-        CpExit();
-      }
-    });
-  }
   defineProperty(fn, "name", { value: name, configurable: true });
-  defineProperty(fn, kVmFunction, { value: Object.freeze(info) });
+  defineProperty(fn, kVmFunction, { value: freeze(info) });
   return fn;
 }
 
 // src/vm/types/context.ts
-var { freeze } = Object;
 var VM_SHARED_CONTEXT = create(null);
 var VM_SHARED_CONTEXT_DESCRIPTIONS = create(null);
 var VM_SHARED_CONTEXT_KEYS = null;
@@ -780,6 +706,68 @@ var VmModule = class extends VmWrapper {
 };
 Object.defineProperty(VmModule.prototype, kVmModule, { value: true });
 
+// src/vm/checkpoint.ts
+var { now } = Date;
+var TIME_ORIGIN = now() - 1e3 * 3600 * 12;
+var timestamp = () => now() - TIME_ORIGIN | 0;
+var CP_DEFAULT_INTERVAL = 100;
+var MAX_DEPTH = 128;
+var CP_UNSET = -1;
+var CP_DEFAULT_TIMEOUT = 100;
+var cpTimeout = CP_DEFAULT_TIMEOUT | 0;
+var cpInterval = CP_DEFAULT_INTERVAL | 0;
+var cpDepth = 0;
+var cp = CP_UNSET | 0;
+var cpCounter = 0;
+var Cp = () => {
+  if ((cpCounter = cpCounter + 1 | 0) % (cpInterval | 0) !== 0) {
+    return;
+  }
+  cpCounter = 0;
+  if ((cp | 0) === (CP_UNSET | 0)) {
+    cp = timestamp() | 0;
+  } else if ((timestamp() | 0) - (cp | 0) >= (cpTimeout | 0)) {
+    throw new RangeError("Execution timed out");
+  }
+};
+var CpEnter = () => {
+  cpDepth = (cpDepth | 0) + 1;
+  if ((cpDepth | 0) <= 1) {
+    cp = CP_UNSET | 0;
+    cpCounter = 0;
+    cpDepth = 1;
+  } else if ((cpDepth | 0) > MAX_DEPTH) {
+    throw new RangeError("Maximum call depth exceeded");
+  } else {
+    Cp();
+  }
+};
+var CpExit = () => {
+  cpDepth = (cpDepth | 0) - 1;
+  if ((cpDepth | 0) < 1) {
+    cp = CP_UNSET | 0;
+    cpCounter = 0;
+    cpDepth = 0;
+  } else {
+    Cp();
+  }
+};
+var INT_MAX = 2147483647;
+function configCheckpoint(timeout = CP_DEFAULT_TIMEOUT, checkInterval = CP_DEFAULT_INTERVAL) {
+  if (typeof timeout !== "number" || timeout <= 0 || isNaN(timeout)) {
+    throw new RangeError("Invalid timeout value");
+  } else if (timeout > INT_MAX) {
+    timeout = INT_MAX;
+  }
+  if (typeof checkInterval !== "number" || checkInterval <= 0 || isNaN(checkInterval)) {
+    throw new RangeError("Invalid check interval value");
+  } else if (checkInterval > INT_MAX) {
+    checkInterval = INT_MAX;
+  }
+  cpTimeout = timeout | 0;
+  cpInterval = checkInterval | 0;
+}
+
 // src/vm/operations/index.ts
 var operations_exports = {};
 __export(operations_exports, {
@@ -845,67 +833,64 @@ __export(operations_exports, {
 });
 
 // src/vm/operations/convert.ts
-function $ToBoolean(value) {
+var $ToBoolean = (value) => {
   if (typeof value == "boolean") return value;
   $AssertInit(value);
   return toBoolean(value, void 0);
-}
-function $ToString(value) {
+};
+var $ToString = (value) => {
   if (typeof value == "string") return value;
   $AssertInit(value);
   return toString(value, void 0);
-}
-function $ToNumber(value) {
+};
+var $ToNumber = (value) => {
   if (typeof value == "number") return value;
   $AssertInit(value);
   return toNumber(value, void 0);
-}
-function $Format(value, format2) {
+};
+var $Format = (value, format2) => {
   $AssertInit(value);
   return toFormat(value, format2);
-}
+};
 
 // src/vm/operations/type-check.ts
-function $Type(value) {
+var $Type = (value) => {
   if (value == null) return "nil";
-  if (isVmWrapper(value)) return value.type;
-  if (isVmArray(value)) return "array";
-  if (typeof value == "object") return "record";
-  return typeof value;
-}
-function $IsBoolean(value) {
+  return getVmType(value);
+};
+var $IsBoolean = (value) => {
   $AssertInit(value);
   return typeof value == "boolean";
-}
-function $IsNumber(value) {
+};
+var $IsNumber = (value) => {
   $AssertInit(value);
   return typeof value == "number";
-}
-function $IsString(value) {
+};
+var $IsString = (value) => {
   $AssertInit(value);
   return typeof value == "string";
-}
-function $IsRecord(value) {
+};
+var $IsRecord = (value) => {
   $AssertInit(value);
   return isVmRecord(value);
-}
-function $IsArray(value) {
+};
+var $IsArray = (value) => {
   $AssertInit(value);
   return isVmArray(value);
-}
-function $AssertNonNil(value) {
+};
+var $AssertNonNil = (value) => {
   $AssertInit(value);
   if (value !== null) return;
   throw new VmError(`Expected non-nil value`, null);
-}
+};
 
 // src/vm/operations/utils.ts
-function overloadNumberString(a, b) {
+var overloadNumberString = (a, b) => {
   if (typeof a == "number" || typeof b == "number") return true;
   if (typeof a == "string" || typeof b == "string") return false;
   return true;
-}
-function isSame(a, b) {
+};
+var isSame = (a, b) => {
   if (typeof a == "number" && typeof b == "number") {
     return a === b || isNaN(a) && isNaN(b);
   }
@@ -942,84 +927,94 @@ function isSame(a, b) {
     return true;
   }
   return false;
-}
+};
 
 // src/vm/operations/operator.ts
 function $Concat(...args) {
   return args.map((a) => toFormat(a, null)).join("");
 }
-function $Pos(a) {
-  return $ToNumber(a);
-}
-function $Neg(a) {
-  return -$ToNumber(a);
-}
-function $Not(a) {
-  return !$ToBoolean(a);
-}
-function $Add(a, b) {
-  return $ToNumber(a) + $ToNumber(b);
-}
-function $Sub(a, b) {
-  return $ToNumber(a) - $ToNumber(b);
-}
-function $Mul(a, b) {
-  return $ToNumber(a) * $ToNumber(b);
-}
-function $Div(a, b) {
-  return $ToNumber(a) / $ToNumber(b);
-}
-function $Mod(a, b) {
-  return $ToNumber(a) % $ToNumber(b);
-}
-function $Pow(a, b) {
-  return $ToNumber(a) ** $ToNumber(b);
-}
-function $And(a, b) {
-  return $ToBoolean(a) && $ToBoolean(b);
-}
-function $Or(a, b) {
-  return $ToBoolean(a) || $ToBoolean(b);
-}
-function $Gt(a, b) {
+var $Pos = $ToNumber;
+var $Neg = (a) => -$ToNumber(a);
+var $Not = (a) => !$ToBoolean(a);
+var add = (a, b) => $ToNumber(a) + $ToNumber(b);
+var $Add = (a, b) => {
+  if (typeof a == "number" && typeof b == "number") return a + b;
+  return add(a, b);
+};
+var sub = (a, b) => $ToNumber(a) - $ToNumber(b);
+var $Sub = (a, b) => {
+  if (typeof a == "number" && typeof b == "number") return a - b;
+  return sub(a, b);
+};
+var mul = (a, b) => $ToNumber(a) * $ToNumber(b);
+var $Mul = (a, b) => {
+  if (typeof a == "number" && typeof b == "number") return a * b;
+  return mul(a, b);
+};
+var div = (a, b) => $ToNumber(a) / $ToNumber(b);
+var $Div = (a, b) => {
+  if (typeof a == "number" && typeof b == "number") return a / b;
+  return div(a, b);
+};
+var mod = (a, b) => $ToNumber(a) % $ToNumber(b);
+var $Mod = (a, b) => {
+  if (typeof a == "number" && typeof b == "number") return a % b;
+  return mod(a, b);
+};
+var pow = (a, b) => $ToNumber(a) ** $ToNumber(b);
+var $Pow = (a, b) => {
+  if (typeof a == "number" && typeof b == "number") return a ** b;
+  return pow(a, b);
+};
+var and = (a, b) => $ToBoolean(a) && $ToBoolean(b);
+var $And = (a, b) => {
+  if (typeof a == "boolean" && typeof b == "boolean") return a && b;
+  return and(a, b);
+};
+var or = (a, b) => $ToBoolean(a) || $ToBoolean(b);
+var $Or = (a, b) => {
+  if (typeof a == "boolean" && typeof b == "boolean") return a || b;
+  return or(a, b);
+};
+var $Gt = (a, b) => {
   if (overloadNumberString(a, b)) {
     return $ToNumber(a) > $ToNumber(b);
   } else {
     return $ToString(a) > $ToString(b);
   }
-}
-function $Gte(a, b) {
+};
+var $Gte = (a, b) => {
   if (overloadNumberString(a, b)) {
     return $ToNumber(a) >= $ToNumber(b);
   } else {
     return $ToString(a) >= $ToString(b);
   }
-}
-function $Lt(a, b) {
+};
+var $Lt = (a, b) => {
   if (overloadNumberString(a, b)) {
     return $ToNumber(a) < $ToNumber(b);
   } else {
     return $ToString(a) < $ToString(b);
   }
-}
-function $Lte(a, b) {
+};
+var $Lte = (a, b) => {
   if (overloadNumberString(a, b)) {
     return $ToNumber(a) <= $ToNumber(b);
   } else {
     return $ToString(a) <= $ToString(b);
   }
-}
-function $Eq(a, b) {
+};
+var $Eq = (a, b) => {
   $AssertInit(a);
   $AssertInit(b);
   if (typeof a == "number" && typeof b == "number") return a === b;
   return isSame(a, b);
-}
-function $Neq(a, b) {
+};
+var $Neq = (a, b) => {
   return !$Eq(a, b);
-}
+};
 var { abs, min } = Math;
-function $Aeq(a, b) {
+var $Aeq = (a, b) => {
   if (overloadNumberString(a, b)) {
     const an = $ToNumber(a);
     const bn = $ToNumber(b);
@@ -1041,18 +1036,18 @@ function $Aeq(a, b) {
     const bn = bi.normalize("NFC");
     return an === bn;
   }
-}
-function $Naeq(a, b) {
+};
+var $Naeq = (a, b) => {
   return !$Aeq(a, b);
-}
-function $Same(a, b) {
+};
+var $Same = (a, b) => {
   $AssertInit(a);
   $AssertInit(b);
   return isSame(a, b);
-}
-function $Nsame(a, b) {
+};
+var $Nsame = (a, b) => {
   return !$Same(a, b);
-}
+};
 
 // src/vm/operations/slice.ts
 var { ceil } = Math;
@@ -1071,85 +1066,55 @@ var sliceCore = (value, start, end, exclusive) => {
   }
   return slice.call(value, start, end);
 };
-function $Slice(value, start, end) {
+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);
-}
-function $SliceExclusive(value, start, end) {
+};
+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);
-}
+};
 
 // src/vm/operations/helpers.ts
-function $Module(name, body) {
-  const mod = create(null);
+var $Module = (name, body) => {
+  const mod2 = create(null);
   for (const [key, get] of entries(body)) {
-    defineProperty(mod, key, { __proto__: null, get, enumerable: true });
+    defineProperty(mod2, key, { __proto__: null, get, enumerable: true, configurable: true });
   }
-  return new VmModule(name, mod);
-}
-function $El(value) {
+  return new VmModule(name, mod2);
+};
+var $El = (value) => {
   $AssertInit(value);
   if (!isVmConst(value)) return null;
   return value;
-}
+};
 var EMPTY = create(null);
-function $ElOpt(key, value) {
+var $ElOpt = (key, value) => {
   $AssertInit(value);
   if (value == null || !isVmConst(value)) return EMPTY;
   return { __proto__: null, [key]: value };
-}
-function $Fn(name, fn) {
-  return VmFunction(fn, { isLib: false, injectCp: false, name: name || VM_FUNCTION_ANONYMOUS_NAME });
-}
-function $Upvalue(value) {
+};
+var $Fn = (name, fn) => {
+  return VmFunction(fn, { isLib: false, name: name || VM_FUNCTION_ANONYMOUS_NAME });
+};
+var $Upvalue = (value) => {
   $AssertInit(value);
   return value;
-}
-var assertArrayLength = (len2) => {
-  if (len2 > VM_ARRAY_MAX_LENGTH) {
-    throw new RangeError(`Array length exceeds maximum limit of ${VM_ARRAY_MAX_LENGTH}`);
-  }
 };
-var isEmptyRange = (start, end) => {
-  return !isFinite(start) || !isFinite(end) || start > end;
-};
-function $ArrayRange(start, end) {
-  const s2 = $ToNumber(start);
-  const e2 = $ToNumber(end);
-  if (isEmptyRange(s2, e2)) return [];
-  assertArrayLength(e2 - s2 + 1);
-  const arr = [];
-  for (let i = s2; i <= e2; i++) {
-    arr.push(i);
-  }
-  return arr;
-}
-function $ArrayRangeExclusive(start, end) {
-  const s2 = $ToNumber(start);
-  const e2 = $ToNumber(end);
-  if (isEmptyRange(s2, e2)) return [];
-  assertArrayLength(e2 - s2);
-  const arr = [];
-  for (let i = s2; i < e2; i++) {
-    arr.push(i);
-  }
-  return arr;
-}
-function $GlobalFallback() {
+var $GlobalFallback = () => {
   return DefaultVmContext;
-}
+};
 
 // src/vm/operations/compound.ts
 var { trunc } = Math;
 var { at } = Array.prototype;
-function $In(value, iterable) {
+var $In = (value, iterable) => {
   $AssertInit(value);
   $AssertInit(iterable);
   if (iterable == null) return false;
@@ -1165,17 +1130,17 @@ function $In(value, iterable) {
   const key = toString(value, void 0);
   if (isVmWrapper(iterable)) return iterable.has(key);
   return hasOwnEnumerable(iterable, key);
-}
-function $Length(value) {
+};
+var $Length = (value) => {
   $AssertInit(value);
   if (isVmArray(value)) return value.length;
   if (isVmRecord(value)) return keys(value).length;
   if (isVmWrapper(value)) return value.keys().length;
   throw new VmError(`Value has no length: ${display(value)}`, 0);
-}
-function $Omit(value, omitted) {
+};
+var $Omit = (value, omitted) => {
   $AssertInit(value);
-  if (value == null || !isVmRecord(value)) return {};
+  if (!isVmRecord(value)) return {};
   const result = {};
   const valueKeys = keys(value);
   const omittedSet = new Set(omitted.map($ToString));
@@ -1185,10 +1150,10 @@ function $Omit(value, omitted) {
     }
   }
   return result;
-}
-function $Pick(value, picked) {
+};
+var $Pick = (value, picked) => {
   $AssertInit(value);
-  if (value == null || !isVmRecord(value)) return {};
+  if (!isVmRecord(value)) return {};
   const result = {};
   for (const key of picked) {
     const k = $ToString(key);
@@ -1197,20 +1162,20 @@ function $Pick(value, picked) {
     }
   }
   return result;
-}
-function $Has(obj, key) {
+};
+var $Has = (obj, key) => {
   $AssertInit(obj);
   const pk = $ToString(key);
   if (obj == null || typeof obj != "object") return false;
   if (isVmWrapper(obj)) return obj.has(pk);
   return hasOwnEnumerable(obj, pk);
-}
-function $Get(obj, key) {
+};
+var $Get = (obj, key) => {
   $AssertInit(obj);
   if (isVmArray(obj)) {
     $AssertInit(key);
     const index = toNumber(key, NotNumber);
-    if (isNaN(index)) return null;
+    if (!isFinite(index)) return null;
     return $El(at.call(obj, trunc(index)) ?? null);
   }
   const pk = $ToString(key);
@@ -1228,23 +1193,22 @@ function $Get(obj, key) {
   }
   if (!hasOwnEnumerable(obj, pk)) return null;
   return $El(obj[pk] ?? null);
-}
-function $Set(obj, key, value) {
+};
+var $Set = (obj, key, value) => {
   $AssertInit(obj);
   $AssertInit(value);
   const pk = $ToString(key);
-  if (obj == null) return;
   if (!isVmExtern(obj)) throw new VmError(`Expected extern, got ${display(obj)}`, void 0);
   obj.set(pk, value);
-}
-function $Iterable(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]);
-}
-function $RecordSpread(record) {
+};
+var $RecordSpread = (record) => {
   $AssertInit(record);
   if (record == null || isVmRecord(record)) return record;
   if (isVmArray(record)) {
@@ -1267,8 +1231,8 @@ function $RecordSpread(record) {
     return result;
   }
   throw new VmError(`Expected record, array, extern or nil, got ${display(record)}`, null);
-}
-function $ArraySpread(array) {
+};
+var $ArraySpread = (array) => {
   $AssertInit(array);
   if (array == null) return [];
   if (isVmArray(array)) return array;
@@ -1289,7 +1253,39 @@ function $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}`);
+  }
+};
+var isEmptyRange = (start, end) => {
+  return !isFinite(start) || !isFinite(end) || start > end;
+};
+var $ArrayRange = (start, end) => {
+  const s2 = $ToNumber(start);
+  const e2 = $ToNumber(end);
+  if (isEmptyRange(s2, e2)) return [];
+  assertArrayLength(e2 - s2 + 1);
+  const arr = [];
+  for (let i = s2; i <= e2; i++) {
+    arr.push(i);
+  }
+  return arr;
+};
+var $ArrayRangeExclusive = (start, end) => {
+  const s2 = $ToNumber(start);
+  const e2 = $ToNumber(end);
+  if (isEmptyRange(s2, e2)) return [];
+  assertArrayLength(e2 - s2);
+  const arr = [];
+  for (let i = s2; i < e2; i++) {
+    arr.push(i);
+  }
+  return arr;
+};
 
 // src/compiler/create-script.ts
 function wrapScript(source, mode, script) {
@@ -1326,15 +1322,20 @@ return ${code}`)(...values2);
 }
 
 // src/compiler/emit-script.ts
-function reportDiagnostic(source, diagnostics, fileName) {
-  const parsed = parseDiagnostics(source, diagnostics);
-  const messages = formatDiagnostics(parsed.errors, source, fileName);
-  throw new Error(`Failed to compile:
+var CompileError = class extends Error {
+  constructor(source, diagnostics, fileName) {
+    const parsed = parseDiagnostics(source, diagnostics);
+    const messages = formatDiagnostics(parsed.errors, source, fileName);
+    super(`Failed to compile:
 ${messages.join("\n")}`);
-}
+    this.fileName = fileName;
+    this.name = "CompileError";
+    this.diagnostics = messages;
+  }
+};
 function emitScript(source, [code, diagnostics], options) {
   if (!code) {
-    reportDiagnostic(source, diagnostics, options.fileName);
+    throw new CompileError(source, diagnostics, options.fileName);
   }
   const sourcemaps = options.sourceMap ? parseDiagnostics(source, diagnostics, (c) => c === DiagnosticCode.SourceMap).sourcemaps : [];
   const target = emit(source, code, sourcemaps, options);
@@ -1402,7 +1403,7 @@ __export(global_exports, {
   new_record: () => new_record,
   panic: () => panic,
   pi: () => pi,
-  pow: () => pow2,
+  pow: () => pow3,
   product: () => product,
   random: () => random,
   repeat: () => repeat,
@@ -1908,7 +1909,7 @@ var round = VmLib(
 );
 
 // src/vm/lib/global/math/gamma.ts
-var { PI: PI2, exp: exp2, floor: floor2, cos: cos2, sin: sin2, pow, trunc: trunc3 } = Math;
+var { PI: PI2, exp: exp2, floor: floor2, cos: cos2, sin: sin2, pow: pow2, trunc: trunc3 } = Math;
 var MEM = new DataView(new ArrayBuffer(8));
 function f64ToBits(value) {
   MEM.setFloat64(0, value, false);
@@ -2031,7 +2032,7 @@ function tgamma(x) {
     z = -z;
   }
   r += dy * (GMHALF + 0.5) * r / y;
-  const zHalf = pow(y, 0.5 * z);
+  const zHalf = pow2(y, 0.5 * z);
   return r * zHalf * zHalf;
 }
 var gamma = VmLib(
@@ -2082,7 +2083,7 @@ var atan2 = VmLib((x, y) => _atan2(expectNumber(0, x), expectNumber(1, y)), {
   paramsType: { x: "number", y: "number" },
   returnsType: "number"
 });
-var pow2 = VmLib((x, y) => _pow(expectNumber(0, x), expectNumber(1, y)), {
+var pow3 = VmLib((x, y) => _pow(expectNumber(0, x), expectNumber(1, y)), {
   summary: "返回 x 的 y 次幂",
   params: { x: "底数", y: "指数" },
   paramsType: { x: "number", y: "number" },
@@ -2213,7 +2214,7 @@ var withInner = (obj, key, keyIndex, value) => {
   }
   if (isArray(result)) {
     const index = arrIndex(k);
-    while (index > result.length) {
+    while (index >= result.length) {
       result.push(null);
     }
     result[index] = withInner(result[index], key, keyIndex + 1, value);
@@ -2237,7 +2238,8 @@ var normalizeEntries = (data, entries3) => {
     if (isVmArray(key)) {
       if (key.length === 0 || key.includes(null) || key.includes(void 0)) {
         continue;
-      } else if (key.length === 1) {
+      }
+      if (key.length === 1) {
         key = key[0];
       }
     }
@@ -2414,7 +2416,7 @@ var map2 = VmLib(
       f: "fn(value: any, key: number | string, input: type(data)) -> any"
     },
     returnsType: "type(data)",
-    examples: ["map([1, 2, 3], fn (v) { v * v }) // [1, 4, 9]"]
+    examples: ["map([1, 2, 3], fn { it * it }) // [1, 4, 9]"]
   }
 );
 var filter = VmLib(
@@ -2433,7 +2435,7 @@ var filter = VmLib(
       predicate: "fn(value: any, key: number | string, input: type(data)) -> boolean"
     },
     returnsType: "type(data)",
-    examples: ["filter([1, 2, 3, 4], fn (v) { v % 2 == 0 }) // [2, 4]"]
+    examples: ["filter([1, 2, 3, 4], fn { it % 2 == 0 }) // [2, 4]"]
   }
 );
 var filter_map = VmLib(
@@ -2442,7 +2444,7 @@ var filter_map = VmLib(
     return ret ?? void 0;
   }),
   {
-    summary: "对数组或记录中的每个元素应用函数，并返回非 nil 的结果",
+    summary: "对数组或记录中的每个元素应用函数，并返回非 `nil` 的结果",
     params: {
       data: "要映射的数组或记录",
       f: "应用于每个元素的函数"
@@ -2452,7 +2454,7 @@ var filter_map = VmLib(
       f: "fn(value: any, key: number | string, input: type(data)) -> any | nil"
     },
     returnsType: "type(data)",
-    examples: ["filter_map([1, 2, 3], fn (v) { if v % 2 == 0 { v * v } else { nil } }) // [4]"]
+    examples: ["filter_map([1, 2, 3], fn {\n  if it % 2 == 0 { it * it } else { nil } \n}) // [4]"]
   }
 );
 
@@ -2949,7 +2951,6 @@ var printParser = function(args) {
       formats.push("");
       templates.push(i < values4.length - 1 ? " " : "");
     }
-    valIndex++;
   }
   return {
     templates,
@@ -3411,7 +3412,7 @@ __export(mod_exports, {
 // src/vm/lib/mod/matrix.ts
 var matrix_exports = {};
 __export(matrix_exports, {
-  add: () => add,
+  add: () => add2,
   diagonal: () => diagonal,
   entrywise: () => entrywise,
   entrywise_divide: () => entrywise_divide,
@@ -3596,7 +3597,7 @@ var entrywise = VmLib(
     examples: [`matrix.entrywise([1, 2], [3, 4], fn (x, y) { x + y }) // [4, 6]`]
   }
 );
-var add = VmLib(
+var add2 = VmLib(
   (a, b) => {
     expectConst("a", a, null);
     expectConst("b", b, null);
@@ -3934,14 +3935,14 @@ function wrapEntry(name, value, module) {
   return [VmFunction(value, value), value.summary || void 0];
 }
 function createModule(name, lib2) {
-  const mod = create(null);
+  const mod2 = create(null);
   const descriptions = create(null);
   for (const [key, value] of entries(lib2)) {
     const [wrappedValue, description] = wrapEntry(key, value, name);
-    mod[key] = wrappedValue;
+    mod2[key] = wrappedValue;
     descriptions[key] = description;
   }
-  return new VmBuiltinModule(name, mod, descriptions);
+  return new VmBuiltinModule(name, mod2, descriptions);
 }
 
 // src/vm/lib/index.ts
@@ -3951,8 +3952,8 @@ for (const [name, value] of entries(global_exports)) {
   VM_SHARED_CONTEXT_DESCRIPTIONS[name] = description;
 }
 for (const [name, value] of entries(mod_exports)) {
-  const mod = createModule(name, value);
-  const [wrappedValue, description] = wrapEntry(name, mod, "global");
+  const mod2 = createModule(name, value);
+  const [wrappedValue, description] = wrapEntry(name, mod2, "global");
   VM_SHARED_CONTEXT[name] = wrappedValue;
   VM_SHARED_CONTEXT_DESCRIPTIONS[name] = description;
 }
@@ -3963,18 +3964,18 @@ export {
   VmExtern,
   wrapToVmValue,
   unwrapFromVmValue,
-  configCheckpoint,
   VmFunction,
   defineVmContextValue,
   DefaultVmContext,
   createVmContext,
   VmModule,
   $GlobalFallback,
+  configCheckpoint,
   operations_exports,
   wrapScript,
   createScript,
-  reportDiagnostic,
+  CompileError,
   emitScript,
   lib
 };
-//# sourceMappingURL=chunk-6CAGNGY6.js.map
+//# sourceMappingURL=chunk-5BBTXV5A.js.map