@soundscript/soundscript 0.1.0

package/experimental/component.js

@@ -0,0 +1,46 @@
+function macroRuntimeError(name) {
+    throw new Error(`${name}(...) is a Soundscript macro and should be removed during Soundscript expansion.`);
+}
+export function state(_value) {
+    return macroRuntimeError('state');
+}
+export function awaited(_promise, _pending, _fulfilled, _rejected) {
+    return macroRuntimeError('awaited');
+}
+export function boundary(_render, _fallback) {
+    return macroRuntimeError('boundary');
+}
+export function context() {
+    return macroRuntimeError('context');
+}
+export function dispatch(_type, _detail) {
+    return macroRuntimeError('dispatch');
+}
+export function derived(_compute) {
+    return macroRuntimeError('derived');
+}
+export function effect(_callback) {
+    return macroRuntimeError('effect');
+}
+export function onMount(_callback) {
+    return macroRuntimeError('onMount');
+}
+export function prop(_value) {
+    return macroRuntimeError('prop');
+}
+export function provide(_context, _value, _content) {
+    return macroRuntimeError('provide');
+}
+export function useContext(_value) {
+    return macroRuntimeError('useContext');
+}
+export function useStore(_value) {
+    return macroRuntimeError('useStore');
+}
+export function component(_value) {
+    return macroRuntimeError('component');
+}
+export function store(_value) {
+    return macroRuntimeError('store');
+}
+//# sourceMappingURL=component.js.map

package/experimental/component.js.map

@@ -0,0 +1 @@
+{"version":3,"file":"component.js","sourceRoot":"","sources":["../soundscript/experimental/component.sts"],"names":[],"mappings":"AAAA,SAAS,iBAAiB,CAAC,IAAY;IACrC,MAAM,IAAI,KAAK,CACb,GAAG,IAAI,kFAAkF,CAC1F,CAAC;AACJ,CAAC;AAED,MAAM,UAAU,KAAK,CAAI,MAAS;IAChC,OAAO,iBAAiB,CAAC,OAAO,CAAC,CAAC;AACpC,CAAC;AAED,MAAM,UAAU,OAAO,CACrB,QAAwB,EACxB,QAA+C,EAC/C,UAAyC,EACzC,SAA8C;IAE9C,OAAO,iBAAiB,CAAC,SAAS,CAAC,CAAC;AACtC,CAAC;AAED,MAAM,UAAU,QAAQ,CACtB,OAA2B,EAC3B,SAA6C;IAE7C,OAAO,iBAAiB,CAAC,UAAU,CAAC,CAAC;AACvC,CAAC;AAED,MAAM,UAAU,OAAO;IACrB,OAAO,iBAAiB,CAAC,SAAS,CAAC,CAAC;AACtC,CAAC;AAED,MAAM,UAAU,QAAQ,CAAI,KAAa,EAAE,OAAW;IACpD,OAAO,iBAAiB,CAAC,UAAU,CAAC,CAAC;AACvC,CAAC;AAED,MAAM,UAAU,OAAO,CAAI,QAAiB;IAC1C,OAAO,iBAAiB,CAAC,SAAS,CAAC,CAAC;AACtC,CAAC;AAED,MAAM,UAAU,MAAM,CAAI,SAAkB;IAC1C,OAAO,iBAAiB,CAAC,QAAQ,CAAC,CAAC;AACrC,CAAC;AAED,MAAM,UAAU,OAAO,CAAI,SAAkB;IAC3C,OAAO,iBAAiB,CAAC,SAAS,CAAC,CAAC;AACtC,CAAC;AAED,MAAM,UAAU,IAAI,CAAI,MAAU;IAChC,OAAO,iBAAiB,CAAC,MAAM,CAAC,CAAC;AACnC,CAAC;AAED,MAAM,UAAU,OAAO,CAAO,QAAiB,EAAE,MAAS,EAAE,QAAuB;IACjF,OAAO,iBAAiB,CAAC,SAAS,CAAC,CAAC;AACtC,CAAC;AAED,MAAM,UAAU,UAAU,CAAI,MAAe;IAC3C,OAAO,iBAAiB,CAAC,YAAY,CAAC,CAAC;AACzC,CAAC;AAED,MAAM,UAAU,QAAQ,CAAI,MAAS;IACnC,OAAO,iBAAiB,CAAC,UAAU,CAAC,CAAC;AACvC,CAAC;AAED,MAAM,UAAU,SAAS,CAAI,MAAS;IACpC,OAAO,iBAAiB,CAAC,WAAW,CAAC,CAAC;AACxC,CAAC;AAED,MAAM,UAAU,KAAK,CAAI,MAAS;IAChC,OAAO,iBAAiB,CAAC,OAAO,CAAC,CAAC;AACpC,CAAC","sourcesContent":["function macroRuntimeError(name: string): never {\n  throw new Error(\n    `${name}(...) is a Soundscript macro and should be removed during Soundscript expansion.`,\n  );\n}\n\nexport function state<T>(_value: T): never {\n  return macroRuntimeError('state');\n}\n\nexport function awaited<T, PendingResult, FulfilledResult, RejectedResult = never>(\n  _promise: PromiseLike<T>,\n  _pending: PendingResult | (() => PendingResult),\n  _fulfilled: (value: T) => FulfilledResult,\n  _rejected?: (error: unknown) => RejectedResult,\n): never {\n  return macroRuntimeError('awaited');\n}\n\nexport function boundary<RenderResult, FallbackResult>(\n  _render: () => RenderResult,\n  _fallback: (error: unknown) => FallbackResult,\n): never {\n  return macroRuntimeError('boundary');\n}\n\nexport function context<T>(): never {\n  return macroRuntimeError('context');\n}\n\nexport function dispatch<T>(_type: string, _detail?: T): never {\n  return macroRuntimeError('dispatch');\n}\n\nexport function derived<T>(_compute: () => T): never {\n  return macroRuntimeError('derived');\n}\n\nexport function effect<T>(_callback: () => T): never {\n  return macroRuntimeError('effect');\n}\n\nexport function onMount<T>(_callback: () => T): never {\n  return macroRuntimeError('onMount');\n}\n\nexport function prop<T>(_value?: T): never {\n  return macroRuntimeError('prop');\n}\n\nexport function provide<T, R>(_context: unknown, _value: T, _content: R | (() => R)): never {\n  return macroRuntimeError('provide');\n}\n\nexport function useContext<T>(_value: unknown): never {\n  return macroRuntimeError('useContext');\n}\n\nexport function useStore<T>(_value: T): never {\n  return macroRuntimeError('useStore');\n}\n\nexport function component<T>(_value: T): never {\n  return macroRuntimeError('component');\n}\n\nexport function store<T>(_value: T): never {\n  return macroRuntimeError('store');\n}\n"]}

package/experimental/css.d.ts

@@ -0,0 +1,16 @@
+export interface CssRawFragment {
+  readonly __cssKind: 'raw';
+  readonly text: string;
+}
+
+export interface CssTemplate {
+  readonly text: string;
+  readonly values: readonly unknown[];
+}
+
+export interface CssTag {
+  (strings: TemplateStringsArray, ...values: readonly unknown[]): CssTemplate;
+  raw(text: string): CssRawFragment;
+}
+
+export const css: CssTag;

package/experimental/css.js

@@ -0,0 +1,10 @@
+const cssTag = Object.assign((strings, ...values) => ({
+    text: String.raw({ raw: strings }, ...values.map(String)),
+    values: [...values],
+}), {
+    raw(text) {
+        return { __cssKind: 'raw', text };
+    },
+});
+export const css = cssTag;
+//# sourceMappingURL=css.js.map

package/experimental/css.js.map

@@ -0,0 +1 @@
+{"version":3,"file":"css.js","sourceRoot":"","sources":["../soundscript/experimental/css.sts"],"names":[],"mappings":"AAeA,MAAM,MAAM,GAAW,MAAM,CAAC,MAAM,CAClC,CAAC,OAA6B,EAAE,GAAG,MAA0B,EAAe,EAAE,CAAC,CAAC;IAC9E,IAAI,EAAE,MAAM,CAAC,GAAG,CAAC,EAAE,GAAG,EAAE,OAAO,EAAE,EAAE,GAAG,MAAM,CAAC,GAAG,CAAC,MAAM,CAAC,CAAC;IACzD,MAAM,EAAE,CAAC,GAAG,MAAM,CAAC;CACpB,CAAC,EACF;IACE,GAAG,CAAC,IAAY;QACd,OAAO,EAAE,SAAS,EAAE,KAAK,EAAE,IAAI,EAAE,CAAC;IACpC,CAAC;CACF,CACF,CAAC;AAEF,MAAM,CAAC,MAAM,GAAG,GAAG,MAAM,CAAC","sourcesContent":["export interface CssRawFragment {\n  readonly __cssKind: 'raw';\n  readonly text: string;\n}\n\nexport interface CssTemplate {\n  readonly text: string;\n  readonly values: readonly unknown[];\n}\n\nexport interface CssTag {\n  (strings: TemplateStringsArray, ...values: readonly unknown[]): CssTemplate;\n  raw(text: string): CssRawFragment;\n}\n\nconst cssTag: CssTag = Object.assign(\n  (strings: TemplateStringsArray, ...values: readonly unknown[]): CssTemplate => ({\n    text: String.raw({ raw: strings }, ...values.map(String)),\n    values: [...values],\n  }),\n  {\n    raw(text: string): CssRawFragment {\n      return { __cssKind: 'raw', text };\n    },\n  },\n);\n\nexport const css = cssTag;\n"]}

package/experimental/debug.d.ts

@@ -0,0 +1,2 @@
+export function assert(condition: unknown, message?: string): asserts condition;
+export function log<T>(value: T): T;

package/experimental/debug.js

@@ -0,0 +1,10 @@
+export function assert(condition, message = 'Assertion failed.') {
+    if (!condition) {
+        throw new Error(message);
+    }
+}
+export function log(value) {
+    console.log(value);
+    return value;
+}
+//# sourceMappingURL=debug.js.map

package/experimental/debug.js.map

@@ -0,0 +1 @@
+{"version":3,"file":"debug.js","sourceRoot":"","sources":["../soundscript/experimental/debug.sts"],"names":[],"mappings":"AAAA,MAAM,UAAU,MAAM,CAAC,SAAkB,EAAE,OAAO,GAAG,mBAAmB;IACtE,IAAI,CAAC,SAAS,EAAE,CAAC;QACf,MAAM,IAAI,KAAK,CAAC,OAAO,CAAC,CAAC;IAC3B,CAAC;AACH,CAAC;AAED,MAAM,UAAU,GAAG,CAAI,KAAQ;IAC7B,OAAO,CAAC,GAAG,CAAC,KAAK,CAAC,CAAC;IACnB,OAAO,KAAK,CAAC;AACf,CAAC","sourcesContent":["export function assert(condition: unknown, message = 'Assertion failed.'): asserts condition {\n  if (!condition) {\n    throw new Error(message);\n  }\n}\n\nexport function log<T>(value: T): T {\n  console.log(value);\n  return value;\n}\n"]}

package/experimental/graphql.d.ts

@@ -0,0 +1,16 @@
+export interface GraphqlRawFragment {
+  readonly __graphqlKind: 'raw';
+  readonly text: string;
+}
+
+export interface GraphqlQuery {
+  readonly query: string;
+  readonly values: readonly unknown[];
+}
+
+export interface GraphqlTag {
+  (strings: TemplateStringsArray, ...values: readonly unknown[]): GraphqlQuery;
+  raw(text: string): GraphqlRawFragment;
+}
+
+export const graphql: GraphqlTag;

package/experimental/graphql.js

@@ -0,0 +1,10 @@
+const graphqlTag = Object.assign((strings, ...values) => ({
+    query: String.raw({ raw: strings }, ...values.map(String)),
+    values: [...values],
+}), {
+    raw(text) {
+        return { __graphqlKind: 'raw', text };
+    },
+});
+export const graphql = graphqlTag;
+//# sourceMappingURL=graphql.js.map

package/experimental/graphql.js.map

@@ -0,0 +1 @@
+{"version":3,"file":"graphql.js","sourceRoot":"","sources":["../soundscript/experimental/graphql.sts"],"names":[],"mappings":"AAeA,MAAM,UAAU,GAAe,MAAM,CAAC,MAAM,CAC1C,CAAC,OAA6B,EAAE,GAAG,MAA0B,EAAgB,EAAE,CAAC,CAAC;IAC/E,KAAK,EAAE,MAAM,CAAC,GAAG,CAAC,EAAE,GAAG,EAAE,OAAO,EAAE,EAAE,GAAG,MAAM,CAAC,GAAG,CAAC,MAAM,CAAC,CAAC;IAC1D,MAAM,EAAE,CAAC,GAAG,MAAM,CAAC;CACpB,CAAC,EACF;IACE,GAAG,CAAC,IAAY;QACd,OAAO,EAAE,aAAa,EAAE,KAAK,EAAE,IAAI,EAAE,CAAC;IACxC,CAAC;CACF,CACF,CAAC;AAEF,MAAM,CAAC,MAAM,OAAO,GAAG,UAAU,CAAC","sourcesContent":["export interface GraphqlRawFragment {\n  readonly __graphqlKind: 'raw';\n  readonly text: string;\n}\n\nexport interface GraphqlQuery {\n  readonly query: string;\n  readonly values: readonly unknown[];\n}\n\nexport interface GraphqlTag {\n  (strings: TemplateStringsArray, ...values: readonly unknown[]): GraphqlQuery;\n  raw(text: string): GraphqlRawFragment;\n}\n\nconst graphqlTag: GraphqlTag = Object.assign(\n  (strings: TemplateStringsArray, ...values: readonly unknown[]): GraphqlQuery => ({\n    query: String.raw({ raw: strings }, ...values.map(String)),\n    values: [...values],\n  }),\n  {\n    raw(text: string): GraphqlRawFragment {\n      return { __graphqlKind: 'raw', text };\n    },\n  },\n);\n\nexport const graphql = graphqlTag;\n"]}

package/experimental/sql.d.ts

@@ -0,0 +1,22 @@
+export interface SqlQuery {
+  readonly text: string;
+  readonly params: readonly unknown[];
+}
+
+export interface SqlIdentifier {
+  readonly __sqlKind: 'identifier';
+  readonly name: string;
+}
+
+export interface SqlRawFragment {
+  readonly __sqlKind: 'raw';
+  readonly text: string;
+}
+
+export interface SqlTag {
+  (strings: TemplateStringsArray, ...values: readonly unknown[]): SqlQuery;
+  ident(name: string): SqlIdentifier;
+  raw(text: string): SqlRawFragment;
+}
+
+export const sql: SqlTag;

package/experimental/sql.js

@@ -0,0 +1,24 @@
+function buildSqlQuery(strings, values) {
+    let text = '';
+    for (let index = 0; index < strings.length; index += 1) {
+        text += strings[index] ?? '';
+        if (index < values.length) {
+            text += `$${index + 1}`;
+        }
+    }
+    return {
+        text,
+        params: [...values],
+    };
+}
+const sqlTag = ((strings, ...values) => buildSqlQuery(strings, values));
+sqlTag.ident = (name) => ({
+    __sqlKind: 'identifier',
+    name,
+});
+sqlTag.raw = (text) => ({
+    __sqlKind: 'raw',
+    text,
+});
+export const sql = sqlTag;
+//# sourceMappingURL=sql.js.map

package/experimental/sql.js.map

@@ -0,0 +1 @@
+{"version":3,"file":"sql.js","sourceRoot":"","sources":["../soundscript/experimental/sql.sts"],"names":[],"mappings":"AAqBA,SAAS,aAAa,CACpB,OAA6B,EAC7B,MAA0B;IAE1B,IAAI,IAAI,GAAG,EAAE,CAAC;IACd,KAAK,IAAI,KAAK,GAAG,CAAC,EAAE,KAAK,GAAG,OAAO,CAAC,MAAM,EAAE,KAAK,IAAI,CAAC,EAAE,CAAC;QACvD,IAAI,IAAI,OAAO,CAAC,KAAK,CAAC,IAAI,EAAE,CAAC;QAC7B,IAAI,KAAK,GAAG,MAAM,CAAC,MAAM,EAAE,CAAC;YAC1B,IAAI,IAAI,IAAI,KAAK,GAAG,CAAC,EAAE,CAAC;QAC1B,CAAC;IACH,CAAC;IAED,OAAO;QACL,IAAI;QACJ,MAAM,EAAE,CAAC,GAAG,MAAM,CAAC;KACpB,CAAC;AACJ,CAAC;AAED,MAAM,MAAM,GAAG,CAAC,CAAC,OAA6B,EAAE,GAAG,MAA0B,EAAE,EAAE,CAC/E,aAAa,CAAC,OAAO,EAAE,MAAM,CAAC,CAAW,CAAC;AAE5C,MAAM,CAAC,KAAK,GAAG,CAAC,IAAY,EAAiB,EAAE,CAAC,CAAC;IAC/C,SAAS,EAAE,YAAY;IACvB,IAAI;CACL,CAAC,CAAC;AAEH,MAAM,CAAC,GAAG,GAAG,CAAC,IAAY,EAAkB,EAAE,CAAC,CAAC;IAC9C,SAAS,EAAE,KAAK;IAChB,IAAI;CACL,CAAC,CAAC;AAEH,MAAM,CAAC,MAAM,GAAG,GAAG,MAAM,CAAC","sourcesContent":["export interface SqlQuery {\n  readonly text: string;\n  readonly params: readonly unknown[];\n}\n\nexport interface SqlIdentifier {\n  readonly __sqlKind: 'identifier';\n  readonly name: string;\n}\n\nexport interface SqlRawFragment {\n  readonly __sqlKind: 'raw';\n  readonly text: string;\n}\n\nexport interface SqlTag {\n  (strings: TemplateStringsArray, ...values: readonly unknown[]): SqlQuery;\n  ident(name: string): SqlIdentifier;\n  raw(text: string): SqlRawFragment;\n}\n\nfunction buildSqlQuery(\n  strings: TemplateStringsArray,\n  values: readonly unknown[],\n): SqlQuery {\n  let text = '';\n  for (let index = 0; index < strings.length; index += 1) {\n    text += strings[index] ?? '';\n    if (index < values.length) {\n      text += `$${index + 1}`;\n    }\n  }\n\n  return {\n    text,\n    params: [...values],\n  };\n}\n\nconst sqlTag = ((strings: TemplateStringsArray, ...values: readonly unknown[]) =>\n  buildSqlQuery(strings, values)) as SqlTag;\n\nsqlTag.ident = (name: string): SqlIdentifier => ({\n  __sqlKind: 'identifier',\n  name,\n});\n\nsqlTag.raw = (text: string): SqlRawFragment => ({\n  __sqlKind: 'raw',\n  text,\n});\n\nexport const sql = sqlTag;\n"]}

package/failures.d.ts

@@ -0,0 +1,23 @@
+export type ErrorFrame = {
+  readonly column: number;
+  readonly file: string;
+  readonly fn?: string;
+  readonly line: number;
+};
+
+export class Failure {
+  readonly cause?: unknown;
+  readonly message: string;
+  readonly name: string;
+  readonly trace: readonly ErrorFrame[];
+  constructor(
+    message?: string,
+    options?: {
+      cause?: unknown;
+      trace?: readonly ErrorFrame[];
+    },
+  );
+  withFrame(frame: ErrorFrame): this;
+}
+
+export function normalizeThrown(value: unknown): Error;

package/failures.js

@@ -0,0 +1,42 @@
+export class Failure {
+    constructor(message = '', options = {}) {
+        this.name = new.target.name;
+        this.message = message;
+        if ('cause' in options) {
+            this.cause = options.cause;
+        }
+        this.trace = options.trace ?? [];
+    }
+    withFrame(frame) {
+        const prototype = Object.getPrototypeOf(this);
+        const clone = (prototype === null ? Object.create(null) : Object.create(prototype));
+        Object.defineProperties(clone, Object.getOwnPropertyDescriptors(this));
+        Object.defineProperty(clone, 'trace', {
+            configurable: true,
+            enumerable: true,
+            writable: false,
+            value: [...this.trace, frame],
+        });
+        return clone;
+    }
+}
+export function normalizeThrown(value) {
+    if (value instanceof Error) {
+        return value;
+    }
+    const details = typeof value === 'object' && value !== null
+        ? value
+        : undefined;
+    const message = typeof details?.message === 'string'
+        ? details.message
+        : 'Non-Error thrown value.';
+    const error = new Error(message, { cause: value });
+    if (typeof details?.name === 'string') {
+        error.name = details.name;
+    }
+    if (typeof details?.stack === 'string') {
+        error.stack = details.stack;
+    }
+    return error;
+}
+//# sourceMappingURL=failures.js.map

package/failures.js.map

@@ -0,0 +1 @@
+{"version":3,"file":"failures.js","sourceRoot":"","sources":["./soundscript/failures.sts"],"names":[],"mappings":"AAOA,MAAM,OAAO,OAAO;IAMlB,YACE,OAAO,GAAG,EAAE,EACZ,UAGI,EAAE;QAEN,IAAI,CAAC,IAAI,GAAG,GAAG,CAAC,MAAM,CAAC,IAAI,CAAC;QAC5B,IAAI,CAAC,OAAO,GAAG,OAAO,CAAC;QACvB,IAAI,OAAO,IAAI,OAAO,EAAE,CAAC;YACvB,IAAI,CAAC,KAAK,GAAG,OAAO,CAAC,KAAK,CAAC;QAC7B,CAAC;QACD,IAAI,CAAC,KAAK,GAAG,OAAO,CAAC,KAAK,IAAI,EAAE,CAAC;IACnC,CAAC;IAED,SAAS,CAAC,KAAiB;QACzB,MAAM,SAAS,GAAG,MAAM,CAAC,cAAc,CAAC,IAAc,CAAC,CAAC;QACxD,MAAM,KAAK,GAAG,CAAC,SAAS,KAAK,IAAI,CAAC,CAAC,CAAC,MAAM,CAAC,MAAM,CAAC,IAAI,CAAC,CAAC,CAAC,CAAC,MAAM,CAAC,MAAM,CAAC,SAAS,CAAC,CAAS,CAAC;QAC5F,MAAM,CAAC,gBAAgB,CAAC,KAAK,EAAE,MAAM,CAAC,yBAAyB,CAAC,IAAI,CAAC,CAAC,CAAC;QACvE,MAAM,CAAC,cAAc,CAAC,KAAK,EAAE,OAAO,EAAE;YACpC,YAAY,EAAE,IAAI;YAClB,UAAU,EAAE,IAAI;YAChB,QAAQ,EAAE,KAAK;YACf,KAAK,EAAE,CAAC,GAAG,IAAI,CAAC,KAAK,EAAE,KAAK,CAAC;SAC9B,CAAC,CAAC;QACH,OAAO,KAAK,CAAC;IACf,CAAC;CACF;AAED,MAAM,UAAU,eAAe,CAAC,KAAc;IAC5C,IAAI,KAAK,YAAY,KAAK,EAAE,CAAC;QAC3B,OAAO,KAAK,CAAC;IACf,CAAC;IAED,MAAM,OAAO,GAAG,OAAO,KAAK,KAAK,QAAQ,IAAI,KAAK,KAAK,IAAI;QACzD,CAAC,CAAC,KAA+D;QACjE,CAAC,CAAC,SAAS,CAAC;IACd,MAAM,OAAO,GAAG,OAAO,OAAO,EAAE,OAAO,KAAK,QAAQ;QAClD,CAAC,CAAC,OAAO,CAAC,OAAO;QACjB,CAAC,CAAC,yBAAyB,CAAC;IAC9B,MAAM,KAAK,GAAG,IAAI,KAAK,CAAC,OAAO,EAAE,EAAE,KAAK,EAAE,KAAK,EAAE,CAAC,CAAC;IAEnD,IAAI,OAAO,OAAO,EAAE,IAAI,KAAK,QAAQ,EAAE,CAAC;QACtC,KAAK,CAAC,IAAI,GAAG,OAAO,CAAC,IAAI,CAAC;IAC5B,CAAC;IACD,IAAI,OAAO,OAAO,EAAE,KAAK,KAAK,QAAQ,EAAE,CAAC;QACvC,KAAK,CAAC,KAAK,GAAG,OAAO,CAAC,KAAK,CAAC;IAC9B,CAAC;IAED,OAAO,KAAK,CAAC;AACf,CAAC","sourcesContent":["export type ErrorFrame = {\n  readonly column: number;\n  readonly file: string;\n  readonly fn?: string;\n  readonly line: number;\n};\n\nexport class Failure {\n  readonly cause?: unknown;\n  readonly message: string;\n  readonly name: string;\n  readonly trace: readonly ErrorFrame[];\n\n  constructor(\n    message = '',\n    options: {\n      cause?: unknown;\n      trace?: readonly ErrorFrame[];\n    } = {},\n  ) {\n    this.name = new.target.name;\n    this.message = message;\n    if ('cause' in options) {\n      this.cause = options.cause;\n    }\n    this.trace = options.trace ?? [];\n  }\n\n  withFrame(frame: ErrorFrame): this {\n    const prototype = Object.getPrototypeOf(this as object);\n    const clone = (prototype === null ? Object.create(null) : Object.create(prototype)) as this;\n    Object.defineProperties(clone, Object.getOwnPropertyDescriptors(this));\n    Object.defineProperty(clone, 'trace', {\n      configurable: true,\n      enumerable: true,\n      writable: false,\n      value: [...this.trace, frame],\n    });\n    return clone;\n  }\n}\n\nexport function normalizeThrown(value: unknown): Error {\n  if (value instanceof Error) {\n    return value;\n  }\n\n  const details = typeof value === 'object' && value !== null\n    ? value as { message?: unknown; name?: unknown; stack?: unknown }\n    : undefined;\n  const message = typeof details?.message === 'string'\n    ? details.message\n    : 'Non-Error thrown value.';\n  const error = new Error(message, { cause: value });\n\n  if (typeof details?.name === 'string') {\n    error.name = details.name;\n  }\n  if (typeof details?.stack === 'string') {\n    error.stack = details.stack;\n  }\n\n  return error;\n}\n"]}

package/hash.d.ts

@@ -0,0 +1,34 @@
+import type { Eq } from '@soundscript/soundscript/compare';
+import type { Option, Result } from '@soundscript/soundscript/result';
+
+export type HashCode = number;
+
+export interface Hash<T> {
+  hash(value: T): HashCode;
+}
+
+export interface HashEq<T> extends Hash<T>, Eq<T> {}
+
+type HashEqValue<THashEq> = THashEq extends HashEq<infer TValue> ? TValue : never;
+
+export function fromHashEq<T>(
+  hash: (value: T) => HashCode,
+  equals: (left: T, right: T) => boolean,
+): HashEq<T>;
+export function contramap<A, B>(
+  hashEq: HashEq<A>,
+  project: (value: B) => A,
+): HashEq<B>;
+export function lazyHashEq<T>(getHashEq: () => HashEq<T>): HashEq<T>;
+export function arrayHash<T>(itemHash: HashEq<T>): HashEq<readonly T[]>;
+export function tupleHash<const THashEqs extends readonly HashEq<unknown>[]>(
+  ...elements: THashEqs
+): HashEq<{ readonly [K in keyof THashEqs]: HashEqValue<THashEqs[K]> }>;
+export function optionHash<T>(itemHash: HashEq<T>): HashEq<Option<T>>;
+export function resultHash<T, E>(okHash: HashEq<T>, errHash: HashEq<E>): HashEq<Result<T, E>>;
+
+export const stringHash: HashEq<string>;
+export const numberHash: HashEq<number>;
+export const booleanHash: HashEq<boolean>;
+export const bigintHash: HashEq<bigint>;
+export function combineHashes(...hashes: readonly HashCode[]): HashCode;

package/hash.js

@@ -0,0 +1,116 @@
+export function fromHashEq(hash, equals) {
+    return {
+        hash(value) {
+            return normalizeHashCode(hash(value));
+        },
+        equals,
+    };
+}
+export function contramap(hashEq, project) {
+    return fromHashEq((value) => hashEq.hash(project(value)), (left, right) => hashEq.equals(project(left), project(right)));
+}
+export function lazyHashEq(getHashEq) {
+    return fromHashEq((value) => getHashEq().hash(value), (left, right) => getHashEq().equals(left, right));
+}
+export function arrayHash(itemHash) {
+    return fromHashEq((value) => combineHashes(...value.map((entry) => itemHash.hash(entry))), (left, right) => {
+        if (left.length !== right.length) {
+            return false;
+        }
+        for (let index = 0; index < left.length; index += 1) {
+            if (!itemHash.equals(left[index], right[index])) {
+                return false;
+            }
+        }
+        return true;
+    });
+}
+export function tupleHash(...elements) {
+    return fromHashEq((value) => {
+        const values = value;
+        if (values.length !== elements.length) {
+            return 0;
+        }
+        return combineHashes(...elements.map((elementHash, index) => elementHash.hash(values[index])));
+    }, (left, right) => {
+        const leftValues = left;
+        const rightValues = right;
+        if (leftValues.length !== elements.length || rightValues.length !== elements.length) {
+            return false;
+        }
+        for (let index = 0; index < elements.length; index += 1) {
+            const elementHash = elements[index];
+            if (!elementHash) {
+                continue;
+            }
+            if (!elementHash.equals(leftValues[index], rightValues[index])) {
+                return false;
+            }
+        }
+        return true;
+    });
+}
+export function optionHash(itemHash) {
+    return fromHashEq((value) => value.tag === 'ok'
+        ? combineHashes(stringHash.hash('ok'), itemHash.hash(value.value))
+        : stringHash.hash('err'), (left, right) => {
+        if (left.tag !== right.tag) {
+            return false;
+        }
+        if (left.tag === 'ok' && right.tag === 'ok') {
+            return itemHash.equals(left.value, right.value);
+        }
+        return true;
+    });
+}
+export function resultHash(okHash, errHash) {
+    return fromHashEq((value) => value.tag === 'ok'
+        ? combineHashes(stringHash.hash('ok'), okHash.hash(value.value))
+        : combineHashes(stringHash.hash('err'), errHash.hash(value.error)), (left, right) => {
+        if (left.tag !== right.tag) {
+            return false;
+        }
+        if (left.tag === 'ok' && right.tag === 'ok') {
+            return okHash.equals(left.value, right.value);
+        }
+        if (left.tag === 'err' && right.tag === 'err') {
+            return errHash.equals(left.error, right.error);
+        }
+        return false;
+    });
+}
+export const stringHash = fromHashEq(hashString, (left, right) => left === right);
+export const numberHash = fromHashEq((value) => hashString(normalizeNumberKey(value)), (left, right) => left === right || (Number.isNaN(left) && Number.isNaN(right)));
+export const booleanHash = fromHashEq((value) => value ? 1 : 0, (left, right) => left === right);
+export const bigintHash = fromHashEq((value) => hashString(value.toString()), (left, right) => left === right);
+export function combineHashes(...hashes) {
+    let hash = 0;
+    for (const value of hashes) {
+        hash = Math.imul(hash ^ normalizeHashCode(value), 0x01000193);
+    }
+    return normalizeHashCode(hash);
+}
+function normalizeHashCode(value) {
+    if (!Number.isFinite(value)) {
+        return 0;
+    }
+    return value | 0;
+}
+function normalizeNumberKey(value) {
+    if (Number.isNaN(value)) {
+        return 'NaN';
+    }
+    if (value === 0) {
+        return '0';
+    }
+    return String(value);
+}
+function hashString(value) {
+    let hash = 0x811c9dc5;
+    for (let index = 0; index < value.length; index += 1) {
+        hash ^= value.charCodeAt(index);
+        hash = Math.imul(hash, 0x01000193);
+    }
+    return hash | 0;
+}
+//# sourceMappingURL=hash.js.map

package/hash.js.map

@@ -0,0 +1 @@
+{"version":3,"file":"hash.js","sourceRoot":"","sources":["./soundscript/hash.sts"],"names":[],"mappings":"AAaA,MAAM,UAAU,UAAU,CACxB,IAA4B,EAC5B,MAAsC;IAEtC,OAAO;QACL,IAAI,CAAC,KAAK;YACR,OAAO,iBAAiB,CAAC,IAAI,CAAC,KAAK,CAAC,CAAC,CAAC;QACxC,CAAC;QACD,MAAM;KACP,CAAC;AACJ,CAAC;AAED,MAAM,UAAU,SAAS,CACvB,MAAiB,EACjB,OAAwB;IAExB,OAAO,UAAU,CACf,CAAC,KAAK,EAAE,EAAE,CAAC,MAAM,CAAC,IAAI,CAAC,OAAO,CAAC,KAAK,CAAC,CAAC,EACtC,CAAC,IAAI,EAAE,KAAK,EAAE,EAAE,CAAC,MAAM,CAAC,MAAM,CAAC,OAAO,CAAC,IAAI,CAAC,EAAE,OAAO,CAAC,KAAK,CAAC,CAAC,CAC9D,CAAC;AACJ,CAAC;AAED,MAAM,UAAU,UAAU,CAAI,SAA0B;IACtD,OAAO,UAAU,CACf,CAAC,KAAK,EAAE,EAAE,CAAC,SAAS,EAAE,CAAC,IAAI,CAAC,KAAK,CAAC,EAClC,CAAC,IAAI,EAAE,KAAK,EAAE,EAAE,CAAC,SAAS,EAAE,CAAC,MAAM,CAAC,IAAI,EAAE,KAAK,CAAC,CACjD,CAAC;AACJ,CAAC;AAED,MAAM,UAAU,SAAS,CAAI,QAAmB;IAC9C,OAAO,UAAU,CACf,CAAC,KAAK,EAAE,EAAE,CAAC,aAAa,CAAC,GAAG,KAAK,CAAC,GAAG,CAAC,CAAC,KAAK,EAAE,EAAE,CAAC,QAAQ,CAAC,IAAI,CAAC,KAAK,CAAC,CAAC,CAAC,EACvE,CAAC,IAAI,EAAE,KAAK,EAAE,EAAE;QACd,IAAI,IAAI,CAAC,MAAM,KAAK,KAAK,CAAC,MAAM,EAAE,CAAC;YACjC,OAAO,KAAK,CAAC;QACf,CAAC;QAED,KAAK,IAAI,KAAK,GAAG,CAAC,EAAE,KAAK,GAAG,IAAI,CAAC,MAAM,EAAE,KAAK,IAAI,CAAC,EAAE,CAAC;YACpD,IAAI,CAAC,QAAQ,CAAC,MAAM,CAAC,IAAI,CAAC,KAAK,CAAE,EAAE,KAAK,CAAC,KAAK,CAAE,CAAC,EAAE,CAAC;gBAClD,OAAO,KAAK,CAAC;YACf,CAAC;QACH,CAAC;QAED,OAAO,IAAI,CAAC;IACd,CAAC,CACF,CAAC;AACJ,CAAC;AAED,MAAM,UAAU,SAAS,CACvB,GAAG,QAAkB;IAErB,OAAO,UAAU,CACf,CAAC,KAAK,EAAE,EAAE;QACR,MAAM,MAAM,GAAG,KAA2B,CAAC;QAC3C,IAAI,MAAM,CAAC,MAAM,KAAK,QAAQ,CAAC,MAAM,EAAE,CAAC;YACtC,OAAO,CAAC,CAAC;QACX,CAAC;QACD,OAAO,aAAa,CAClB,GAAG,QAAQ,CAAC,GAAG,CAAC,CAAC,WAAW,EAAE,KAAK,EAAE,EAAE,CAAC,WAAW,CAAC,IAAI,CAAC,MAAM,CAAC,KAAK,CAAC,CAAC,CAAC,CACzE,CAAC;IACJ,CAAC,EACD,CAAC,IAAI,EAAE,KAAK,EAAE,EAAE;QACd,MAAM,UAAU,GAAG,IAA0B,CAAC;QAC9C,MAAM,WAAW,GAAG,KAA2B,CAAC;QAChD,IAAI,UAAU,CAAC,MAAM,KAAK,QAAQ,CAAC,MAAM,IAAI,WAAW,CAAC,MAAM,KAAK,QAAQ,CAAC,MAAM,EAAE,CAAC;YACpF,OAAO,KAAK,CAAC;QACf,CAAC;QAED,KAAK,IAAI,KAAK,GAAG,CAAC,EAAE,KAAK,GAAG,QAAQ,CAAC,MAAM,EAAE,KAAK,IAAI,CAAC,EAAE,CAAC;YACxD,MAAM,WAAW,GAAG,QAAQ,CAAC,KAAK,CAAC,CAAC;YACpC,IAAI,CAAC,WAAW,EAAE,CAAC;gBACjB,SAAS;YACX,CAAC;YACD,IAAI,CAAC,WAAW,CAAC,MAAM,CAAC,UAAU,CAAC,KAAK,CAAC,EAAE,WAAW,CAAC,KAAK,CAAC,CAAC,EAAE,CAAC;gBAC/D,OAAO,KAAK,CAAC;YACf,CAAC;QACH,CAAC;QAED,OAAO,IAAI,CAAC;IACd,CAAC,CACF,CAAC;AACJ,CAAC;AAED,MAAM,UAAU,UAAU,CAAI,QAAmB;IAC/C,OAAO,UAAU,CACf,CAAC,KAAK,EAAE,EAAE,CACR,KAAK,CAAC,GAAG,KAAK,IAAI;QAChB,CAAC,CAAC,aAAa,CAAC,UAAU,CAAC,IAAI,CAAC,IAAI,CAAC,EAAE,QAAQ,CAAC,IAAI,CAAC,KAAK,CAAC,KAAK,CAAC,CAAC;QAClE,CAAC,CAAC,UAAU,CAAC,IAAI,CAAC,KAAK,CAAC,EAC5B,CAAC,IAAI,EAAE,KAAK,EAAE,EAAE;QACd,IAAI,IAAI,CAAC,GAAG,KAAK,KAAK,CAAC,GAAG,EAAE,CAAC;YAC3B,OAAO,KAAK,CAAC;QACf,CAAC;QAED,IAAI,IAAI,CAAC,GAAG,KAAK,IAAI,IAAI,KAAK,CAAC,GAAG,KAAK,IAAI,EAAE,CAAC;YAC5C,OAAO,QAAQ,CAAC,MAAM,CAAC,IAAI,CAAC,KAAK,EAAE,KAAK,CAAC,KAAK,CAAC,CAAC;QAClD,CAAC;QAED,OAAO,IAAI,CAAC;IACd,CAAC,CACF,CAAC;AACJ,CAAC;AAED,MAAM,UAAU,UAAU,CAAO,MAAiB,EAAE,OAAkB;IACpE,OAAO,UAAU,CACf,CAAC,KAAK,EAAE,EAAE,CACR,KAAK,CAAC,GAAG,KAAK,IAAI;QAChB,CAAC,CAAC,aAAa,CAAC,UAAU,CAAC,IAAI,CAAC,IAAI,CAAC,EAAE,MAAM,CAAC,IAAI,CAAC,KAAK,CAAC,KAAK,CAAC,CAAC;QAChE,CAAC,CAAC,aAAa,CAAC,UAAU,CAAC,IAAI,CAAC,KAAK,CAAC,EAAE,OAAO,CAAC,IAAI,CAAC,KAAK,CAAC,KAAK,CAAC,CAAC,EACtE,CAAC,IAAI,EAAE,KAAK,EAAE,EAAE;QACd,IAAI,IAAI,CAAC,GAAG,KAAK,KAAK,CAAC,GAAG,EAAE,CAAC;YAC3B,OAAO,KAAK,CAAC;QACf,CAAC;QAED,IAAI,IAAI,CAAC,GAAG,KAAK,IAAI,IAAI,KAAK,CAAC,GAAG,KAAK,IAAI,EAAE,CAAC;YAC5C,OAAO,MAAM,CAAC,MAAM,CAAC,IAAI,CAAC,KAAK,EAAE,KAAK,CAAC,KAAK,CAAC,CAAC;QAChD,CAAC;QAED,IAAI,IAAI,CAAC,GAAG,KAAK,KAAK,IAAI,KAAK,CAAC,GAAG,KAAK,KAAK,EAAE,CAAC;YAC9C,OAAO,OAAO,CAAC,MAAM,CAAC,IAAI,CAAC,KAAK,EAAE,KAAK,CAAC,KAAK,CAAC,CAAC;QACjD,CAAC;QAED,OAAO,KAAK,CAAC;IACf,CAAC,CACF,CAAC;AACJ,CAAC;AAED,MAAM,CAAC,MAAM,UAAU,GAAmB,UAAU,CAClD,UAAU,EACV,CAAC,IAAI,EAAE,KAAK,EAAE,EAAE,CAAC,IAAI,KAAK,KAAK,CAChC,CAAC;AAEF,MAAM,CAAC,MAAM,UAAU,GAAmB,UAAU,CAClD,CAAC,KAAK,EAAE,EAAE,CAAC,UAAU,CAAC,kBAAkB,CAAC,KAAK,CAAC,CAAC,EAChD,CAAC,IAAI,EAAE,KAAK,EAAE,EAAE,CAAC,IAAI,KAAK,KAAK,IAAI,CAAC,MAAM,CAAC,KAAK,CAAC,IAAI,CAAC,IAAI,MAAM,CAAC,KAAK,CAAC,KAAK,CAAC,CAAC,CAC/E,CAAC;AAEF,MAAM,CAAC,MAAM,WAAW,GAAoB,UAAU,CACpD,CAAC,KAAK,EAAE,EAAE,CAAC,KAAK,CAAC,CAAC,CAAC,CAAC,CAAC,CAAC,CAAC,CAAC,EACxB,CAAC,IAAI,EAAE,KAAK,EAAE,EAAE,CAAC,IAAI,KAAK,KAAK,CAChC,CAAC;AAEF,MAAM,CAAC,MAAM,UAAU,GAAmB,UAAU,CAClD,CAAC,KAAK,EAAE,EAAE,CAAC,UAAU,CAAC,KAAK,CAAC,QAAQ,EAAE,CAAC,EACvC,CAAC,IAAI,EAAE,KAAK,EAAE,EAAE,CAAC,IAAI,KAAK,KAAK,CAChC,CAAC;AAEF,MAAM,UAAU,aAAa,CAAC,GAAG,MAA2B;IAC1D,IAAI,IAAI,GAAG,CAAC,CAAC;IACb,KAAK,MAAM,KAAK,IAAI,MAAM,EAAE,CAAC;QAC3B,IAAI,GAAG,IAAI,CAAC,IAAI,CAAC,IAAI,GAAG,iBAAiB,CAAC,KAAK,CAAC,EAAE,UAAU,CAAC,CAAC;IAChE,CAAC;IACD,OAAO,iBAAiB,CAAC,IAAI,CAAC,CAAC;AACjC,CAAC;AAED,SAAS,iBAAiB,CAAC,KAAa;IACtC,IAAI,CAAC,MAAM,CAAC,QAAQ,CAAC,KAAK,CAAC,EAAE,CAAC;QAC5B,OAAO,CAAC,CAAC;IACX,CAAC;IAED,OAAO,KAAK,GAAG,CAAC,CAAC;AACnB,CAAC;AAED,SAAS,kBAAkB,CAAC,KAAa;IACvC,IAAI,MAAM,CAAC,KAAK,CAAC,KAAK,CAAC,EAAE,CAAC;QACxB,OAAO,KAAK,CAAC;IACf,CAAC;IAED,IAAI,KAAK,KAAK,CAAC,EAAE,CAAC;QAChB,OAAO,GAAG,CAAC;IACb,CAAC;IAED,OAAO,MAAM,CAAC,KAAK,CAAC,CAAC;AACvB,CAAC;AAED,SAAS,UAAU,CAAC,KAAa;IAC/B,IAAI,IAAI,GAAG,UAAU,CAAC;IACtB,KAAK,IAAI,KAAK,GAAG,CAAC,EAAE,KAAK,GAAG,KAAK,CAAC,MAAM,EAAE,KAAK,IAAI,CAAC,EAAE,CAAC;QACrD,IAAI,IAAI,KAAK,CAAC,UAAU,CAAC,KAAK,CAAC,CAAC;QAChC,IAAI,GAAG,IAAI,CAAC,IAAI,CAAC,IAAI,EAAE,UAAU,CAAC,CAAC;IACrC,CAAC;IACD,OAAO,IAAI,GAAG,CAAC,CAAC;AAClB,CAAC","sourcesContent":["import type { Eq } from '@soundscript/soundscript/compare';\nimport type { Option, Result } from '@soundscript/soundscript/result';\n\nexport type HashCode = number;\n\nexport interface Hash<T> {\n  hash(value: T): HashCode;\n}\n\nexport interface HashEq<T> extends Hash<T>, Eq<T> {}\n\ntype HashEqValue<THashEq> = THashEq extends HashEq<infer TValue> ? TValue : never;\n\nexport function fromHashEq<T>(\n  hash: (value: T) => HashCode,\n  equals: (left: T, right: T) => boolean,\n): HashEq<T> {\n  return {\n    hash(value) {\n      return normalizeHashCode(hash(value));\n    },\n    equals,\n  };\n}\n\nexport function contramap<A, B>(\n  hashEq: HashEq<A>,\n  project: (value: B) => A,\n): HashEq<B> {\n  return fromHashEq(\n    (value) => hashEq.hash(project(value)),\n    (left, right) => hashEq.equals(project(left), project(right)),\n  );\n}\n\nexport function lazyHashEq<T>(getHashEq: () => HashEq<T>): HashEq<T> {\n  return fromHashEq(\n    (value) => getHashEq().hash(value),\n    (left, right) => getHashEq().equals(left, right),\n  );\n}\n\nexport function arrayHash<T>(itemHash: HashEq<T>): HashEq<readonly T[]> {\n  return fromHashEq(\n    (value) => combineHashes(...value.map((entry) => itemHash.hash(entry))),\n    (left, right) => {\n      if (left.length !== right.length) {\n        return false;\n      }\n\n      for (let index = 0; index < left.length; index += 1) {\n        if (!itemHash.equals(left[index]!, right[index]!)) {\n          return false;\n        }\n      }\n\n      return true;\n    },\n  );\n}\n\nexport function tupleHash<const THashEqs extends readonly HashEq<unknown>[]>(\n  ...elements: THashEqs\n): HashEq<{ readonly [K in keyof THashEqs]: HashEqValue<THashEqs[K]> }> {\n  return fromHashEq(\n    (value) => {\n      const values = value as readonly unknown[];\n      if (values.length !== elements.length) {\n        return 0;\n      }\n      return combineHashes(\n        ...elements.map((elementHash, index) => elementHash.hash(values[index])),\n      );\n    },\n    (left, right) => {\n      const leftValues = left as readonly unknown[];\n      const rightValues = right as readonly unknown[];\n      if (leftValues.length !== elements.length || rightValues.length !== elements.length) {\n        return false;\n      }\n\n      for (let index = 0; index < elements.length; index += 1) {\n        const elementHash = elements[index];\n        if (!elementHash) {\n          continue;\n        }\n        if (!elementHash.equals(leftValues[index], rightValues[index])) {\n          return false;\n        }\n      }\n\n      return true;\n    },\n  );\n}\n\nexport function optionHash<T>(itemHash: HashEq<T>): HashEq<Option<T>> {\n  return fromHashEq(\n    (value) =>\n      value.tag === 'ok'\n        ? combineHashes(stringHash.hash('ok'), itemHash.hash(value.value))\n        : stringHash.hash('err'),\n    (left, right) => {\n      if (left.tag !== right.tag) {\n        return false;\n      }\n\n      if (left.tag === 'ok' && right.tag === 'ok') {\n        return itemHash.equals(left.value, right.value);\n      }\n\n      return true;\n    },\n  );\n}\n\nexport function resultHash<T, E>(okHash: HashEq<T>, errHash: HashEq<E>): HashEq<Result<T, E>> {\n  return fromHashEq(\n    (value) =>\n      value.tag === 'ok'\n        ? combineHashes(stringHash.hash('ok'), okHash.hash(value.value))\n        : combineHashes(stringHash.hash('err'), errHash.hash(value.error)),\n    (left, right) => {\n      if (left.tag !== right.tag) {\n        return false;\n      }\n\n      if (left.tag === 'ok' && right.tag === 'ok') {\n        return okHash.equals(left.value, right.value);\n      }\n\n      if (left.tag === 'err' && right.tag === 'err') {\n        return errHash.equals(left.error, right.error);\n      }\n\n      return false;\n    },\n  );\n}\n\nexport const stringHash: HashEq<string> = fromHashEq(\n  hashString,\n  (left, right) => left === right,\n);\n\nexport const numberHash: HashEq<number> = fromHashEq(\n  (value) => hashString(normalizeNumberKey(value)),\n  (left, right) => left === right || (Number.isNaN(left) && Number.isNaN(right)),\n);\n\nexport const booleanHash: HashEq<boolean> = fromHashEq(\n  (value) => value ? 1 : 0,\n  (left, right) => left === right,\n);\n\nexport const bigintHash: HashEq<bigint> = fromHashEq(\n  (value) => hashString(value.toString()),\n  (left, right) => left === right,\n);\n\nexport function combineHashes(...hashes: readonly HashCode[]): HashCode {\n  let hash = 0;\n  for (const value of hashes) {\n    hash = Math.imul(hash ^ normalizeHashCode(value), 0x01000193);\n  }\n  return normalizeHashCode(hash);\n}\n\nfunction normalizeHashCode(value: number): HashCode {\n  if (!Number.isFinite(value)) {\n    return 0;\n  }\n\n  return value | 0;\n}\n\nfunction normalizeNumberKey(value: number): string {\n  if (Number.isNaN(value)) {\n    return 'NaN';\n  }\n\n  if (value === 0) {\n    return '0';\n  }\n\n  return String(value);\n}\n\nfunction hashString(value: string): HashCode {\n  let hash = 0x811c9dc5;\n  for (let index = 0; index < value.length; index += 1) {\n    hash ^= value.charCodeAt(index);\n    hash = Math.imul(hash, 0x01000193);\n  }\n  return hash | 0;\n}\n"]}

package/hkt.d.ts

@@ -0,0 +1,40 @@
+export interface TypeLambda {
+  readonly Args: readonly unknown[];
+  readonly type: unknown;
+}
+
+export type Apply<F extends TypeLambda, Args extends readonly unknown[]> = F extends {
+  readonly __target: infer Target extends TypeLambda;
+  readonly __prefix: infer Prefix extends readonly unknown[];
+} ? Apply<Target, [...Prefix, ...Args]>
+  : (F & { readonly Args: Args })['type'];
+
+export type Bind<F extends TypeLambda, Prefix extends readonly unknown[]> = TypeLambda & {
+  readonly __target: F;
+  readonly __prefix: Prefix;
+};
+
+export type Kind<F extends TypeLambda, A> = Apply<F, [A]>;
+export type Kind2<F extends TypeLambda, A, B> = Apply<F, [A, B]>;
+export type Kind3<F extends TypeLambda, A, B, C> = Apply<F, [A, B, C]>;
+
+export type MonadTypeLambda<M extends { readonly __type_lambda?: TypeLambda }> = M extends {
+  readonly __type_lambda?: infer F extends TypeLambda;
+} ? F
+  : never;
+export type BoundEffect<F extends TypeLambda, A = unknown> = Kind<F, A>;
+export type BoundValue<F extends TypeLambda, Value> = Value extends BoundEffect<F, infer A> ? A
+  : never;
+export type Binder<F extends TypeLambda> = <A>(value: BoundEffect<F, A>) => A;
+
+export type {
+  Applicative,
+  AsyncMonad,
+  Contravariant,
+  Functor,
+  Invariant,
+  Monad,
+} from '@soundscript/soundscript/typeclasses';
+export { Do, monadGen } from '@soundscript/soundscript/typeclasses';
+
+export const hkt: unknown;

package/hkt.js

@@ -0,0 +1,4 @@
+export { Do, monadGen } from '@soundscript/soundscript/typeclasses';
+// Macro binding placeholder. The compiler-owned macro pipeline consumes this symbol.
+export const hkt = undefined;
+//# sourceMappingURL=hkt.js.map

package/hkt.js.map

@@ -0,0 +1 @@
+{"version":3,"file":"hkt.js","sourceRoot":"","sources":["./soundscript/hkt.sts"],"names":[],"mappings":"AAqCA,OAAO,EAAE,EAAE,EAAE,QAAQ,EAAE,MAAM,sCAAsC,CAAC;AAEpE,qFAAqF;AACrF,MAAM,CAAC,MAAM,GAAG,GAAY,SAAS,CAAC","sourcesContent":["export interface TypeLambda {\n  readonly Args: readonly unknown[];\n  readonly type: unknown;\n}\n\nexport type Apply<F extends TypeLambda, Args extends readonly unknown[]> = F extends {\n  readonly __target: infer Target extends TypeLambda;\n  readonly __prefix: infer Prefix extends readonly unknown[];\n} ? Apply<Target, [...Prefix, ...Args]>\n  : (F & { readonly Args: Args })['type'];\n\nexport type Bind<F extends TypeLambda, Prefix extends readonly unknown[]> = TypeLambda & {\n  readonly __target: F;\n  readonly __prefix: Prefix;\n};\n\nexport type Kind<F extends TypeLambda, A> = Apply<F, [A]>;\nexport type Kind2<F extends TypeLambda, A, B> = Apply<F, [A, B]>;\nexport type Kind3<F extends TypeLambda, A, B, C> = Apply<F, [A, B, C]>;\n\nexport type MonadTypeLambda<M extends { readonly __type_lambda?: TypeLambda }> = M extends {\n  readonly __type_lambda?: infer F extends TypeLambda;\n} ? F\n  : never;\nexport type BoundEffect<F extends TypeLambda, A = unknown> = Kind<F, A>;\nexport type BoundValue<F extends TypeLambda, Value> = Value extends BoundEffect<F, infer A> ? A\n  : never;\nexport type Binder<F extends TypeLambda> = <A>(value: BoundEffect<F, A>) => A;\n\nexport type {\n  Applicative,\n  AsyncMonad,\n  Contravariant,\n  Functor,\n  Invariant,\n  Monad,\n} from '@soundscript/soundscript/typeclasses';\nexport { Do, monadGen } from '@soundscript/soundscript/typeclasses';\n\n// Macro binding placeholder. The compiler-owned macro pipeline consumes this symbol.\nexport const hkt: unknown = undefined;\n"]}

package/index.d.ts

@@ -0,0 +1,9 @@
+export type { Err, None, Ok, Option, Result, Some } from '@soundscript/soundscript/result';
+
+export { err, isErr, isNone, isOk, isSome, none, ok, some, Try } from '@soundscript/soundscript/result';
+export { Match, where } from '@soundscript/soundscript/match';
+export { Failure } from '@soundscript/soundscript/failures';
+
+export function Defer(cleanup: () => unknown): never;
+export function todo(message?: string): never;
+export function unreachable(message?: string): never;

package/index.js

@@ -0,0 +1,16 @@
+export { err, isErr, isNone, isOk, isSome, none, ok, some, Try } from '@soundscript/soundscript/result';
+export { Match, where } from '@soundscript/soundscript/match';
+export { Failure } from '@soundscript/soundscript/failures';
+function macroRuntimeError(name) {
+    throw new Error(`${name}(...) is a Soundscript macro and should be removed during Soundscript expansion.`);
+}
+export function Defer(_cleanup) {
+    return macroRuntimeError('Defer');
+}
+export function todo(message) {
+    throw new Error(message ? `TODO: ${message}` : 'TODO');
+}
+export function unreachable(message) {
+    throw new Error(message ? `Unreachable: ${message}` : 'Unreachable');
+}
+//# sourceMappingURL=index.js.map

package/index.js.map

@@ -0,0 +1 @@
+{"version":3,"file":"index.js","sourceRoot":"","sources":["./soundscript/index.sts"],"names":[],"mappings":"AAEA,OAAO,EAAE,GAAG,EAAE,KAAK,EAAE,MAAM,EAAE,IAAI,EAAE,MAAM,EAAE,IAAI,EAAE,EAAE,EAAE,IAAI,EAAE,GAAG,EAAE,MAAM,iCAAiC,CAAC;AACxG,OAAO,EAAE,KAAK,EAAE,KAAK,EAAE,MAAM,gCAAgC,CAAC;AAC9D,OAAO,EAAE,OAAO,EAAE,MAAM,mCAAmC,CAAC;AAE5D,SAAS,iBAAiB,CAAC,IAAY;IACrC,MAAM,IAAI,KAAK,CACb,GAAG,IAAI,kFAAkF,CAC1F,CAAC;AACJ,CAAC;AAED,MAAM,UAAU,KAAK,CAAC,QAAuB;IAC3C,OAAO,iBAAiB,CAAC,OAAO,CAAC,CAAC;AACpC,CAAC;AAED,MAAM,UAAU,IAAI,CAAC,OAAgB;IACnC,MAAM,IAAI,KAAK,CAAC,OAAO,CAAC,CAAC,CAAC,SAAS,OAAO,EAAE,CAAC,CAAC,CAAC,MAAM,CAAC,CAAC;AACzD,CAAC;AAED,MAAM,UAAU,WAAW,CAAC,OAAgB;IAC1C,MAAM,IAAI,KAAK,CAAC,OAAO,CAAC,CAAC,CAAC,gBAAgB,OAAO,EAAE,CAAC,CAAC,CAAC,aAAa,CAAC,CAAC;AACvE,CAAC","sourcesContent":["export type { Err, None, Ok, Option, Result, Some } from '@soundscript/soundscript/result';\n\nexport { err, isErr, isNone, isOk, isSome, none, ok, some, Try } from '@soundscript/soundscript/result';\nexport { Match, where } from '@soundscript/soundscript/match';\nexport { Failure } from '@soundscript/soundscript/failures';\n\nfunction macroRuntimeError(name: string): never {\n  throw new Error(\n    `${name}(...) is a Soundscript macro and should be removed during Soundscript expansion.`,\n  );\n}\n\nexport function Defer(_cleanup: () => unknown): never {\n  return macroRuntimeError('Defer');\n}\n\nexport function todo(message?: string): never {\n  throw new Error(message ? `TODO: ${message}` : 'TODO');\n}\n\nexport function unreachable(message?: string): never {\n  throw new Error(message ? `Unreachable: ${message}` : 'Unreachable');\n}\n"]}

package/json.d.ts

@@ -0,0 +1,98 @@
+import { Failure } from '@soundscript/soundscript/failures';
+import type { Decoder } from '@soundscript/soundscript/decode';
+import type { Encoder } from '@soundscript/soundscript/encode';
+import type { Result } from '@soundscript/soundscript/result';
+
+export type JsonArray = JsonValue[];
+export type JsonObject = {
+  [key: string]: JsonValue;
+};
+export type JsonValue = string | number | boolean | null | JsonObject | JsonArray;
+type LosslessJsonArray = LosslessJsonValue[];
+type LosslessJsonObject = {
+  [key: string]: LosslessJsonValue;
+};
+export type LosslessJsonValue =
+  | string
+  | number
+  | bigint
+  | boolean
+  | null
+  | LosslessJsonObject
+  | LosslessJsonArray;
+
+export type JsonLikeArray = JsonLikeValue[];
+export type JsonLikeObject = {
+  [key: string]: JsonLikeValue;
+};
+export type JsonLikeValue =
+  | string
+  | number
+  | boolean
+  | bigint
+  | null
+  | undefined
+  | JsonLikeObject
+  | JsonLikeArray;
+
+export interface JsonParseOptions {
+  int64?: 'default' | 'lossless';
+}
+
+export type JsonStringifyBigintMode = 'number' | 'reject' | 'string';
+
+export interface JsonStringifyOptions {
+  int64?: 'default' | 'string' | 'lossless';
+  readonly bigint?: JsonStringifyBigintMode;
+}
+
+export class JsonParseFailure extends Failure {
+  constructor(cause?: unknown);
+}
+
+export class JsonStringifyFailure extends Failure {
+  constructor(cause?: unknown);
+}
+
+export function parseJson(text: string): Result<JsonValue, JsonParseFailure>;
+export function parseJson(
+  text: string,
+  options: JsonParseOptions & { int64: 'lossless' },
+): Result<LosslessJsonValue, JsonParseFailure>;
+export function parseJson(
+  text: string,
+  options?: JsonParseOptions,
+): Result<JsonValue | LosslessJsonValue, JsonParseFailure>;
+export function stringifyJson(value: JsonValue): Result<string, JsonStringifyFailure>;
+export function stringifyJson(
+  value: LosslessJsonValue,
+  options: JsonStringifyOptions & { int64: 'string' | 'lossless' },
+): Result<string, JsonStringifyFailure>;
+export function stringifyJson(
+  value: JsonValue | LosslessJsonValue,
+  options?: JsonStringifyOptions,
+): Result<string, JsonStringifyFailure>;
+export function parseAndDecode<T, E>(
+  text: string,
+  decoder: Decoder<T, E>,
+): Result<T, JsonParseFailure | E>;
+export function encodeAndStringify<T, E>(
+  value: T,
+  encoder: Encoder<T, JsonValue, E>,
+): Result<string, E | JsonStringifyFailure>;
+export function isJsonValue(value: unknown): value is JsonValue;
+export function parseJsonLike(text: string): Result<JsonLikeValue, JsonParseFailure>;
+export function stringifyJsonLike(
+  value: JsonLikeValue,
+  options?: JsonStringifyOptions,
+): Result<string, JsonStringifyFailure>;
+export function decodeJson<T, E>(
+  text: string,
+  decoder: Decoder<T, E>,
+): Result<T, E | JsonParseFailure>;
+export function encodeJson<T, E>(
+  value: T,
+  encoder: Encoder<T, JsonLikeValue, E>,
+  options?: JsonStringifyOptions,
+): Result<string, E | JsonStringifyFailure>;
+export function isJsonLikeValue(value: unknown): value is JsonLikeValue;