@rhost/testkit 1.5.0 → 1.5.2

package/node_modules/@ursamu/mushcode/src/eval/stdlib/db.js

@@ -0,0 +1,91 @@
+// ── Helpers ───────────────────────────────────────────────────────────────────
+/** Split "obj/attr" → [objExpr, attrName].  Returns null if no "/" found. */ function splitObjAttr(s) {
+  const slash = s.indexOf("/");
+  return slash === -1 ? null : [
+    s.slice(0, slash),
+    s.slice(slash + 1)
+  ];
+}
+// ── DB-backed functions ───────────────────────────────────────────────────────
+export const dbFunctions = {
+  /**
+   * get(obj/attr) — read the named attribute from a target object.
+   * Returns "" if the attribute is unset.
+   */ get: {
+    minArgs: 1,
+    maxArgs: 1,
+    async exec (args, ctx, engine) {
+      const pair = splitObjAttr(args[0]);
+      if (!pair) return "#-1 BAD ARGUMENT FORMAT";
+      const [objExpr, attrName] = pair;
+      const objId = await engine.accessor.resolveTarget(ctx.enactor, objExpr);
+      if (!objId) return "#-1 NO MATCH";
+      return await engine.accessor.getAttr(objId, attrName.toUpperCase()) ?? "";
+    }
+  },
+  /** name(obj) — return the display name of a target object. */ name: {
+    minArgs: 1,
+    maxArgs: 1,
+    async exec (args, ctx, engine) {
+      const objId = await engine.accessor.resolveTarget(ctx.enactor, args[0]);
+      if (!objId) return "#-1 NO MATCH";
+      return engine.accessor.getName(objId);
+    }
+  },
+  /** hasattr(obj, attr) — "1" if the attribute exists on obj, "0" if not. */ hasattr: {
+    minArgs: 2,
+    maxArgs: 2,
+    async exec (args, ctx, engine) {
+      const [objExpr, attrName] = args;
+      const objId = await engine.accessor.resolveTarget(ctx.enactor, objExpr);
+      if (!objId) return "0";
+      const val = await engine.accessor.getAttr(objId, attrName.toUpperCase());
+      return val !== null ? "1" : "0";
+    }
+  },
+  /** hasflag(obj, flag) — "1" if obj has the flag, "0" if not. */ hasflag: {
+    minArgs: 2,
+    maxArgs: 2,
+    async exec (args, ctx, engine) {
+      const [objExpr, flag] = args;
+      const objId = await engine.accessor.resolveTarget(ctx.enactor, objExpr);
+      if (!objId) return "0";
+      return await engine.accessor.hasFlag(objId, flag) ? "1" : "0";
+    }
+  },
+  /**
+   * u(obj/attr[, arg0, arg1, …]) — evaluate the named attribute as a function.
+   *
+   * The attribute value is evaluated as softcode in a child context where:
+   *   %0–%9  ← the extra arguments passed to u()
+   *   %!     ← the object that owns the attribute (new executor)
+   *   %@     ← the previous executor (caller)
+   *   %#     ← unchanged (original enactor)
+   *   depth  ← incremented by 1 (returns #-1 if maxDepth exceeded)
+   *
+   * When "obj/" is omitted, the executor is used as the target object.
+   */ u: {
+    minArgs: 1,
+    maxArgs: Infinity,
+    async exec (args, ctx, engine) {
+      const [target, ...argVals] = args;
+      // Resolve object and attribute name
+      const pair = splitObjAttr(target);
+      const objId = pair ? await engine.accessor.resolveTarget(ctx.enactor, pair[0]) : ctx.executor;
+      const attrName = pair ? pair[1] : target;
+      if (!objId) return "#-1 NO MATCH";
+      const attrVal = await engine.accessor.getAttr(objId, attrName.toUpperCase());
+      if (attrVal === null) return "#-1 NO SUCH ATTRIBUTE";
+      const subCtx = {
+        ...ctx,
+        executor: objId,
+        caller: ctx.executor,
+        args: argVals,
+        registers: new Map(),
+        depth: ctx.depth + 1
+      };
+      return engine.evalString(attrVal, subCtx);
+    }
+  }
+};
+//# sourceMappingURL=db.js.map

package/node_modules/@ursamu/mushcode/src/eval/stdlib/db.js.map

@@ -0,0 +1 @@
+{"version":3,"file":"db.js","sources":["./db.ts"],"names":[],"mappings":"AAEA,iFAAiF;AAEjF,2EAA2E,GAC3E,SAAS,aAAa,CAAS;EAC7B,MAAM,QAAQ,EAAE,OAAO,CAAC;EACxB,OAAO,UAAU,CAAC,IAAI,OAAO;IAAC,EAAE,KAAK,CAAC,GAAG;IAAQ,EAAE,KAAK,CAAC,QAAQ;GAAG;AACtE;AAEA,iFAAiF;AAEjF,OAAO,MAAM,cAA4C;EACvD;;;GAGC,GACD,KAAK;IACH,SAAS;IAAG,SAAS;IACrB,MAAM,MAAK,IAAI,EAAE,GAAG,EAAE,MAAM;MAC1B,MAAM,OAAO,aAAa,AAAC,IAAiB,CAAC,EAAE;MAC/C,IAAI,CAAC,MAAM,OAAO;MAClB,MAAM,CAAC,SAAS,SAAS,GAAG;MAC5B,MAAM,QAAQ,MAAM,OAAO,QAAQ,CAAC,aAAa,CAAC,IAAI,OAAO,EAAE;MAC/D,IAAI,CAAC,OAAO,OAAO;MACnB,OAAO,AAAC,MAAM,OAAO,QAAQ,CAAC,OAAO,CAAC,OAAO,SAAS,WAAW,OAAQ;IAC3E;EACF;EAEA,4DAA4D,GAC5D,MAAM;IACJ,SAAS;IAAG,SAAS;IACrB,MAAM,MAAK,IAAI,EAAE,GAAG,EAAE,MAAM;MAC1B,MAAM,QAAQ,MAAM,OAAO,QAAQ,CAAC,aAAa,CAAC,IAAI,OAAO,EAAE,AAAC,IAAiB,CAAC,EAAE;MACpF,IAAI,CAAC,OAAO,OAAO;MACnB,OAAO,OAAO,QAAQ,CAAC,OAAO,CAAC;IACjC;EACF;EAEA,yEAAyE,GACzE,SAAS;IACP,SAAS;IAAG,SAAS;IACrB,MAAM,MAAK,IAAI,EAAE,GAAG,EAAE,MAAM;MAC1B,MAAM,CAAC,SAAS,SAAS,GAAG;MAC5B,MAAM,QAAQ,MAAM,OAAO,QAAQ,CAAC,aAAa,CAAC,IAAI,OAAO,EAAE;MAC/D,IAAI,CAAC,OAAO,OAAO;MACnB,MAAM,MAAM,MAAM,OAAO,QAAQ,CAAC,OAAO,CAAC,OAAO,SAAS,WAAW;MACrE,OAAO,QAAQ,OAAO,MAAM;IAC9B;EACF;EAEA,8DAA8D,GAC9D,SAAS;IACP,SAAS;IAAG,SAAS;IACrB,MAAM,MAAK,IAAI,EAAE,GAAG,EAAE,MAAM;MAC1B,MAAM,CAAC,SAAS,KAAK,GAAG;MACxB,MAAM,QAAQ,MAAM,OAAO,QAAQ,CAAC,aAAa,CAAC,IAAI,OAAO,EAAE;MAC/D,IAAI,CAAC,OAAO,OAAO;MACnB,OAAO,AAAC,MAAM,OAAO,QAAQ,CAAC,OAAO,CAAC,OAAO,QAAS,MAAM;IAC9D;EACF;EAEA;;;;;;;;;;;GAWC,GACD,GAAG;IACD,SAAS;IAAG,SAAS;IACrB,MAAM,MAAK,IAAI,EAAE,GAAG,EAAE,MAAM;MAC1B,MAAM,CAAC,QAAQ,GAAG,QAAQ,GAAG;MAE7B,oCAAoC;MACpC,MAAM,OAAO,aAAa;MAC1B,MAAM,QAAU,OACZ,MAAM,OAAO,QAAQ,CAAC,aAAa,CAAC,IAAI,OAAO,EAAE,IAAI,CAAC,EAAE,IACxD,IAAI,QAAQ;MAChB,MAAM,WAAW,OAAO,IAAI,CAAC,EAAE,GAAG;MAElC,IAAI,CAAC,OAAO,OAAO;MAEnB,MAAM,UAAU,MAAM,OAAO,QAAQ,CAAC,OAAO,CAAC,OAAO,SAAS,WAAW;MACzE,IAAI,YAAY,MAAM,OAAO;MAE7B,MAAM,SAAsB;QAC1B,GAAG,GAAG;QACN,UAAW;QACX,QAAW,IAAI,QAAQ;QACvB,MAAW;QACX,WAAW,IAAI;QACf,OAAW,IAAI,KAAK,GAAG;MACzB;MAEA,OAAO,OAAO,UAAU,CAAC,SAAS;IACpC;EACF;AACF,EAAE"}

package/node_modules/@ursamu/mushcode/src/eval/stdlib/db.ts

@@ -0,0 +1,104 @@
+import type { EvalContext, FunctionImpl } from "../context.ts";
+
+// ── Helpers ───────────────────────────────────────────────────────────────────
+
+/** Split "obj/attr" → [objExpr, attrName].  Returns null if no "/" found. */
+function splitObjAttr(s: string): [string, string] | null {
+  const slash = s.indexOf("/");
+  return slash === -1 ? null : [s.slice(0, slash), s.slice(slash + 1)];
+}
+
+// ── DB-backed functions ───────────────────────────────────────────────────────
+
+export const dbFunctions: Record<string, FunctionImpl> = {
+  /**
+   * get(obj/attr) — read the named attribute from a target object.
+   * Returns "" if the attribute is unset.
+   */
+  get: {
+    minArgs: 1, maxArgs: 1,
+    async exec(args, ctx, engine) {
+      const pair = splitObjAttr((args as string[])[0]);
+      if (!pair) return "#-1 BAD ARGUMENT FORMAT";
+      const [objExpr, attrName] = pair;
+      const objId = await engine.accessor.resolveTarget(ctx.enactor, objExpr);
+      if (!objId) return "#-1 NO MATCH";
+      return (await engine.accessor.getAttr(objId, attrName.toUpperCase())) ?? "";
+    },
+  },
+
+  /** name(obj) — return the display name of a target object. */
+  name: {
+    minArgs: 1, maxArgs: 1,
+    async exec(args, ctx, engine) {
+      const objId = await engine.accessor.resolveTarget(ctx.enactor, (args as string[])[0]);
+      if (!objId) return "#-1 NO MATCH";
+      return engine.accessor.getName(objId);
+    },
+  },
+
+  /** hasattr(obj, attr) — "1" if the attribute exists on obj, "0" if not. */
+  hasattr: {
+    minArgs: 2, maxArgs: 2,
+    async exec(args, ctx, engine) {
+      const [objExpr, attrName] = args as string[];
+      const objId = await engine.accessor.resolveTarget(ctx.enactor, objExpr);
+      if (!objId) return "0";
+      const val = await engine.accessor.getAttr(objId, attrName.toUpperCase());
+      return val !== null ? "1" : "0";
+    },
+  },
+
+  /** hasflag(obj, flag) — "1" if obj has the flag, "0" if not. */
+  hasflag: {
+    minArgs: 2, maxArgs: 2,
+    async exec(args, ctx, engine) {
+      const [objExpr, flag] = args as string[];
+      const objId = await engine.accessor.resolveTarget(ctx.enactor, objExpr);
+      if (!objId) return "0";
+      return (await engine.accessor.hasFlag(objId, flag)) ? "1" : "0";
+    },
+  },
+
+  /**
+   * u(obj/attr[, arg0, arg1, …]) — evaluate the named attribute as a function.
+   *
+   * The attribute value is evaluated as softcode in a child context where:
+   *   %0–%9  ← the extra arguments passed to u()
+   *   %!     ← the object that owns the attribute (new executor)
+   *   %@     ← the previous executor (caller)
+   *   %#     ← unchanged (original enactor)
+   *   depth  ← incremented by 1 (returns #-1 if maxDepth exceeded)
+   *
+   * When "obj/" is omitted, the executor is used as the target object.
+   */
+  u: {
+    minArgs: 1, maxArgs: Infinity,
+    async exec(args, ctx, engine) {
+      const [target, ...argVals] = args as string[];
+
+      // Resolve object and attribute name
+      const pair = splitObjAttr(target);
+      const objId   = pair
+        ? await engine.accessor.resolveTarget(ctx.enactor, pair[0])
+        : ctx.executor;
+      const attrName = pair ? pair[1] : target;
+
+      if (!objId) return "#-1 NO MATCH";
+
+      const attrVal = await engine.accessor.getAttr(objId, attrName.toUpperCase());
+      if (attrVal === null) return "#-1 NO SUCH ATTRIBUTE";
+
+      const subCtx: EvalContext = {
+        ...ctx,
+        executor:  objId,
+        caller:    ctx.executor,
+        args:      argVals,
+        registers: new Map(),
+        depth:     ctx.depth + 1,
+      };
+
+      return engine.evalString(attrVal, subCtx);
+    },
+  },
+};

package/node_modules/@ursamu/mushcode/src/eval/stdlib/iter.js

@@ -0,0 +1,91 @@
+// ── Helpers ───────────────────────────────────────────────────────────────────
+/**
+ * Split a string by delimiter.
+ * Space delimiter collapses consecutive whitespace (MUX convention).
+ */ function splitDelim(str, delim) {
+  if (!str) return [];
+  return delim === " " ? str.trim().split(/\s+/).filter(Boolean) : str.split(delim);
+}
+function joinDelim(items, delim) {
+  return items.join(delim);
+}
+// ── Iter / list functions ─────────────────────────────────────────────────────
+export const iterFunctions = {
+  /**
+   * iter(list, body[, idelim[, odelim]])
+   * Evaluates body for each item, binding ## to the item and #@ to its 1-based index.
+   */ iter: {
+    eval: "lazy",
+    minArgs: 2,
+    maxArgs: 4,
+    async exec (args, ctx) {
+      const thunks = args;
+      const list = await thunks[0]();
+      const body = thunks[1];
+      const inDelim = thunks[2] ? await thunks[2]() || " " : " ";
+      const outDelim = thunks[3] ? await thunks[3]() : " ";
+      const items = splitDelim(list, inDelim);
+      if (items.length === 0) return "";
+      const results = [];
+      for(let i = 0; i < items.length; i++){
+        const frame = {
+          item: items[i],
+          index: i + 1
+        };
+        results.push(await body({
+          iterStack: [
+            frame,
+            ...ctx.iterStack
+          ]
+        }));
+      }
+      return joinDelim(results, outDelim);
+    }
+  },
+  /** words(str[, delim]) — count words in a space- (or delim-) separated list. */ words: {
+    minArgs: 1,
+    maxArgs: 2,
+    exec (args) {
+      const [str, delim = " "] = args;
+      return String(splitDelim(str, delim).length);
+    }
+  },
+  /** word(str, n[, delim]) — return the nth word (1-based). */ word: {
+    minArgs: 2,
+    maxArgs: 3,
+    exec (args) {
+      const [str, nStr, delim = " "] = args;
+      const n = parseInt(nStr, 10);
+      if (isNaN(n) || n < 1) throw new Error("ARGUMENT IS NOT A NUMBER");
+      return splitDelim(str, delim)[n - 1] ?? "";
+    }
+  },
+  /** first(str[, delim]) — return the first word. */ first: {
+    minArgs: 1,
+    maxArgs: 2,
+    exec (args) {
+      const [str, delim = " "] = args;
+      return splitDelim(str, delim)[0] ?? "";
+    }
+  },
+  /** last(str[, delim]) — return the last word. */ last: {
+    minArgs: 1,
+    maxArgs: 2,
+    exec (args) {
+      const [str, delim = " "] = args;
+      const items = splitDelim(str, delim);
+      return items[items.length - 1] ?? "";
+    }
+  },
+  /** rest(str[, delim]) — return all words after the first. */ rest: {
+    minArgs: 1,
+    maxArgs: 2,
+    exec (args) {
+      const [str, delim = " "] = args;
+      const items = splitDelim(str, delim);
+      if (items.length <= 1) return "";
+      return joinDelim(items.slice(1), delim === " " ? " " : delim);
+    }
+  }
+};
+//# sourceMappingURL=iter.js.map

package/node_modules/@ursamu/mushcode/src/eval/stdlib/iter.js.map

@@ -0,0 +1 @@
+{"version":3,"file":"iter.js","sources":["./iter.ts"],"names":[],"mappings":"AAEA,iFAAiF;AAEjF;;;CAGC,GACD,SAAS,WAAW,GAAW,EAAE,KAAa;EAC5C,IAAI,CAAC,KAAK,OAAO,EAAE;EACnB,OAAO,UAAU,MACb,IAAI,IAAI,GAAG,KAAK,CAAC,OAAO,MAAM,CAAC,WAC/B,IAAI,KAAK,CAAC;AAChB;AAEA,SAAS,UAAU,KAAe,EAAE,KAAa;EAC/C,OAAO,MAAM,IAAI,CAAC;AACpB;AAEA,iFAAiF;AAEjF,OAAO,MAAM,gBAA8C;EACzD;;;GAGC,GACD,MAAM;IACJ,MAAM;IACN,SAAS;IAAG,SAAS;IACrB,MAAM,MAAK,IAAI,EAAE,GAAG;MAClB,MAAM,SAAW;MACjB,MAAM,OAAW,MAAM,MAAM,CAAC,EAAE;MAChC,MAAM,OAAW,MAAM,CAAC,EAAE;MAC1B,MAAM,UAAW,MAAM,CAAC,EAAE,GAAI,AAAC,MAAM,MAAM,CAAC,EAAE,MAAO,MAAO;MAC5D,MAAM,WAAW,MAAM,CAAC,EAAE,GAAI,MAAM,MAAM,CAAC,EAAE,KAAe;MAE5D,MAAM,QAAQ,WAAW,MAAM;MAC/B,IAAI,MAAM,MAAM,KAAK,GAAG,OAAO;MAE/B,MAAM,UAAoB,EAAE;MAC5B,IAAK,IAAI,IAAI,GAAG,IAAI,MAAM,MAAM,EAAE,IAAK;QACrC,MAAM,QAAmB;UAAE,MAAM,KAAK,CAAC,EAAE;UAAE,OAAO,IAAI;QAAE;QACxD,QAAQ,IAAI,CAAC,MAAM,KAAK;UAAE,WAAW;YAAC;eAAU,IAAI,SAAS;WAAC;QAAC;MACjE;MACA,OAAO,UAAU,SAAS;IAC5B;EACF;EAEA,8EAA8E,GAC9E,OAAO;IACL,SAAS;IAAG,SAAS;IACrB,MAAK,IAAI;MACP,MAAM,CAAC,KAAK,QAAQ,GAAG,CAAC,GAAG;MAC3B,OAAO,OAAO,WAAW,KAAK,OAAO,MAAM;IAC7C;EACF;EAEA,2DAA2D,GAC3D,MAAM;IACJ,SAAS;IAAG,SAAS;IACrB,MAAK,IAAI;MACP,MAAM,CAAC,KAAK,MAAM,QAAQ,GAAG,CAAC,GAAG;MACjC,MAAM,IAAI,SAAS,MAAM;MACzB,IAAI,MAAM,MAAM,IAAI,GAAG,MAAM,IAAI,MAAM;MACvC,OAAO,WAAW,KAAK,MAAM,CAAC,IAAI,EAAE,IAAI;IAC1C;EACF;EAEA,iDAAiD,GACjD,OAAO;IACL,SAAS;IAAG,SAAS;IACrB,MAAK,IAAI;MACP,MAAM,CAAC,KAAK,QAAQ,GAAG,CAAC,GAAG;MAC3B,OAAO,WAAW,KAAK,MAAM,CAAC,EAAE,IAAI;IACtC;EACF;EAEA,+CAA+C,GAC/C,MAAM;IACJ,SAAS;IAAG,SAAS;IACrB,MAAK,IAAI;MACP,MAAM,CAAC,KAAK,QAAQ,GAAG,CAAC,GAAG;MAC3B,MAAM,QAAQ,WAAW,KAAK;MAC9B,OAAO,KAAK,CAAC,MAAM,MAAM,GAAG,EAAE,IAAI;IACpC;EACF;EAEA,2DAA2D,GAC3D,MAAM;IACJ,SAAS;IAAG,SAAS;IACrB,MAAK,IAAI;MACP,MAAM,CAAC,KAAK,QAAQ,GAAG,CAAC,GAAG;MAC3B,MAAM,QAAQ,WAAW,KAAK;MAC9B,IAAI,MAAM,MAAM,IAAI,GAAG,OAAO;MAC9B,OAAO,UAAU,MAAM,KAAK,CAAC,IAAI,UAAU,MAAM,MAAM;IACzD;EACF;AACF,EAAE"}

package/node_modules/@ursamu/mushcode/src/eval/stdlib/iter.ts

@@ -0,0 +1,98 @@
+import type { EvalThunk, FunctionImpl, IterFrame } from "../context.ts";
+
+// ── Helpers ───────────────────────────────────────────────────────────────────
+
+/**
+ * Split a string by delimiter.
+ * Space delimiter collapses consecutive whitespace (MUX convention).
+ */
+function splitDelim(str: string, delim: string): string[] {
+  if (!str) return [];
+  return delim === " "
+    ? str.trim().split(/\s+/).filter(Boolean)
+    : str.split(delim);
+}
+
+function joinDelim(items: string[], delim: string): string {
+  return items.join(delim);
+}
+
+// ── Iter / list functions ─────────────────────────────────────────────────────
+
+export const iterFunctions: Record<string, FunctionImpl> = {
+  /**
+   * iter(list, body[, idelim[, odelim]])
+   * Evaluates body for each item, binding ## to the item and #@ to its 1-based index.
+   */
+  iter: {
+    eval: "lazy",
+    minArgs: 2, maxArgs: 4,
+    async exec(args, ctx) {
+      const thunks   = args as EvalThunk[];
+      const list     = await thunks[0]();
+      const body     = thunks[1];
+      const inDelim  = thunks[2] ? ((await thunks[2]()) || " ") : " ";
+      const outDelim = thunks[3] ? (await thunks[3]())          : " ";
+
+      const items = splitDelim(list, inDelim);
+      if (items.length === 0) return "";
+
+      const results: string[] = [];
+      for (let i = 0; i < items.length; i++) {
+        const frame: IterFrame = { item: items[i], index: i + 1 };
+        results.push(await body({ iterStack: [frame, ...ctx.iterStack] }));
+      }
+      return joinDelim(results, outDelim);
+    },
+  },
+
+  /** words(str[, delim]) — count words in a space- (or delim-) separated list. */
+  words: {
+    minArgs: 1, maxArgs: 2,
+    exec(args) {
+      const [str, delim = " "] = args as string[];
+      return String(splitDelim(str, delim).length);
+    },
+  },
+
+  /** word(str, n[, delim]) — return the nth word (1-based). */
+  word: {
+    minArgs: 2, maxArgs: 3,
+    exec(args) {
+      const [str, nStr, delim = " "] = args as string[];
+      const n = parseInt(nStr, 10);
+      if (isNaN(n) || n < 1) throw new Error("ARGUMENT IS NOT A NUMBER");
+      return splitDelim(str, delim)[n - 1] ?? "";
+    },
+  },
+
+  /** first(str[, delim]) — return the first word. */
+  first: {
+    minArgs: 1, maxArgs: 2,
+    exec(args) {
+      const [str, delim = " "] = args as string[];
+      return splitDelim(str, delim)[0] ?? "";
+    },
+  },
+
+  /** last(str[, delim]) — return the last word. */
+  last: {
+    minArgs: 1, maxArgs: 2,
+    exec(args) {
+      const [str, delim = " "] = args as string[];
+      const items = splitDelim(str, delim);
+      return items[items.length - 1] ?? "";
+    },
+  },
+
+  /** rest(str[, delim]) — return all words after the first. */
+  rest: {
+    minArgs: 1, maxArgs: 2,
+    exec(args) {
+      const [str, delim = " "] = args as string[];
+      const items = splitDelim(str, delim);
+      if (items.length <= 1) return "";
+      return joinDelim(items.slice(1), delim === " " ? " " : delim);
+    },
+  },
+};

package/node_modules/@ursamu/mushcode/src/eval/stdlib/logic.js

@@ -0,0 +1,79 @@
+/** MUX truthiness: empty string and "0" are false; everything else is true. */ function truthy(s) {
+  return s !== "" && s !== "0";
+}
+export const logicFunctions = {
+  /** if(cond, iftrue[, iffalse]) */ "if": {
+    eval: "lazy",
+    minArgs: 2,
+    maxArgs: 3,
+    async exec (args) {
+      const [cond, yes, no] = args;
+      return truthy(await cond()) ? await yes() : no ? await no() : "";
+    }
+  },
+  /** ifelse(cond, iftrue, iffalse) */ ifelse: {
+    eval: "lazy",
+    minArgs: 3,
+    maxArgs: 3,
+    async exec (args) {
+      const [cond, yes, no] = args;
+      return truthy(await cond()) ? await yes() : await no();
+    }
+  },
+  /**
+   * switch(value, pattern1, result1[, …[, default]])
+   * Exact-match comparison; returns first matching result or default.
+   */ "switch": {
+    eval: "lazy",
+    minArgs: 3,
+    maxArgs: Infinity,
+    async exec (args) {
+      const thunks = args;
+      const value = await thunks[0]();
+      const rest = thunks.slice(1);
+      const hasDefault = rest.length % 2 === 1;
+      const pairs = hasDefault ? rest.slice(0, -1) : rest;
+      for(let i = 0; i < pairs.length; i += 2){
+        if (value === await pairs[i]()) return await pairs[i + 1]();
+      }
+      return hasDefault ? await rest[rest.length - 1]() : "";
+    }
+  },
+  /** and(v1, v2, …) — short-circuit, returns "1" or "0". */ "and": {
+    eval: "lazy",
+    minArgs: 2,
+    maxArgs: Infinity,
+    async exec (args) {
+      for (const thunk of args){
+        if (!truthy(await thunk())) return "0";
+      }
+      return "1";
+    }
+  },
+  /** or(v1, v2, …) — short-circuit, returns "1" or "0". */ "or": {
+    eval: "lazy",
+    minArgs: 2,
+    maxArgs: Infinity,
+    async exec (args) {
+      for (const thunk of args){
+        if (truthy(await thunk())) return "1";
+      }
+      return "0";
+    }
+  },
+  not: {
+    minArgs: 1,
+    maxArgs: 1,
+    exec (args) {
+      return truthy(args[0]) ? "0" : "1";
+    }
+  },
+  /** t(val) — returns "1" if val is truthy, "0" otherwise. */ t: {
+    minArgs: 1,
+    maxArgs: 1,
+    exec (args) {
+      return truthy(args[0]) ? "1" : "0";
+    }
+  }
+};
+//# sourceMappingURL=logic.js.map

package/node_modules/@ursamu/mushcode/src/eval/stdlib/logic.js.map

@@ -0,0 +1 @@
+{"version":3,"file":"logic.js","sources":["./logic.ts"],"names":[],"mappings":"AAEA,6EAA6E,GAC7E,SAAS,OAAO,CAAS;EACvB,OAAO,MAAM,MAAM,MAAM;AAC3B;AAEA,OAAO,MAAM,iBAA+C;EAC1D,gCAAgC,GAChC,MAAM;IACJ,MAAM;IACN,SAAS;IAAG,SAAS;IACrB,MAAM,MAAK,IAAI;MACb,MAAM,CAAC,MAAM,KAAK,GAAG,GAAG;MACxB,OAAO,OAAO,MAAM,UAAU,MAAM,QAAS,KAAK,MAAM,OAAO;IACjE;EACF;EAEA,kCAAkC,GAClC,QAAQ;IACN,MAAM;IACN,SAAS;IAAG,SAAS;IACrB,MAAM,MAAK,IAAI;MACb,MAAM,CAAC,MAAM,KAAK,GAAG,GAAG;MACxB,OAAO,OAAO,MAAM,UAAU,MAAM,QAAQ,MAAM;IACpD;EACF;EAEA;;;GAGC,GACD,UAAU;IACR,MAAM;IACN,SAAS;IAAG,SAAS;IACrB,MAAM,MAAK,IAAI;MACb,MAAM,SAAW;MACjB,MAAM,QAAW,MAAM,MAAM,CAAC,EAAE;MAChC,MAAM,OAAW,OAAO,KAAK,CAAC;MAC9B,MAAM,aAAa,KAAK,MAAM,GAAG,MAAM;MACvC,MAAM,QAAW,aAAa,KAAK,KAAK,CAAC,GAAG,CAAC,KAAK;MAElD,IAAK,IAAI,IAAI,GAAG,IAAI,MAAM,MAAM,EAAE,KAAK,EAAG;QACxC,IAAI,UAAU,MAAM,KAAK,CAAC,EAAE,IAAI,OAAO,MAAM,KAAK,CAAC,IAAI,EAAE;MAC3D;MACA,OAAO,aAAa,MAAM,IAAI,CAAC,KAAK,MAAM,GAAG,EAAE,KAAK;IACtD;EACF;EAEA,wDAAwD,GACxD,OAAO;IACL,MAAM;IACN,SAAS;IAAG,SAAS;IACrB,MAAM,MAAK,IAAI;MACb,KAAK,MAAM,SAAS,KAAqB;QACvC,IAAI,CAAC,OAAO,MAAM,UAAU,OAAO;MACrC;MACA,OAAO;IACT;EACF;EAEA,uDAAuD,GACvD,MAAM;IACJ,MAAM;IACN,SAAS;IAAG,SAAS;IACrB,MAAM,MAAK,IAAI;MACb,KAAK,MAAM,SAAS,KAAqB;QACvC,IAAI,OAAO,MAAM,UAAU,OAAO;MACpC;MACA,OAAO;IACT;EACF;EAEA,KAAK;IACH,SAAS;IAAG,SAAS;IACrB,MAAK,IAAI;MAAI,OAAO,OAAO,AAAC,IAAiB,CAAC,EAAE,IAAI,MAAM;IAAK;EACjE;EAEA,0DAA0D,GAC1D,GAAG;IACD,SAAS;IAAG,SAAS;IACrB,MAAK,IAAI;MAAI,OAAO,OAAO,AAAC,IAAiB,CAAC,EAAE,IAAI,MAAM;IAAK;EACjE;AACF,EAAE"}

package/node_modules/@ursamu/mushcode/src/eval/stdlib/logic.ts

@@ -0,0 +1,84 @@
+import type { EvalThunk, FunctionImpl } from "../context.ts";
+
+/** MUX truthiness: empty string and "0" are false; everything else is true. */
+function truthy(s: string): boolean {
+  return s !== "" && s !== "0";
+}
+
+export const logicFunctions: Record<string, FunctionImpl> = {
+  /** if(cond, iftrue[, iffalse]) */
+  "if": {
+    eval: "lazy",
+    minArgs: 2, maxArgs: 3,
+    async exec(args) {
+      const [cond, yes, no] = args as EvalThunk[];
+      return truthy(await cond()) ? await yes() : (no ? await no() : "");
+    },
+  },
+
+  /** ifelse(cond, iftrue, iffalse) */
+  ifelse: {
+    eval: "lazy",
+    minArgs: 3, maxArgs: 3,
+    async exec(args) {
+      const [cond, yes, no] = args as EvalThunk[];
+      return truthy(await cond()) ? await yes() : await no();
+    },
+  },
+
+  /**
+   * switch(value, pattern1, result1[, …[, default]])
+   * Exact-match comparison; returns first matching result or default.
+   */
+  "switch": {
+    eval: "lazy",
+    minArgs: 3, maxArgs: Infinity,
+    async exec(args) {
+      const thunks   = args as EvalThunk[];
+      const value    = await thunks[0]();
+      const rest     = thunks.slice(1);
+      const hasDefault = rest.length % 2 === 1;
+      const pairs    = hasDefault ? rest.slice(0, -1) : rest;
+
+      for (let i = 0; i < pairs.length; i += 2) {
+        if (value === await pairs[i]()) return await pairs[i + 1]();
+      }
+      return hasDefault ? await rest[rest.length - 1]() : "";
+    },
+  },
+
+  /** and(v1, v2, …) — short-circuit, returns "1" or "0". */
+  "and": {
+    eval: "lazy",
+    minArgs: 2, maxArgs: Infinity,
+    async exec(args) {
+      for (const thunk of args as EvalThunk[]) {
+        if (!truthy(await thunk())) return "0";
+      }
+      return "1";
+    },
+  },
+
+  /** or(v1, v2, …) — short-circuit, returns "1" or "0". */
+  "or": {
+    eval: "lazy",
+    minArgs: 2, maxArgs: Infinity,
+    async exec(args) {
+      for (const thunk of args as EvalThunk[]) {
+        if (truthy(await thunk())) return "1";
+      }
+      return "0";
+    },
+  },
+
+  not: {
+    minArgs: 1, maxArgs: 1,
+    exec(args) { return truthy((args as string[])[0]) ? "0" : "1"; },
+  },
+
+  /** t(val) — returns "1" if val is truthy, "0" otherwise. */
+  t: {
+    minArgs: 1, maxArgs: 1,
+    exec(args) { return truthy((args as string[])[0]) ? "1" : "0"; },
+  },
+};

package/node_modules/@ursamu/mushcode/src/eval/stdlib/math.js

@@ -0,0 +1,120 @@
+// ── Helpers ───────────────────────────────────────────────────────────────────
+function toNum(s) {
+  const n = Number(s);
+  if (!isFinite(n)) throw new Error(`ARGUMENT (${s}) IS NOT A NUMBER`);
+  return n;
+}
+/** Format a result: integers stay integers; floats get at most 6 sig digits. */ function fmt(n) {
+  if (!isFinite(n)) throw new Error("RESULT IS NOT A NUMBER");
+  if (Number.isInteger(n)) return String(n);
+  return String(parseFloat(n.toPrecision(6)));
+}
+// ── Math functions ────────────────────────────────────────────────────────────
+export const mathFunctions = {
+  add: {
+    minArgs: 2,
+    maxArgs: Infinity,
+    exec (args) {
+      return fmt(args.map(toNum).reduce((a, b)=>a + b, 0));
+    }
+  },
+  sub: {
+    minArgs: 2,
+    maxArgs: 2,
+    exec (args) {
+      const [a, b] = args;
+      return fmt(toNum(a) - toNum(b));
+    }
+  },
+  mul: {
+    minArgs: 2,
+    maxArgs: Infinity,
+    exec (args) {
+      return fmt(args.map(toNum).reduce((a, b)=>a * b, 1));
+    }
+  },
+  div: {
+    minArgs: 2,
+    maxArgs: 2,
+    exec (args) {
+      const [a, b] = args;
+      const na = toNum(a), nb = toNum(b);
+      if (nb === 0) throw new Error("DIVIDE BY ZERO");
+      if (Number.isInteger(na) && Number.isInteger(nb)) return String(Math.trunc(na / nb));
+      return fmt(na / nb);
+    }
+  },
+  mod: {
+    minArgs: 2,
+    maxArgs: 2,
+    exec (args) {
+      const [a, b] = args;
+      const na = toNum(a), nb = toNum(b);
+      if (nb === 0) throw new Error("DIVIDE BY ZERO");
+      return fmt(na % nb);
+    }
+  },
+  abs: {
+    minArgs: 1,
+    maxArgs: 1,
+    exec (args) {
+      return fmt(Math.abs(toNum(args[0])));
+    }
+  },
+  round: {
+    minArgs: 2,
+    maxArgs: 2,
+    exec (args) {
+      const [a, p] = args;
+      const prec = Math.max(0, Math.trunc(toNum(p)));
+      const factor = Math.pow(10, prec);
+      return fmt(Math.round(toNum(a) * factor) / factor);
+    }
+  },
+  floor: {
+    minArgs: 1,
+    maxArgs: 1,
+    exec (args) {
+      return String(Math.floor(toNum(args[0])));
+    }
+  },
+  ceil: {
+    minArgs: 1,
+    maxArgs: 1,
+    exec (args) {
+      return String(Math.ceil(toNum(args[0])));
+    }
+  },
+  max: {
+    minArgs: 2,
+    maxArgs: Infinity,
+    exec (args) {
+      return fmt(Math.max(...args.map(toNum)));
+    }
+  },
+  min: {
+    minArgs: 2,
+    maxArgs: Infinity,
+    exec (args) {
+      return fmt(Math.min(...args.map(toNum)));
+    }
+  },
+  power: {
+    minArgs: 2,
+    maxArgs: 2,
+    exec (args) {
+      const [a, b] = args;
+      return fmt(Math.pow(toNum(a), toNum(b)));
+    }
+  },
+  sqrt: {
+    minArgs: 1,
+    maxArgs: 1,
+    exec (args) {
+      const n = toNum(args[0]);
+      if (n < 0) throw new Error("ARGUMENT OUT OF RANGE");
+      return fmt(Math.sqrt(n));
+    }
+  }
+};
+//# sourceMappingURL=math.js.map