@typed/fx 0.0.1

package/esm/Service/Id.d.ts

@@ -0,0 +1,59 @@
+import { Service } from './Service.js';
+import { Fx, RIO } from '@/Fx/Fx.js';
+import * as Layer from '@/Layer/Layer.js';
+import { Scope } from '@/Scope/Scope.js';
+export declare type InstanceOf<T> = T extends new (...args: any) => infer R ? R : T;
+/**
+ * Extendable class for constructing a Service
+ */
+export declare class Id {
+    readonly name: string;
+    /**
+     * The ID of the Service.
+     *
+     * Unfortunately, in order to get type-inference the way we'd like this must
+     * currently be a method to access the "this" type in sub-classes.
+     */
+    static id<S extends {
+        readonly name: string;
+    }>(this: S): Service<InstanceOf<S>>;
+    readonly id: Service<this>;
+    /**
+     * Retrieve this service at Runtime, requiring it from the given Environment.
+     */
+    static ask<S extends {
+        readonly id: () => Service<any>;
+        new (...args: any): any;
+    }>(this: S): RIO<InstanceOf<S>, InstanceOf<S>>;
+    /**
+     * Construct a Layer that provides this service.
+     */
+    static layer<S extends {
+        readonly id: () => Service<any>;
+        new (...args: any): any;
+    }, R, E>(this: S, provider: Fx<R | Scope, E, InstanceOf<S>>): Layer.Layer<R, E, InstanceOf<S>>;
+}
+/**
+ * Helper for constructing IDs that are tied to a particular object, which much have
+ * a name to create the Service Key. Particularly useful for creating Class declarations for Services.
+ *
+ * @example
+ * import * as S from '@typed/fx/Service'
+ * import * as Fx from '@typed/fx/Fx'
+ *
+ * class Foo {
+ *   static id = S.getCachedId(this)
+ *
+ *   constructor(readonly foo: string) {}
+ * }
+ *
+ * const program = Fx.Fx(function*(){
+ *   const { foo }: Foo = yield* Fx.ask(Foo.id)
+ *a
+ *   return foo // string
+ * })
+ */
+export declare function getCachedId<S extends {
+    readonly name: string;
+}>(key: S): Service<InstanceOf<S>>;
+//# sourceMappingURL=Id.d.ts.map

package/esm/Service/Id.d.ts.map

@@ -0,0 +1 @@
+{"version":3,"file":"Id.d.ts","sourceRoot":"","sources":["../../src/Service/Id.ts"],"names":[],"mappings":"AAAA,OAAO,EAAE,OAAO,EAAE,MAAM,cAAc,CAAA;AAEtC,OAAO,EAAE,EAAE,EAAE,GAAG,EAAO,MAAM,YAAY,CAAA;AACzC,OAAO,KAAK,KAAK,MAAM,kBAAkB,CAAA;AACzC,OAAO,EAAE,KAAK,EAAE,MAAM,kBAAkB,CAAA;AAIxC,oBAAY,UAAU,CAAC,CAAC,IAAI,CAAC,SAAS,KAAK,GAAG,IAAI,EAAE,GAAG,KAAK,MAAM,CAAC,GAAG,CAAC,GAAG,CAAC,CAAA;AAE3E;;GAEG;AACH,qBAAa,EAAE;IACb,QAAQ,CAAC,IAAI,EAAE,MAAM,CAAwB;IAE7C;;;;;OAKG;IACH,MAAM,CAAC,EAAE,CAAC,CAAC,SAAS;QAAE,QAAQ,CAAC,IAAI,EAAE,MAAM,CAAA;KAAE,EAAE,IAAI,EAAE,CAAC,GAAG,OAAO,CAAC,UAAU,CAAC,CAAC,CAAC,CAAC;IAK/E,QAAQ,CAAC,EAAE,EAAE,OAAO,CAAC,IAAI,CAAC,CAAiC;IAE3D;;OAEG;IACH,MAAM,CAAC,GAAG,CACR,CAAC,SAAS;QACR,QAAQ,CAAC,EAAE,EAAE,MAAM,OAAO,CAAC,GAAG,CAAC,CAAA;QAC/B,KAAK,GAAG,IAAI,EAAE,GAAG,GAAG,GAAG,CAAA;KACxB,EACD,IAAI,EAAE,CAAC,GAAG,GAAG,CAAC,UAAU,CAAC,CAAC,CAAC,EAAE,UAAU,CAAC,CAAC,CAAC,CAAC;IAI7C;;OAEG;IACH,MAAM,CAAC,KAAK,CACV,CAAC,SAAS;QACR,QAAQ,CAAC,EAAE,EAAE,MAAM,OAAO,CAAC,GAAG,CAAC,CAAA;QAC/B,KAAK,GAAG,IAAI,EAAE,GAAG,GAAG,GAAG,CAAA;KACxB,EACD,CAAC,EACD,CAAC,EACD,IAAI,EAAE,CAAC,EAAE,QAAQ,EAAE,EAAE,CAAC,CAAC,GAAG,KAAK,EAAE,CAAC,EAAE,UAAU,CAAC,CAAC,CAAC,CAAC,GAAG,KAAK,CAAC,KAAK,CAAC,CAAC,EAAE,CAAC,EAAE,UAAU,CAAC,CAAC,CAAC,CAAC;CAGxF;AAED;;;;;;;;;;;;;;;;;;;GAmBG;AACH,wBAAgB,WAAW,CAAC,CAAC,SAAS;IAAE,QAAQ,CAAC,IAAI,EAAE,MAAM,CAAA;CAAE,EAAE,GAAG,EAAE,CAAC,GAAG,OAAO,CAAC,UAAU,CAAC,CAAC,CAAC,CAAC,CAU/F"}

package/esm/Service/Id.js

@@ -0,0 +1,62 @@
+import { Service } from './Service.js';
+import { ask } from '@/Fx/Fx.js';
+import * as Layer from '@/Layer/Layer.js';
+const idCache = new WeakMap();
+/**
+ * Extendable class for constructing a Service
+ */
+export class Id {
+    name = this.constructor.name;
+    /**
+     * The ID of the Service.
+     *
+     * Unfortunately, in order to get type-inference the way we'd like this must
+     * currently be a method to access the "this" type in sub-classes.
+     */
+    static id() {
+        return getCachedId(this);
+    }
+    // Replicate the same ID to the instance.
+    id = this.constructor.id();
+    /**
+     * Retrieve this service at Runtime, requiring it from the given Environment.
+     */
+    static ask() {
+        return ask(this.id(), "ask" + " node_modules/@typed/fx/src/Service/Id.ts:39:15");
+    }
+    /**
+     * Construct a Layer that provides this service.
+     */
+    static layer(provider) {
+        return Layer.fromFx(this.id(), provider);
+    }
+}
+/**
+ * Helper for constructing IDs that are tied to a particular object, which much have
+ * a name to create the Service Key. Particularly useful for creating Class declarations for Services.
+ *
+ * @example
+ * import * as S from '@typed/fx/Service'
+ * import * as Fx from '@typed/fx/Fx'
+ *
+ * class Foo {
+ *   static id = S.getCachedId(this)
+ *
+ *   constructor(readonly foo: string) {}
+ * }
+ *
+ * const program = Fx.Fx(function*(){
+ *   const { foo }: Foo = yield* Fx.ask(Foo.id)
+ *a
+ *   return foo // string
+ * })
+ */
+export function getCachedId(key) {
+    if (idCache.has(key)) {
+        return idCache.get(key);
+    }
+    const s = Service(key.name);
+    idCache.set(key, s);
+    return s;
+}
+//# sourceMappingURL=Id.js.map

package/esm/Service/Id.js.map

@@ -0,0 +1 @@
+{"version":3,"file":"Id.js","sourceRoot":"","sources":["../../src/Service/Id.ts"],"names":[],"mappings":"AAAA,OAAO,EAAE,OAAO,EAAE,MAAM,cAAc,CAAA;AAEtC,OAAO,EAAW,GAAG,EAAE,MAAM,YAAY,CAAA;AACzC,OAAO,KAAK,KAAK,MAAM,kBAAkB,CAAA;AAGzC,MAAM,OAAO,GAAG,IAAI,OAAO,EAAwB,CAAA;AAInD;;GAEG;AACH,MAAM,OAAO,EAAE;IACJ,IAAI,GAAW,IAAI,CAAC,WAAW,CAAC,IAAI,CAAA;IAE7C;;;;;OAKG;IACH,MAAM,CAAC,EAAE;QACP,OAAO,WAAW,CAAC,IAAI,CAAC,CAAA;IAC1B,CAAC;IAED,yCAAyC;IAChC,EAAE,GAAmB,IAAI,CAAC,WAAmB,CAAC,EAAE,EAAE,CAAA;IAE3D;;OAEG;IACH,MAAM,CAAC,GAAG;QAMR,OAAO,GAAG,CAAC,IAAI,CAAC,EAAE,EAAE,4DAAC,CAAA;IACvB,CAAC;IAED;;OAEG;IACH,MAAM,CAAC,KAAK,CAOD,QAAyC;QAClD,OAAO,KAAK,CAAC,MAAM,CAAC,IAAI,CAAC,EAAE,EAAE,EAAE,QAAQ,CAAC,CAAA;IAC1C,CAAC;CACF;AAED;;;;;;;;;;;;;;;;;;;GAmBG;AACH,MAAM,UAAU,WAAW,CAAsC,GAAM;IACrE,IAAI,OAAO,CAAC,GAAG,CAAC,GAAG,CAAC,EAAE;QACpB,OAAO,OAAO,CAAC,GAAG,CAAC,GAAG,CAA2B,CAAA;KAClD;IAED,MAAM,CAAC,GAAG,OAAO,CAAgB,GAAG,CAAC,IAAI,CAAC,CAAA;IAE1C,OAAO,CAAC,GAAG,CAAC,GAAG,EAAE,CAAC,CAAC,CAAA;IAEnB,OAAO,CAAC,CAAA;AACV,CAAC"}

package/esm/Service/Service.d.ts

@@ -0,0 +1,20 @@
+import { Tagged } from '@/Tagged/index.js';
+/**
+ * The Definition/ID of a Service
+ */
+export declare type Service<S> = Tagged<{
+    readonly Service: S;
+}, symbol>;
+/**
+ * Construct a Service, the provided name is used for debugging purposes and is required.
+ */
+export declare const Service: <S>(name: string) => Service<S>;
+/**
+ * Extract the output of a Service
+ */
+export declare type OutputOf<T> = [T] extends [Service<infer S>] ? S : never;
+/**
+ * Format a Service's into a string.
+ */
+export declare function formatService<A>(service: Service<A>): string;
+//# sourceMappingURL=Service.d.ts.map

package/esm/Service/Service.d.ts.map

@@ -0,0 +1 @@
+{"version":3,"file":"Service.d.ts","sourceRoot":"","sources":["../../src/Service/Service.ts"],"names":[],"mappings":"AAAA,OAAO,EAAE,MAAM,EAAE,MAAM,mBAAmB,CAAA;AAE1C;;GAEG;AACH,oBAAY,OAAO,CAAC,CAAC,IAAI,MAAM,CAC7B;IACE,QAAQ,CAAC,OAAO,EAAE,CAAC,CAAA;CACpB,EACD,MAAM,CACP,CAAA;AAED;;GAEG;AACH,eAAO,MAAM,OAAO,YAAa,MAAM,eAAmD,CAAA;AAE1F;;GAEG;AACH,oBAAY,QAAQ,CAAC,CAAC,IAAI,CAAC,CAAC,CAAC,SAAS,CAAC,OAAO,CAAC,MAAM,CAAC,CAAC,CAAC,GAAG,CAAC,GAAG,KAAK,CAAA;AAKpE;;GAEG;AACH,wBAAgB,aAAa,CAAC,CAAC,EAAE,OAAO,EAAE,OAAO,CAAC,CAAC,CAAC,UAEnD"}

package/esm/Service/Service.js

@@ -0,0 +1,14 @@
+import { Tagged } from '@/Tagged/index.js';
+/**
+ * Construct a Service, the provided name is used for debugging purposes and is required.
+ */
+export const Service = (name) => Tagged()(Symbol(name));
+const symbolRegex = /^Symbol/i;
+const serviceText = 'Service';
+/**
+ * Format a Service's into a string.
+ */
+export function formatService(service) {
+    return service.toString().replace(symbolRegex, serviceText);
+}
+//# sourceMappingURL=Service.js.map

package/esm/Service/Service.js.map

@@ -0,0 +1 @@
+{"version":3,"file":"Service.js","sourceRoot":"","sources":["../../src/Service/Service.ts"],"names":[],"mappings":"AAAA,OAAO,EAAE,MAAM,EAAE,MAAM,mBAAmB,CAAA;AAY1C;;GAEG;AACH,MAAM,CAAC,MAAM,OAAO,GAAG,CAAI,IAAY,EAAc,EAAE,CAAC,MAAM,EAAc,CAAC,MAAM,CAAC,IAAI,CAAC,CAAC,CAAA;AAO1F,MAAM,WAAW,GAAG,UAAU,CAAA;AAC9B,MAAM,WAAW,GAAG,SAAS,CAAA;AAE7B;;GAEG;AACH,MAAM,UAAU,aAAa,CAAI,OAAmB;IAClD,OAAO,OAAO,CAAC,QAAQ,EAAE,CAAC,OAAO,CAAC,WAAW,EAAE,WAAW,CAAC,CAAA;AAC7D,CAAC"}

package/esm/Service/index.d.ts

@@ -0,0 +1,4 @@
+export * from './Service.js';
+export * from './Id.js';
+export * from './tagged.js';
+//# sourceMappingURL=index.d.ts.map

package/esm/Service/index.d.ts.map

@@ -0,0 +1 @@
+{"version":3,"file":"index.d.ts","sourceRoot":"","sources":["../../src/Service/index.ts"],"names":[],"mappings":"AAAA,cAAc,cAAc,CAAA;AAC5B,cAAc,SAAS,CAAA;AACvB,cAAc,aAAa,CAAA"}

package/esm/Service/index.js

@@ -0,0 +1,4 @@
+export * from './Service.js';
+export * from './Id.js';
+export * from './tagged.js';
+//# sourceMappingURL=index.js.map

package/esm/Service/index.js.map

@@ -0,0 +1 @@
+{"version":3,"file":"index.js","sourceRoot":"","sources":["../../src/Service/index.ts"],"names":[],"mappings":"AAAA,cAAc,cAAc,CAAA;AAC5B,cAAc,SAAS,CAAA;AACvB,cAAc,aAAa,CAAA"}

package/esm/Service/tagged.d.ts

@@ -0,0 +1,23 @@
+/**
+ * Sometimes it is necessary to tag a Service to ensure it is considered different from another at the type-level.
+ */
+export declare const tagged: <Tag extends string>(tag: Tag) => {
+    new (): {
+        readonly tag: Tag;
+        readonly name: string;
+        readonly id: import("./Service.js").Service<any>;
+    };
+    tag: Tag;
+    id<S extends {
+        readonly name: string;
+    }>(this: S): import("./Service.js").Service<import("./Id.js").InstanceOf<S>>;
+    ask<S_1 extends {
+        new (...args: any): any;
+        readonly id: () => import("./Service.js").Service<any>;
+    }>(this: S_1): import("../index.js").RIO<import("./Id.js").InstanceOf<S_1>, import("./Id.js").InstanceOf<S_1>>;
+    layer<S_2 extends {
+        new (...args: any): any;
+        readonly id: () => import("./Service.js").Service<any>;
+    }, R, E>(this: S_2, provider: import("../Fx/Fx.js").Fx<import("../Scope/Scope.js").Scope | R, E, import("./Id.js").InstanceOf<S_2>>): import("../Layer/Layer.js").Layer<R, E, import("./Id.js").InstanceOf<S_2>>;
+};
+//# sourceMappingURL=tagged.d.ts.map

package/esm/Service/tagged.d.ts.map

@@ -0,0 +1 @@
+{"version":3,"file":"tagged.d.ts","sourceRoot":"","sources":["../../src/Service/tagged.ts"],"names":[],"mappings":"AAEA;;GAEG;AACH,eAAO,MAAM,MAAM;;;;;;;;;;;;;;;;;;CAIhB,CAAA"}

package/esm/Service/tagged.js

@@ -0,0 +1,9 @@
+import { Id } from './Id.js';
+/**
+ * Sometimes it is necessary to tag a Service to ensure it is considered different from another at the type-level.
+ */
+export const tagged = (tag) => class TaggedService extends Id {
+    static tag = tag;
+    tag = tag;
+};
+//# sourceMappingURL=tagged.js.map

package/esm/Service/tagged.js.map

@@ -0,0 +1 @@
+{"version":3,"file":"tagged.js","sourceRoot":"","sources":["../../src/Service/tagged.ts"],"names":[],"mappings":"AAAA,OAAO,EAAE,EAAE,EAAE,MAAM,SAAS,CAAA;AAE5B;;GAEG;AACH,MAAM,CAAC,MAAM,MAAM,GAAG,CAAqB,GAAQ,EAAE,EAAE,CACrD,MAAM,aAAc,SAAQ,EAAE;IAC5B,MAAM,CAAC,GAAG,GAAQ,GAAG,CAAA;IACZ,GAAG,GAAQ,GAAG,CAAA;CACxB,CAAA"}

package/esm/Sink/Sink.d.ts

@@ -0,0 +1,22 @@
+import { Cause } from '@/Cause/Cause.js';
+import { Fx, IO } from '@/Fx/Fx.js';
+import { Closeable } from '@/Scope/Closeable.js';
+export interface Sink<E, A> {
+    readonly event: (a: A) => IO<E, any>;
+    readonly error: (cause: Cause<E>) => IO<E, any>;
+    readonly end: IO<E, any>;
+}
+export declare class Drain<E, A> implements Sink<E, A> {
+    readonly scope: Closeable;
+    constructor(scope: Closeable);
+    readonly event: Sink<E, A>['event'];
+    readonly error: Sink<E, A>['error'];
+    readonly end: Sink<E, A>['end'];
+}
+export interface SinkFx<E, A, R2 = never, E2 = never, R3 = never, E3 = never, R4 = never, E4 = never> {
+    readonly event?: (a: A) => Fx<R2, E2, any>;
+    readonly error?: (cause: Cause<E>) => Fx<R3, E3, any>;
+    readonly end?: Fx<R4, E4, any>;
+}
+export declare function makeDrain<E, A, R2 = never, E2 = never, R3 = never, E3 = never, R4 = never, E4 = never>(scope: Closeable, fx: SinkFx<E, A, R2, E2, R3, E3, R4, E4>): Fx<R2 | R3 | R4, never, Sink<E | E2 | E3 | E4, A>>;
+//# sourceMappingURL=Sink.d.ts.map

package/esm/Sink/Sink.d.ts.map

@@ -0,0 +1 @@
+{"version":3,"file":"Sink.d.ts","sourceRoot":"","sources":["../../src/Sink/Sink.ts"],"names":[],"mappings":"AAGA,OAAO,EAAE,KAAK,EAAE,MAAM,kBAAkB,CAAA;AACxC,OAAO,EAAE,EAAE,EAAE,EAAE,EAAyB,MAAM,YAAY,CAAA;AAC1D,OAAO,EAAE,SAAS,EAAE,MAAM,sBAAsB,CAAA;AAEhD,MAAM,WAAW,IAAI,CAAC,CAAC,EAAE,CAAC;IACxB,QAAQ,CAAC,KAAK,EAAE,CAAC,CAAC,EAAE,CAAC,KAAK,EAAE,CAAC,CAAC,EAAE,GAAG,CAAC,CAAA;IACpC,QAAQ,CAAC,KAAK,EAAE,CAAC,KAAK,EAAE,KAAK,CAAC,CAAC,CAAC,KAAK,EAAE,CAAC,CAAC,EAAE,GAAG,CAAC,CAAA;IAC/C,QAAQ,CAAC,GAAG,EAAE,EAAE,CAAC,CAAC,EAAE,GAAG,CAAC,CAAA;CACzB;AAED,qBAAa,KAAK,CAAC,CAAC,EAAE,CAAC,CAAE,YAAW,IAAI,CAAC,CAAC,EAAE,CAAC,CAAC;IAChC,QAAQ,CAAC,KAAK,EAAE,SAAS;gBAAhB,KAAK,EAAE,SAAS;IAErC,QAAQ,CAAC,KAAK,EAAE,IAAI,CAAC,CAAC,EAAE,CAAC,CAAC,CAAC,OAAO,CAAC,CAA2B;IAC9D,QAAQ,CAAC,KAAK,EAAE,IAAI,CAAC,CAAC,EAAE,CAAC,CAAC,CAAC,OAAO,CAAC,CAAyD;IAC5F,QAAQ,CAAC,GAAG,EAAE,IAAI,CAAC,CAAC,EAAE,CAAC,CAAC,CAAC,KAAK,CAAC,CAAmD;CACnF;AAED,MAAM,WAAW,MAAM,CACrB,CAAC,EACD,CAAC,EACD,EAAE,GAAG,KAAK,EACV,EAAE,GAAG,KAAK,EACV,EAAE,GAAG,KAAK,EACV,EAAE,GAAG,KAAK,EACV,EAAE,GAAG,KAAK,EACV,EAAE,GAAG,KAAK;IAEV,QAAQ,CAAC,KAAK,CAAC,EAAE,CAAC,CAAC,EAAE,CAAC,KAAK,EAAE,CAAC,EAAE,EAAE,EAAE,EAAE,GAAG,CAAC,CAAA;IAC1C,QAAQ,CAAC,KAAK,CAAC,EAAE,CAAC,KAAK,EAAE,KAAK,CAAC,CAAC,CAAC,KAAK,EAAE,CAAC,EAAE,EAAE,EAAE,EAAE,GAAG,CAAC,CAAA;IACrD,QAAQ,CAAC,GAAG,CAAC,EAAE,EAAE,CAAC,EAAE,EAAE,EAAE,EAAE,GAAG,CAAC,CAAA;CAC/B;AAED,wBAAgB,SAAS,CACvB,CAAC,EACD,CAAC,EACD,EAAE,GAAG,KAAK,EACV,EAAE,GAAG,KAAK,EACV,EAAE,GAAG,KAAK,EACV,EAAE,GAAG,KAAK,EACV,EAAE,GAAG,KAAK,EACV,EAAE,GAAG,KAAK,EAEV,KAAK,EAAE,SAAS,EAChB,EAAE,EAAE,MAAM,CAAC,CAAC,EAAE,CAAC,EAAE,EAAE,EAAE,EAAE,EAAE,EAAE,EAAE,EAAE,EAAE,EAAE,EAAE,EAAE,CAAC,GACvC,EAAE,CAAC,EAAE,GAAG,EAAE,GAAG,EAAE,EAAE,KAAK,EAAE,IAAI,CAAC,CAAC,GAAG,EAAE,GAAG,EAAE,GAAG,EAAE,EAAE,CAAC,CAAC,CAAC,CAgBpD"}

package/esm/Sink/Sink.js

@@ -0,0 +1,26 @@
+import { flow, pipe } from 'hkt-ts';
+import { Left, Right } from 'hkt-ts/Either';
+import { Fx, getEnv, provide, unit } from '@/Fx/Fx.js';
+export class Drain {
+    scope;
+    constructor(scope) {
+        this.scope = scope;
+    }
+    event = () => unit;
+    error = (cause) => this.scope.close(Left(cause));
+    end = this.scope.close(Right(undefined));
+}
+export function makeDrain(scope, fx) {
+    return Fx(function* () {
+        const env = yield* getEnv();
+        const drain = new Drain(scope);
+        // TODO: Should drain always be called for error + end?
+        const sink = {
+            event: (fx.event ? flow(fx.event, provide(env)) : drain.event),
+            error: (fx.error ? flow(fx.error, provide(env)) : drain.error),
+            end: (fx.end ? pipe(fx.end, provide(env)) : drain.end),
+        };
+        return sink;
+    }, "Fx" + " node_modules/@typed/fx/src/Sink/Sink.ts:50:12");
+}
+//# sourceMappingURL=Sink.js.map

package/esm/Sink/Sink.js.map

@@ -0,0 +1 @@
+{"version":3,"file":"Sink.js","sourceRoot":"","sources":["../../src/Sink/Sink.ts"],"names":[],"mappings":"AAAA,OAAO,EAAE,IAAI,EAAE,IAAI,EAAE,MAAM,QAAQ,CAAA;AACnC,OAAO,EAAE,IAAI,EAAE,KAAK,EAAE,MAAM,eAAe,CAAA;AAG3C,OAAO,EAAE,EAAE,EAAM,MAAM,EAAE,OAAO,EAAE,IAAI,EAAE,MAAM,YAAY,CAAA;AAS1D,MAAM,OAAO,KAAK;IACK;IAArB,YAAqB,KAAgB;QAAhB,UAAK,GAAL,KAAK,CAAW;IAAG,CAAC;IAEhC,KAAK,GAAwB,GAAG,EAAE,CAAC,IAAkB,CAAA;IACrD,KAAK,GAAwB,CAAC,KAAK,EAAE,EAAE,CAAC,IAAI,CAAC,KAAK,CAAC,KAAK,CAAC,IAAI,CAAC,KAAK,CAAC,CAAe,CAAA;IACnF,GAAG,GAAsB,IAAI,CAAC,KAAK,CAAC,KAAK,CAAC,KAAK,CAAC,SAAS,CAAC,CAAe,CAAA;CACnF;AAiBD,MAAM,UAAU,SAAS,CAUvB,KAAgB,EAChB,EAAwC;IAExC,OAAO,EAAE,CAAC,QAAQ,CAAC;QACjB,MAAM,GAAG,GAAG,KAAK,CAAC,CAAC,MAAM,EAAgB,CAAA;QACzC,MAAM,KAAK,GAAG,IAAI,KAAK,CAAO,KAAK,CAAC,CAAA;QAIpC,uDAAuD;QACvD,MAAM,IAAI,GAAM;YACd,KAAK,EAAE,CAAC,EAAE,CAAC,KAAK,CAAC,CAAC,CAAC,IAAI,CAAC,EAAE,CAAC,KAAK,EAAE,OAAO,CAAC,GAAG,CAAC,CAAC,CAAC,CAAC,CAAC,KAAK,CAAC,KAAK,CAAe;YAC5E,KAAK,EAAE,CAAC,EAAE,CAAC,KAAK,CAAC,CAAC,CAAC,IAAI,CAAC,EAAE,CAAC,KAAK,EAAE,OAAO,CAAC,GAAG,CAAC,CAAC,CAAC,CAAC,CAAC,KAAK,CAAC,KAAK,CAAe;YAC5E,GAAG,EAAE,CAAC,EAAE,CAAC,GAAG,CAAC,CAAC,CAAC,IAAI,CAAC,EAAE,CAAC,GAAG,EAAE,OAAO,CAAC,GAAG,CAAC,CAAC,CAAC,CAAC,CAAC,KAAK,CAAC,GAAG,CAAa;SACnE,CAAA;QAED,OAAO,IAAI,CAAA;IACb,CAAC,0DAAC,CAAA;AACJ,CAAC"}

package/esm/Sink/index.d.ts

@@ -0,0 +1 @@
+//# sourceMappingURL=index.d.ts.map

package/esm/Sink/index.d.ts.map

@@ -0,0 +1 @@
+{"version":3,"file":"index.d.ts","sourceRoot":"","sources":["../../src/Sink/index.ts"],"names":[],"mappings":""}

package/esm/Sink/index.js

@@ -0,0 +1,2 @@
+"use strict";
+//# sourceMappingURL=index.js.map

package/esm/Sink/index.js.map

@@ -0,0 +1 @@
+{"version":3,"file":"index.js","sourceRoot":"","sources":["../../src/Sink/index.ts"],"names":[],"mappings":""}

package/esm/Stack/index.d.ts

@@ -0,0 +1,20 @@
+import { NonEmptyArray } from 'hkt-ts/NonEmptyArray';
+import * as Assoc from 'hkt-ts/Typeclass/Associative';
+import * as E from 'hkt-ts/Typeclass/Eq';
+import { Identity } from 'hkt-ts/Typeclass/Identity';
+export declare class Stack<A> {
+    readonly value: A;
+    readonly previous: Stack<A> | null;
+    constructor(value: A, previous?: Stack<A> | null);
+    readonly push: (value: A) => Stack<A>;
+    readonly pop: () => Stack<A> | null;
+    readonly replace: (f: (value: A) => A) => Stack<A>;
+    [Symbol.iterator](): Generator<A, void, unknown>;
+}
+export declare const makeEq: <A>(A: E.Eq<A>) => E.Eq<Stack<A>>;
+export declare function toNonEmptyArray<A>(stack: Stack<A>): NonEmptyArray<A>;
+export declare function fromNonEmptyArray<A>(a: NonEmptyArray<A>): Stack<A>;
+export declare const join: <A>(AssocA: Assoc.Associative<A>) => (second: Stack<A>) => (first: Stack<A>) => Stack<A>;
+export declare const makeAssociative: <A>(AssocA: Assoc.Associative<A>) => Assoc.Associative<Stack<A>>;
+export declare const makeIdentity: <A>(I: Identity<A>) => Identity<Stack<A>>;
+//# sourceMappingURL=index.d.ts.map

package/esm/Stack/index.d.ts.map

@@ -0,0 +1 @@
+{"version":3,"file":"index.d.ts","sourceRoot":"","sources":["../../src/Stack/index.ts"],"names":[],"mappings":"AACA,OAAO,EAAE,aAAa,EAAO,MAAM,sBAAsB,CAAA;AACzD,OAAO,KAAK,KAAK,MAAM,8BAA8B,CAAA;AACrD,OAAO,KAAK,CAAC,MAAM,qBAAqB,CAAA;AACxC,OAAO,EAAE,QAAQ,EAAE,MAAM,2BAA2B,CAAA;AAEpD,qBAAa,KAAK,CAAC,CAAC;IACN,QAAQ,CAAC,KAAK,EAAE,CAAC;IAAE,QAAQ,CAAC,QAAQ,EAAE,KAAK,CAAC,CAAC,CAAC,GAAG,IAAI;gBAA5C,KAAK,EAAE,CAAC,EAAW,QAAQ,GAAE,KAAK,CAAC,CAAC,CAAC,GAAG,IAAW;IAExE,QAAQ,CAAC,IAAI,UAAW,CAAC,KAAG,MAAM,CAAC,CAAC,CAA0B;IAC9D,QAAQ,CAAC,GAAG,QAAO,MAAM,CAAC,CAAC,GAAG,IAAI,CAAiB;IACnD,QAAQ,CAAC,OAAO,cAAe,CAAC,KAAK,CAAC,KAAG,MAAM,CAAC,CAAC,CAA4C;IAE5F,CAAC,MAAM,CAAC,QAAQ,CAAC;CASnB;AAED,eAAO,MAAM,MAAM,mCAOlB,CAAA;AAED,wBAAgB,eAAe,CAAC,CAAC,EAAE,KAAK,EAAE,KAAK,CAAC,CAAC,CAAC,GAAG,aAAa,CAAC,CAAC,CAAC,CAEpE;AAED,wBAAgB,iBAAiB,CAAC,CAAC,EAAE,CAAC,EAAE,aAAa,CAAC,CAAC,CAAC,GAAG,KAAK,CAAC,CAAC,CAAC,CAIlE;AAED,eAAO,MAAM,IAAI,0FAkCd,CAAA;AAEH,eAAO,MAAM,eAAe,kEAE1B,CAAA;AAGF,eAAO,MAAM,YAAY,2CAGvB,CAAA"}

package/esm/Stack/index.js

@@ -0,0 +1,70 @@
+import { pipe } from 'hkt-ts';
+import { map } from 'hkt-ts/NonEmptyArray';
+import * as Assoc from 'hkt-ts/Typeclass/Associative';
+import * as E from 'hkt-ts/Typeclass/Eq';
+export class Stack {
+    value;
+    previous;
+    constructor(value, previous = null) {
+        this.value = value;
+        this.previous = previous;
+    }
+    push = (value) => new Stack(value, this);
+    pop = () => this.previous;
+    replace = (f) => new Stack(f(this.value), this.previous);
+    *[Symbol.iterator]() {
+        yield this.value;
+        let current = this.previous;
+        while (current) {
+            yield current.value;
+            current = current.previous;
+        }
+    }
+}
+export const makeEq = (A) => {
+    const eq = E.struct({
+        value: A,
+        previous: E.nullable(E.lazy(() => eq)),
+    });
+    return eq;
+};
+export function toNonEmptyArray(stack) {
+    return Array.from(stack);
+}
+export function fromNonEmptyArray(a) {
+    return a
+        .slice(0, a.length - 1)
+        .reduceRight((prev, a) => new Stack(a, prev), new Stack(a[a.length - 1]));
+}
+export const join = (AssocA) => (second) => (first) => {
+    const f = toNonEmptyArray(first);
+    const fl = f.length;
+    const s = toNonEmptyArray(second);
+    const sl = s.length;
+    if (fl === 0) {
+        return second;
+    }
+    if (sl === 0) {
+        return first;
+    }
+    // Fast-path for stacks that are equal in size
+    if (fl === sl) {
+        return pipe(f, map((a, i) => AssocA.concat(a, s[i])), fromNonEmptyArray);
+    }
+    const hi = fl > sl ? f : s;
+    const lo = fl < sl ? s : f;
+    const diff = hi.length - lo.length;
+    const join = fl > sl ? AssocA.concat : Assoc.reverse(AssocA).concat;
+    const toPrepend = lo.slice(0, diff);
+    const toConcat = hi.slice(diff);
+    return fromNonEmptyArray([...toPrepend, ...toConcat.map((a, i) => join(a, lo[i]))]);
+};
+export const makeAssociative = (AssocA) => ({
+    concat: (f, s) => join(AssocA)(f)(s),
+});
+// takes an Identity<A> and returns an Identity<Stack<A>>
+export const makeIdentity = (I) => ({
+    ...makeAssociative(I),
+    id: new Stack(I.id),
+});
+//# sourceMappingURL=index.js.map

package/esm/Stack/index.js.map

@@ -0,0 +1 @@
+{"version":3,"file":"index.js","sourceRoot":"","sources":["../../src/Stack/index.ts"],"names":[],"mappings":"AAAA,OAAO,EAAE,IAAI,EAAE,MAAM,QAAQ,CAAA;AAC7B,OAAO,EAAiB,GAAG,EAAE,MAAM,sBAAsB,CAAA;AACzD,OAAO,KAAK,KAAK,MAAM,8BAA8B,CAAA;AACrD,OAAO,KAAK,CAAC,MAAM,qBAAqB,CAAA;AAGxC,MAAM,OAAO,KAAK;IACK;IAAmB;IAAxC,YAAqB,KAAQ,EAAW,WAA4B,IAAI;QAAnD,UAAK,GAAL,KAAK,CAAG;QAAW,aAAQ,GAAR,QAAQ,CAAwB;IAAG,CAAC;IAEnE,IAAI,GAAG,CAAC,KAAQ,EAAY,EAAE,CAAC,IAAI,KAAK,CAAC,KAAK,EAAE,IAAI,CAAC,CAAA;IACrD,GAAG,GAAG,GAAoB,EAAE,CAAC,IAAI,CAAC,QAAQ,CAAA;IAC1C,OAAO,GAAG,CAAC,CAAkB,EAAY,EAAE,CAAC,IAAI,KAAK,CAAC,CAAC,CAAC,IAAI,CAAC,KAAK,CAAC,EAAE,IAAI,CAAC,QAAQ,CAAC,CAAC;IAE7F,CAAC,CAAC,MAAM,CAAC,QAAQ,CAAC;QAChB,MAAM,IAAI,CAAC,KAAK,CAAA;QAEhB,IAAI,OAAO,GAAG,IAAI,CAAC,QAAQ,CAAA;QAC3B,OAAO,OAAO,EAAE;YACd,MAAM,OAAO,CAAC,KAAK,CAAA;YACnB,OAAO,GAAG,OAAO,CAAC,QAAQ,CAAA;SAC3B;IACH,CAAC;CACF;AAED,MAAM,CAAC,MAAM,MAAM,GAAG,CAAI,CAAU,EAAkB,EAAE;IACtD,MAAM,EAAE,GAAmB,CAAC,CAAC,MAAM,CAAC;QAClC,KAAK,EAAE,CAAC;QACR,QAAQ,EAAE,CAAC,CAAC,QAAQ,CAAC,CAAC,CAAC,IAAI,CAAC,GAAG,EAAE,CAAC,EAAE,CAAC,CAAC;KACvC,CAAC,CAAA;IAEF,OAAO,EAAE,CAAA;AACX,CAAC,CAAA;AAED,MAAM,UAAU,eAAe,CAAI,KAAe;IAChD,OAAO,KAAK,CAAC,IAAI,CAAC,KAAK,CAAQ,CAAA;AACjC,CAAC;AAED,MAAM,UAAU,iBAAiB,CAAI,CAAmB;IACtD,OAAO,CAAC;SACL,KAAK,CAAC,CAAC,EAAE,CAAC,CAAC,MAAM,GAAG,CAAC,CAAC;SACtB,WAAW,CAAC,CAAC,IAAI,EAAE,CAAC,EAAE,EAAE,CAAC,IAAI,KAAK,CAAC,CAAC,EAAE,IAAI,CAAC,EAAE,IAAI,KAAK,CAAC,CAAC,CAAC,CAAC,CAAC,MAAM,GAAG,CAAC,CAAC,CAAC,CAAC,CAAA;AAC7E,CAAC;AAED,MAAM,CAAC,MAAM,IAAI,GACf,CAAI,MAA4B,EAAE,EAAE,CACpC,CAAC,MAAgB,EAAE,EAAE,CACrB,CAAC,KAAe,EAAY,EAAE;IAC5B,MAAM,CAAC,GAAG,eAAe,CAAC,KAAK,CAAC,CAAA;IAChC,MAAM,EAAE,GAAG,CAAC,CAAC,MAAM,CAAA;IACnB,MAAM,CAAC,GAAG,eAAe,CAAC,MAAM,CAAC,CAAA;IACjC,MAAM,EAAE,GAAG,CAAC,CAAC,MAAM,CAAA;IAEnB,IAAI,EAAE,KAAK,CAAC,EAAE;QACZ,OAAO,MAAM,CAAA;KACd;IAED,IAAI,EAAE,KAAK,CAAC,EAAE;QACZ,OAAO,KAAK,CAAA;KACb;IAED,8CAA8C;IAC9C,IAAI,EAAE,KAAK,EAAE,EAAE;QACb,OAAO,IAAI,CACT,CAAC,EACD,GAAG,CAAC,CAAC,CAAC,EAAE,CAAC,EAAE,EAAE,CAAC,MAAM,CAAC,MAAM,CAAC,CAAC,EAAE,CAAC,CAAC,CAAC,CAAC,CAAC,CAAC,EACrC,iBAAiB,CAClB,CAAA;KACF;IAED,MAAM,EAAE,GAAG,EAAE,GAAG,EAAE,CAAC,CAAC,CAAC,CAAC,CAAC,CAAC,CAAC,CAAC,CAAA;IAC1B,MAAM,EAAE,GAAG,EAAE,GAAG,EAAE,CAAC,CAAC,CAAC,CAAC,CAAC,CAAC,CAAC,CAAC,CAAA;IAC1B,MAAM,IAAI,GAAG,EAAE,CAAC,MAAM,GAAG,EAAE,CAAC,MAAM,CAAA;IAClC,MAAM,IAAI,GAAG,EAAE,GAAG,EAAE,CAAC,CAAC,CAAC,MAAM,CAAC,MAAM,CAAC,CAAC,CAAC,KAAK,CAAC,OAAO,CAAC,MAAM,CAAC,CAAC,MAAM,CAAA;IACnE,MAAM,SAAS,GAAG,EAAE,CAAC,KAAK,CAAC,CAAC,EAAE,IAAI,CAAC,CAAA;IACnC,MAAM,QAAQ,GAAG,EAAE,CAAC,KAAK,CAAC,IAAI,CAAC,CAAA;IAE/B,OAAO,iBAAiB,CAAC,CAAC,GAAG,SAAS,EAAE,GAAG,QAAQ,CAAC,GAAG,CAAC,CAAC,CAAC,EAAE,CAAC,EAAE,EAAE,CAAC,IAAI,CAAC,CAAC,EAAE,EAAE,CAAC,CAAC,CAAC,CAAC,CAAC,CAAQ,CAAC,CAAA;AAC5F,CAAC,CAAA;AAEH,MAAM,CAAC,MAAM,eAAe,GAAG,CAAI,MAA4B,EAA+B,EAAE,CAAC,CAAC;IAChG,MAAM,EAAE,CAAC,CAAC,EAAE,CAAC,EAAE,EAAE,CAAC,IAAI,CAAC,MAAM,CAAC,CAAC,CAAC,CAAC,CAAC,CAAC,CAAC;CACrC,CAAC,CAAA;AAEF,yDAAyD;AACzD,MAAM,CAAC,MAAM,YAAY,GAAG,CAAI,CAAc,EAAsB,EAAE,CAAC,CAAC;IACtE,GAAG,eAAe,CAAC,CAAC,CAAC;IACrB,EAAE,EAAE,IAAI,KAAK,CAAC,CAAC,CAAC,EAAE,CAAC;CACpB,CAAC,CAAA"}

package/esm/StackFrame/StackFrame.d.ts

@@ -0,0 +1,29 @@
+import * as D from 'hkt-ts/Typeclass/Debug';
+import * as E from 'hkt-ts/Typeclass/Eq';
+import * as O from 'hkt-ts/Typeclass/Ord';
+export declare type StackFrame = InstrumentedStackFrame | RuntimeStackFrame | CustomStackFrame;
+export interface InstrumentedStackFrame {
+    readonly tag: 'Instrumented';
+    readonly file: string;
+    readonly method: string;
+    readonly line: number;
+    readonly column: number;
+}
+export interface RuntimeStackFrame {
+    readonly tag: 'Runtime';
+    readonly file: string;
+    readonly method: string;
+    readonly line: number;
+    readonly column: number;
+}
+export interface CustomStackFrame {
+    readonly tag: 'Custom';
+    readonly trace: string;
+}
+export declare const Eq: E.Eq<StackFrame>;
+export declare const Ord: O.Ord<StackFrame>;
+export declare const Debug: D.Debug<StackFrame>;
+export declare const debug: (a: StackFrame) => string;
+export declare type StackFrames = ReadonlyArray<StackFrame>;
+export declare const StackFramesDebug: D.Debug<StackFrames>;
+//# sourceMappingURL=StackFrame.d.ts.map

package/esm/StackFrame/StackFrame.d.ts.map

@@ -0,0 +1 @@
+{"version":3,"file":"StackFrame.d.ts","sourceRoot":"","sources":["../../src/StackFrame/StackFrame.ts"],"names":[],"mappings":"AAAA,OAAO,KAAK,CAAC,MAAM,wBAAwB,CAAA;AAC3C,OAAO,KAAK,CAAC,MAAM,qBAAqB,CAAA;AACxC,OAAO,KAAK,CAAC,MAAM,sBAAsB,CAAA;AAIzC,oBAAY,UAAU,GAAG,sBAAsB,GAAG,iBAAiB,GAAG,gBAAgB,CAAA;AAEtF,MAAM,WAAW,sBAAsB;IACrC,QAAQ,CAAC,GAAG,EAAE,cAAc,CAAA;IAC5B,QAAQ,CAAC,IAAI,EAAE,MAAM,CAAA;IACrB,QAAQ,CAAC,MAAM,EAAE,MAAM,CAAA;IACvB,QAAQ,CAAC,IAAI,EAAE,MAAM,CAAA;IACrB,QAAQ,CAAC,MAAM,EAAE,MAAM,CAAA;CACxB;AAED,MAAM,WAAW,iBAAiB;IAChC,QAAQ,CAAC,GAAG,EAAE,SAAS,CAAA;IACvB,QAAQ,CAAC,IAAI,EAAE,MAAM,CAAA;IACrB,QAAQ,CAAC,MAAM,EAAE,MAAM,CAAA;IACvB,QAAQ,CAAC,IAAI,EAAE,MAAM,CAAA;IACrB,QAAQ,CAAC,MAAM,EAAE,MAAM,CAAA;CACxB;AAED,MAAM,WAAW,gBAAgB;IAC/B,QAAQ,CAAC,GAAG,EAAE,QAAQ,CAAA;IACtB,QAAQ,CAAC,KAAK,EAAE,MAAM,CAAA;CACvB;AAED,eAAO,MAAM,EAAE,EAAE,CAAC,CAAC,EAAE,CAAC,UAAU,CAmB9B,CAAA;AAEF,eAAO,MAAM,GAAG,EAAE,CAAC,CAAC,GAAG,CAAC,UAAU,CAAY,CAAA;AAE9C,eAAO,MAAM,KAAK,EAAE,CAAC,CAAC,KAAK,CAAC,UAAU,CAOrC,CAAA;AAED,eAAO,MAAM,KAAK,2BAAc,CAAA;AAEhC,oBAAY,WAAW,GAAG,aAAa,CAAC,UAAU,CAAC,CAAA;AAEnD,eAAO,MAAM,gBAAgB,EAAE,CAAC,CAAC,KAAK,CAAC,WAAW,CAEjD,CAAA"}

package/esm/StackFrame/StackFrame.js

@@ -0,0 +1,35 @@
+import * as E from 'hkt-ts/Typeclass/Eq';
+import * as O from 'hkt-ts/Typeclass/Ord';
+import * as N from 'hkt-ts/number';
+import * as S from 'hkt-ts/string';
+export const Eq = E.sum()('tag')({
+    Instrumented: E.struct({
+        tag: E.AlwaysEqual,
+        file: S.Eq,
+        method: S.Eq,
+        line: N.Eq,
+        column: N.Eq,
+    }),
+    Runtime: E.struct({
+        tag: E.AlwaysEqual,
+        file: S.Eq,
+        method: S.Eq,
+        line: N.Eq,
+        column: N.Eq,
+    }),
+    Custom: E.struct({
+        tag: E.AlwaysEqual,
+        trace: S.Eq,
+    }),
+});
+export const Ord = O.Static;
+export const Debug = {
+    debug: (frame) => frame.tag === 'Custom'
+        ? frame.trace
+        : `at ${frame.method} (${frame.file}${frame.line > -1 ? `:${frame.line}` : ``}${frame.column > -1 ? `:${frame.column}` : ``})`,
+};
+export const debug = Debug.debug;
+export const StackFramesDebug = {
+    debug: (frames) => frames.map(debug).join('\n'),
+};
+//# sourceMappingURL=StackFrame.js.map

package/esm/StackFrame/StackFrame.js.map

@@ -0,0 +1 @@
+{"version":3,"file":"StackFrame.js","sourceRoot":"","sources":["../../src/StackFrame/StackFrame.ts"],"names":[],"mappings":"AACA,OAAO,KAAK,CAAC,MAAM,qBAAqB,CAAA;AACxC,OAAO,KAAK,CAAC,MAAM,sBAAsB,CAAA;AACzC,OAAO,KAAK,CAAC,MAAM,eAAe,CAAA;AAClC,OAAO,KAAK,CAAC,MAAM,eAAe,CAAA;AAyBlC,MAAM,CAAC,MAAM,EAAE,GAAqB,CAAC,CAAC,GAAG,EAAc,CAAC,KAAK,CAAC,CAAC;IAC7D,YAAY,EAAE,CAAC,CAAC,MAAM,CAAC;QACrB,GAAG,EAAE,CAAC,CAAC,WAAW;QAClB,IAAI,EAAE,CAAC,CAAC,EAAE;QACV,MAAM,EAAE,CAAC,CAAC,EAAE;QACZ,IAAI,EAAE,CAAC,CAAC,EAAE;QACV,MAAM,EAAE,CAAC,CAAC,EAAE;KACb,CAAC;IACF,OAAO,EAAE,CAAC,CAAC,MAAM,CAAC;QAChB,GAAG,EAAE,CAAC,CAAC,WAAW;QAClB,IAAI,EAAE,CAAC,CAAC,EAAE;QACV,MAAM,EAAE,CAAC,CAAC,EAAE;QACZ,IAAI,EAAE,CAAC,CAAC,EAAE;QACV,MAAM,EAAE,CAAC,CAAC,EAAE;KACb,CAAC;IACF,MAAM,EAAE,CAAC,CAAC,MAAM,CAAC;QACf,GAAG,EAAE,CAAC,CAAC,WAAW;QAClB,KAAK,EAAE,CAAC,CAAC,EAAE;KACZ,CAAC;CACH,CAAC,CAAA;AAEF,MAAM,CAAC,MAAM,GAAG,GAAsB,CAAC,CAAC,MAAM,CAAA;AAE9C,MAAM,CAAC,MAAM,KAAK,GAAwB;IACxC,KAAK,EAAE,CAAC,KAAK,EAAE,EAAE,CACf,KAAK,CAAC,GAAG,KAAK,QAAQ;QACpB,CAAC,CAAC,KAAK,CAAC,KAAK;QACb,CAAC,CAAC,MAAM,KAAK,CAAC,MAAM,KAAK,KAAK,CAAC,IAAI,GAAG,KAAK,CAAC,IAAI,GAAG,CAAC,CAAC,CAAC,CAAC,CAAC,IAAI,KAAK,CAAC,IAAI,EAAE,CAAC,CAAC,CAAC,EAAE,GACzE,KAAK,CAAC,MAAM,GAAG,CAAC,CAAC,CAAC,CAAC,CAAC,IAAI,KAAK,CAAC,MAAM,EAAE,CAAC,CAAC,CAAC,EAC3C,GAAG;CACV,CAAA;AAED,MAAM,CAAC,MAAM,KAAK,GAAG,KAAK,CAAC,KAAK,CAAA;AAIhC,MAAM,CAAC,MAAM,gBAAgB,GAAyB;IACpD,KAAK,EAAE,CAAC,MAAM,EAAE,EAAE,CAAC,MAAM,CAAC,GAAG,CAAC,KAAK,CAAC,CAAC,IAAI,CAAC,IAAI,CAAC;CAChD,CAAA"}

package/esm/StackFrame/getStackFrames.d.ts

@@ -0,0 +1,7 @@
+import { Maybe } from 'hkt-ts/Maybe';
+import type { RuntimeStackFrame } from './StackFrame.js';
+export declare function getStackFrames<E extends {
+    stack?: string;
+} = Error>(error?: E, targetObject?: Function): ReadonlyArray<RuntimeStackFrame>;
+export declare function getCurrentStackFrame(targetObject?: Function): Maybe<RuntimeStackFrame>;
+//# sourceMappingURL=getStackFrames.d.ts.map

package/esm/StackFrame/getStackFrames.d.ts.map

@@ -0,0 +1 @@
+{"version":3,"file":"getStackFrames.d.ts","sourceRoot":"","sources":["../../src/StackFrame/getStackFrames.ts"],"names":[],"mappings":"AAAA,OAAO,EAAQ,KAAK,EAAW,MAAM,cAAc,CAAA;AAEnD,OAAO,KAAK,EAAE,iBAAiB,EAAE,MAAM,iBAAiB,CAAA;AAIxD,wBAAgB,cAAc,CAAC,CAAC,SAAS;IAAE,KAAK,CAAC,EAAE,MAAM,CAAA;CAAE,GAAG,KAAK,EACjE,KAAK,GAAE,CAAW,EAElB,YAAY,CAAC,EAAE,QAAQ,GACtB,aAAa,CAAC,iBAAiB,CAAC,CA2BlC;AAED,wBAAgB,oBAAoB,CAElC,YAAY,CAAC,EAAE,QAAQ,GACtB,KAAK,CAAC,iBAAiB,CAAC,CA2B1B"}

package/esm/StackFrame/getStackFrames.js

@@ -0,0 +1,51 @@
+import { Just, Nothing } from 'hkt-ts/Maybe';
+import { parseChrome } from './parseChromeStack.js';
+import { parseGecko } from './parseGeckoStackFrame.js';
+export function getStackFrames(error = {}, 
+// eslint-disable-next-line @typescript-eslint/ban-types
+targetObject) {
+    if (!error.stack && Error.captureStackTrace) {
+        Error.captureStackTrace(error, targetObject);
+    }
+    const stack = error.stack;
+    if (!stack) {
+        return [];
+    }
+    const stackFrames = stack
+        .split('\n')
+        .map((x) => x.trim())
+        .filter((x) => x.length !== 0)
+        .flatMap((s) => {
+        const frame = parseChrome(s) || parseGecko(s);
+        return frame ? [frame] : [];
+    });
+    // Append all of the parents traces
+    if (error instanceof Error && error.cause) {
+        return [...stackFrames, ...getStackFrames(error.cause)];
+    }
+    return stackFrames;
+}
+export function getCurrentStackFrame(
+// eslint-disable-next-line @typescript-eslint/ban-types
+targetObject) {
+    const error = new Error();
+    if (Error.captureStackTrace) {
+        Error.captureStackTrace(error, targetObject);
+    }
+    const stack = error.stack;
+    if (!stack) {
+        return Nothing;
+    }
+    const frames = stack
+        .split('\n')
+        .map((x) => x.trim())
+        .filter((x) => x.length !== 0);
+    for (const line of frames) {
+        const frame = parseChrome(line) || parseGecko(line);
+        if (frame) {
+            return Just(frame);
+        }
+    }
+    return Nothing;
+}
+//# sourceMappingURL=getStackFrames.js.map

package/esm/StackFrame/getStackFrames.js.map

@@ -0,0 +1 @@
+{"version":3,"file":"getStackFrames.js","sourceRoot":"","sources":["../../src/StackFrame/getStackFrames.ts"],"names":[],"mappings":"AAAA,OAAO,EAAE,IAAI,EAAS,OAAO,EAAE,MAAM,cAAc,CAAA;AAGnD,OAAO,EAAE,WAAW,EAAE,MAAM,uBAAuB,CAAA;AACnD,OAAO,EAAE,UAAU,EAAE,MAAM,2BAA2B,CAAA;AAEtD,MAAM,UAAU,cAAc,CAC5B,QAAW,EAAO;AAClB,wDAAwD;AACxD,YAAuB;IAEvB,IAAI,CAAC,KAAK,CAAC,KAAK,IAAI,KAAK,CAAC,iBAAiB,EAAE;QAC3C,KAAK,CAAC,iBAAiB,CAAC,KAAK,EAAE,YAAY,CAAC,CAAA;KAC7C;IAED,MAAM,KAAK,GAAG,KAAK,CAAC,KAAK,CAAA;IAEzB,IAAI,CAAC,KAAK,EAAE;QACV,OAAO,EAAE,CAAA;KACV;IAED,MAAM,WAAW,GAAG,KAAK;SACtB,KAAK,CAAC,IAAI,CAAC;SACX,GAAG,CAAC,CAAC,CAAC,EAAE,EAAE,CAAC,CAAC,CAAC,IAAI,EAAE,CAAC;SACpB,MAAM,CAAC,CAAC,CAAC,EAAE,EAAE,CAAC,CAAC,CAAC,MAAM,KAAK,CAAC,CAAC;SAC7B,OAAO,CAAC,CAAC,CAAC,EAAE,EAAE;QACb,MAAM,KAAK,GAAG,WAAW,CAAC,CAAC,CAAC,IAAI,UAAU,CAAC,CAAC,CAAC,CAAA;QAE7C,OAAO,KAAK,CAAC,CAAC,CAAC,CAAC,KAAK,CAAC,CAAC,CAAC,CAAC,EAAE,CAAA;IAC7B,CAAC,CAAC,CAAA;IAEJ,mCAAmC;IACnC,IAAI,KAAK,YAAY,KAAK,IAAI,KAAK,CAAC,KAAK,EAAE;QACzC,OAAO,CAAC,GAAG,WAAW,EAAE,GAAG,cAAc,CAAC,KAAK,CAAC,KAAK,CAAC,CAAC,CAAA;KACxD;IAED,OAAO,WAAW,CAAA;AACpB,CAAC;AAED,MAAM,UAAU,oBAAoB;AAClC,wDAAwD;AACxD,YAAuB;IAEvB,MAAM,KAAK,GAAG,IAAI,KAAK,EAAE,CAAA;IAEzB,IAAI,KAAK,CAAC,iBAAiB,EAAE;QAC3B,KAAK,CAAC,iBAAiB,CAAC,KAAK,EAAE,YAAY,CAAC,CAAA;KAC7C;IAED,MAAM,KAAK,GAAG,KAAK,CAAC,KAAK,CAAA;IAEzB,IAAI,CAAC,KAAK,EAAE;QACV,OAAO,OAAO,CAAA;KACf;IAED,MAAM,MAAM,GAAG,KAAK;SACjB,KAAK,CAAC,IAAI,CAAC;SACX,GAAG,CAAC,CAAC,CAAC,EAAE,EAAE,CAAC,CAAC,CAAC,IAAI,EAAE,CAAC;SACpB,MAAM,CAAC,CAAC,CAAC,EAAE,EAAE,CAAC,CAAC,CAAC,MAAM,KAAK,CAAC,CAAC,CAAA;IAEhC,KAAK,MAAM,IAAI,IAAI,MAAM,EAAE;QACzB,MAAM,KAAK,GAAG,WAAW,CAAC,IAAI,CAAC,IAAI,UAAU,CAAC,IAAI,CAAC,CAAA;QAEnD,IAAI,KAAK,EAAE;YACT,OAAO,IAAI,CAAC,KAAK,CAAC,CAAA;SACnB;KACF;IAED,OAAO,OAAO,CAAA;AAChB,CAAC"}

package/esm/StackFrame/index.d.ts

@@ -0,0 +1,3 @@
+export * from './getStackFrames.js';
+export * from './StackFrame.js';
+//# sourceMappingURL=index.d.ts.map

package/esm/StackFrame/index.d.ts.map

@@ -0,0 +1 @@
+{"version":3,"file":"index.d.ts","sourceRoot":"","sources":["../../src/StackFrame/index.ts"],"names":[],"mappings":"AAAA,cAAc,qBAAqB,CAAA;AACnC,cAAc,iBAAiB,CAAA"}

package/esm/StackFrame/index.js

@@ -0,0 +1,3 @@
+export * from './getStackFrames.js';
+export * from './StackFrame.js';
+//# sourceMappingURL=index.js.map

package/esm/StackFrame/index.js.map

@@ -0,0 +1 @@
+{"version":3,"file":"index.js","sourceRoot":"","sources":["../../src/StackFrame/index.ts"],"names":[],"mappings":"AAAA,cAAc,qBAAqB,CAAA;AACnC,cAAc,iBAAiB,CAAA"}

package/esm/StackFrame/parseChromeStack.d.ts

@@ -0,0 +1,3 @@
+import { RuntimeStackFrame } from './StackFrame.js';
+export declare function parseChrome(line: string): RuntimeStackFrame | null;
+//# sourceMappingURL=parseChromeStack.d.ts.map

package/esm/StackFrame/parseChromeStack.d.ts.map

@@ -0,0 +1 @@
+{"version":3,"file":"parseChromeStack.d.ts","sourceRoot":"","sources":["../../src/StackFrame/parseChromeStack.ts"],"names":[],"mappings":"AAAA,OAAO,EAAE,iBAAiB,EAAE,MAAM,iBAAiB,CAAA;AAMnD,wBAAgB,WAAW,CAAC,IAAI,EAAE,MAAM,GAAG,iBAAiB,GAAG,IAAI,CA0BlE"}

package/esm/StackFrame/parseChromeStack.js

@@ -0,0 +1,32 @@
+const chromeRe = /^\s*at (.*?) ?\(((?:file|https?|blob|chrome-extension|native|eval|webpack|<anonymous>|\/|[a-z]:\\|\\\\).*?)(?::(\d+))?(?::(\d+))?\)?\s*$/i;
+const chromeEvalRe = /\((\S*)(?::(\d+))(?::(\d+))\)/;
+export function parseChrome(line) {
+    const parts = chromeRe.exec(line);
+    if (!parts) {
+        return null;
+    }
+    const isNative = parts[2] && parts[2].indexOf('native') === 0; // start of line
+    const isEval = parts[2] && parts[2].indexOf('eval') === 0; // start of line
+    const submatch = chromeEvalRe.exec(parts[2]);
+    if (isEval && submatch != null) {
+        // throw out eval line/column and use top-most line/column number
+        parts[2] = submatch[1]; // url
+        parts[3] = submatch[2]; // line
+        parts[4] = submatch[3]; // column
+    }
+    return {
+        tag: 'Runtime',
+        file: !isNative ? parseRealFilename(parts[2]) : '',
+        method: parts[1] || '',
+        line: parts[3] ? +parts[3] : -1,
+        column: parts[4] ? +parts[4] : -1,
+    };
+}
+function parseRealFilename(s) {
+    if (s.startsWith('file:/')) {
+        const x = s.split(/file:/g);
+        return x[x.length - 1];
+    }
+    return s;
+}
+//# sourceMappingURL=parseChromeStack.js.map

package/esm/StackFrame/parseChromeStack.js.map

@@ -0,0 +1 @@
+{"version":3,"file":"parseChromeStack.js","sourceRoot":"","sources":["../../src/StackFrame/parseChromeStack.ts"],"names":[],"mappings":"AAEA,MAAM,QAAQ,GACZ,2IAA2I,CAAA;AAC7I,MAAM,YAAY,GAAG,+BAA+B,CAAA;AAEpD,MAAM,UAAU,WAAW,CAAC,IAAY;IACtC,MAAM,KAAK,GAAG,QAAQ,CAAC,IAAI,CAAC,IAAI,CAAC,CAAA;IAEjC,IAAI,CAAC,KAAK,EAAE;QACV,OAAO,IAAI,CAAA;KACZ;IAED,MAAM,QAAQ,GAAG,KAAK,CAAC,CAAC,CAAC,IAAI,KAAK,CAAC,CAAC,CAAC,CAAC,OAAO,CAAC,QAAQ,CAAC,KAAK,CAAC,CAAA,CAAC,gBAAgB;IAC9E,MAAM,MAAM,GAAG,KAAK,CAAC,CAAC,CAAC,IAAI,KAAK,CAAC,CAAC,CAAC,CAAC,OAAO,CAAC,MAAM,CAAC,KAAK,CAAC,CAAA,CAAC,gBAAgB;IAE1E,MAAM,QAAQ,GAAG,YAAY,CAAC,IAAI,CAAC,KAAK,CAAC,CAAC,CAAC,CAAC,CAAA;IAE5C,IAAI,MAAM,IAAI,QAAQ,IAAI,IAAI,EAAE;QAC9B,iEAAiE;QACjE,KAAK,CAAC,CAAC,CAAC,GAAG,QAAQ,CAAC,CAAC,CAAC,CAAA,CAAC,MAAM;QAC7B,KAAK,CAAC,CAAC,CAAC,GAAG,QAAQ,CAAC,CAAC,CAAC,CAAA,CAAC,OAAO;QAC9B,KAAK,CAAC,CAAC,CAAC,GAAG,QAAQ,CAAC,CAAC,CAAC,CAAA,CAAC,SAAS;KACjC;IAED,OAAO;QACL,GAAG,EAAE,SAAS;QACd,IAAI,EAAE,CAAC,QAAQ,CAAC,CAAC,CAAC,iBAAiB,CAAC,KAAK,CAAC,CAAC,CAAC,CAAC,CAAC,CAAC,CAAC,EAAE;QAClD,MAAM,EAAE,KAAK,CAAC,CAAC,CAAC,IAAI,EAAE;QACtB,IAAI,EAAE,KAAK,CAAC,CAAC,CAAC,CAAC,CAAC,CAAC,CAAC,KAAK,CAAC,CAAC,CAAC,CAAC,CAAC,CAAC,CAAC,CAAC;QAC/B,MAAM,EAAE,KAAK,CAAC,CAAC,CAAC,CAAC,CAAC,CAAC,CAAC,KAAK,CAAC,CAAC,CAAC,CAAC,CAAC,CAAC,CAAC,CAAC;KAClC,CAAA;AACH,CAAC;AAED,SAAS,iBAAiB,CAAC,CAAS;IAClC,IAAI,CAAC,CAAC,UAAU,CAAC,QAAQ,CAAC,EAAE;QAC1B,MAAM,CAAC,GAAG,CAAC,CAAC,KAAK,CAAC,QAAQ,CAAC,CAAA;QAE3B,OAAO,CAAC,CAAC,CAAC,CAAC,MAAM,GAAG,CAAC,CAAC,CAAA;KACvB;IAED,OAAO,CAAC,CAAA;AACV,CAAC"}