@typed/fx 0.0.1

package/cjs/Cause/Renderer.js

@@ -0,0 +1,235 @@
+"use strict";
+var __createBinding = (this && this.__createBinding) || (Object.create ? (function(o, m, k, k2) {
+    if (k2 === undefined) k2 = k;
+    var desc = Object.getOwnPropertyDescriptor(m, k);
+    if (!desc || ("get" in desc ? !m.__esModule : desc.writable || desc.configurable)) {
+      desc = { enumerable: true, get: function() { return m[k]; } };
+    }
+    Object.defineProperty(o, k2, desc);
+}) : (function(o, m, k, k2) {
+    if (k2 === undefined) k2 = k;
+    o[k2] = m[k];
+}));
+var __setModuleDefault = (this && this.__setModuleDefault) || (Object.create ? (function(o, v) {
+    Object.defineProperty(o, "default", { enumerable: true, value: v });
+}) : function(o, v) {
+    o["default"] = v;
+});
+var __importStar = (this && this.__importStar) || function (mod) {
+    if (mod && mod.__esModule) return mod;
+    var result = {};
+    if (mod != null) for (var k in mod) if (k !== "default" && Object.prototype.hasOwnProperty.call(mod, k)) __createBinding(result, mod, k);
+    __setModuleDefault(result, mod);
+    return result;
+};
+Object.defineProperty(exports, "__esModule", { value: true });
+exports.prettyPrint = exports.defaultRenderer = exports.defaultErrorToLines = exports.prettyLines = exports.format = exports.prefixBlock = exports.renderString = exports.lines = exports.renderTrace = exports.renderError = exports.parrallelSegments = exports.linearSegments = exports.renderCauseToSequential = exports.renderUnexpected = exports.renderExpected = exports.renderInterrupted = exports.Parallel = exports.Sequential = exports.Failure = void 0;
+const M = __importStar(require("hkt-ts/Maybe"));
+const function_1 = require("hkt-ts/function");
+const prettyStringify_js_1 = require("./prettyStringify.js");
+const index_js_1 = require("@/FiberId/index.js");
+const index_js_2 = require("@/Trace/index.js");
+function Failure(lines) {
+    return {
+        type: 'Failure',
+        lines,
+    };
+}
+exports.Failure = Failure;
+function Sequential(all) {
+    return {
+        type: 'Sequential',
+        all,
+    };
+}
+exports.Sequential = Sequential;
+function Parallel(all) {
+    return {
+        type: 'Parallel',
+        all,
+    };
+}
+exports.Parallel = Parallel;
+function renderInterrupted(cause, trace, renderer) {
+    return Sequential([
+        Failure([
+            `Interrupted by Fiber ${index_js_1.Debug.debug(cause.fiberId)}.`,
+            '',
+            ...renderTrace(trace, renderer),
+        ]),
+    ]);
+}
+exports.renderInterrupted = renderInterrupted;
+function renderExpected(cause, trace, renderer) {
+    return Sequential([
+        Failure([
+            'An expected error has occurred.',
+            '',
+            ...renderer.renderError(cause.error, M.isJust(trace) && trace.value.tag !== 'EmptyTrace' && trace.value.frames.length > 0),
+            ...renderTrace(trace, renderer),
+        ]),
+    ]);
+}
+exports.renderExpected = renderExpected;
+function renderUnexpected(cause, trace, renderer) {
+    return Sequential([
+        Failure([
+            'An unexpected error has occurred.',
+            '',
+            ...renderer.renderUnknown(cause.error, M.isJust(trace) && trace.value.tag !== 'EmptyTrace' && trace.value.frames.length > 0),
+            ...renderTrace(trace, renderer),
+        ]),
+    ]);
+}
+exports.renderUnexpected = renderUnexpected;
+function renderCauseToSequential(cause, renderer) {
+    switch (cause.tag) {
+        case 'Empty':
+            return Sequential([]);
+        case 'Expected':
+            return renderExpected(cause, M.Nothing, renderer);
+        case 'Unexpected':
+            return renderUnexpected(cause, M.Nothing, renderer);
+        case 'Interrupted':
+            return renderInterrupted(cause, M.Nothing, renderer);
+        case 'Sequential':
+            return Sequential(linearSegments(cause, renderer));
+        case 'Parallel':
+            return Sequential([Parallel(parrallelSegments(cause, renderer))]);
+        case 'Traced': {
+            switch (cause.cause.tag) {
+                case 'Expected':
+                    return renderExpected(cause.cause, M.Just(cause.trace), renderer);
+                case 'Unexpected':
+                    return renderUnexpected(cause.cause, M.Just(cause.trace), renderer);
+                case 'Interrupted':
+                    return renderInterrupted(cause.cause, M.Just(cause.trace), renderer);
+                default: {
+                    const { all } = renderCauseToSequential(cause.cause, renderer);
+                    const rendered = renderTrace(M.Just(cause.trace), renderer);
+                    return Sequential([
+                        ...(rendered.every((x) => includes(all, x))
+                            ? []
+                            : [Failure(['An error was rethrown with a new trace.', ...rendered])]),
+                        ...all,
+                    ]);
+                }
+            }
+        }
+    }
+}
+exports.renderCauseToSequential = renderCauseToSequential;
+function includes(steps, value) {
+    // Reverse steps as this will usually be at the bottom of the previous section
+    for (const step of steps.slice().reverse()) {
+        if (stepIncludes(step, value)) {
+            return true;
+        }
+    }
+    return false;
+}
+function stepIncludes(step, value) {
+    switch (step.type) {
+        case 'Failure':
+            return step.lines.includes(value);
+        case 'Parallel':
+            return includes(step.all.flatMap((s) => s.all), value);
+    }
+}
+function linearSegments(cause, renderer) {
+    switch (cause.tag) {
+        case 'Sequential':
+            return [...linearSegments(cause.left, renderer), ...linearSegments(cause.right, renderer)];
+        default:
+            return renderCauseToSequential(cause, renderer).all;
+    }
+}
+exports.linearSegments = linearSegments;
+function parrallelSegments(cause, renderer) {
+    switch (cause.tag) {
+        case 'Parallel':
+            return [
+                ...parrallelSegments(cause.left, renderer),
+                ...parrallelSegments(cause.right, renderer),
+            ];
+        default:
+            return [renderCauseToSequential(cause, renderer)];
+    }
+}
+exports.parrallelSegments = parrallelSegments;
+function renderError(error, hasTrace = false) {
+    return hasTrace ? lines(`${error.name}: ${error.message}`) : lines(String(error));
+}
+exports.renderError = renderError;
+function renderTrace(trace, renderer) {
+    return (0, function_1.pipe)(trace, M.match(() => [], (trace) => lines(addPadding(renderer.renderTrace(trace)))));
+}
+exports.renderTrace = renderTrace;
+function lines(s) {
+    return s.split('\n').map((s) => s.replace('\r', ''));
+}
+exports.lines = lines;
+// eslint-disable-next-line @typescript-eslint/explicit-module-boundary-types
+function renderString(u) {
+    const s = u?.toString?.();
+    const shouldJsonify = !s || s.trim().startsWith('[object');
+    return shouldJsonify ? (0, prettyStringify_js_1.prettyStringify)(u) : s;
+}
+exports.renderString = renderString;
+function prefixBlock(lines, headPrefix, tailPrefix) {
+    if (lines.length === 0) {
+        return [];
+    }
+    const [head, ...tail] = lines;
+    return [`${headPrefix}${head}`, ...tail.map((t) => `${tailPrefix}${t}`)];
+}
+exports.prefixBlock = prefixBlock;
+function format(segment) {
+    switch (segment.type) {
+        case 'Failure': {
+            return prefixBlock(segment.lines, '─', ' ');
+        }
+        case 'Parallel': {
+            return [
+                '══╦'.repeat(segment.all.length - 1) + '══╗',
+                ...segment.all.reduceRight((acc, current) => [
+                    ...prefixBlock(acc, '  ║', '  ║'),
+                    ...prefixBlock(format(current), '  ', '  '),
+                ], []),
+            ];
+        }
+        case 'Sequential': {
+            return segment.all.flatMap((seg) => ['║', ...prefixBlock(format(seg), '╠', '║'), '▼']);
+        }
+    }
+}
+exports.format = format;
+function prettyLines(cause, renderer) {
+    const s = renderCauseToSequential(cause, renderer);
+    if (s.all.length === 1 && s.all[0].type === 'Failure') {
+        return s.all[0].lines;
+    }
+    const formatted = format(s);
+    return formatted.length === 0 ? [] : ['╥', ...formatted.slice(1)];
+}
+exports.prettyLines = prettyLines;
+function defaultErrorToLines(error, hasTrace = false) {
+    return error instanceof Error ? renderError(error, hasTrace) : lines(renderString(error));
+}
+exports.defaultErrorToLines = defaultErrorToLines;
+exports.defaultRenderer = {
+    renderError: defaultErrorToLines,
+    renderUnknown: defaultErrorToLines,
+    // Add 4 spaces of padding like most JS runtimes.
+    renderTrace: index_js_2.Debug.debug,
+};
+// Add 4-spaces of padding like most JS runtimes do for stack traces.
+function addPadding(s) {
+    return '    ' + s.replace(/\n/g, '\n    ');
+}
+function prettyPrint(cause, renderer = exports.defaultRenderer) {
+    const lines = prettyLines(cause, renderer);
+    return `\n${lines.join('\n')}`.trimEnd();
+}
+exports.prettyPrint = prettyPrint;
+//# sourceMappingURL=Renderer.js.map

package/cjs/Cause/Renderer.js.map

@@ -0,0 +1 @@
+{"version":3,"file":"Renderer.js","sourceRoot":"","sources":["../../src/Cause/Renderer.ts"],"names":[],"mappings":";;;;;;;;;;;;;;;;;;;;;;;;;;AAAA,gDAAiC;AACjC,8CAAsC;AAGtC,6DAAsD;AAEtD,iDAA0D;AAC1D,+CAA6D;AAkC7D,SAAgB,OAAO,CAAC,KAAwB;IAC9C,OAAO;QACL,IAAI,EAAE,SAAS;QACf,KAAK;KACN,CAAA;AACH,CAAC;AALD,0BAKC;AAED,SAAgB,UAAU,CAAC,GAAoB;IAC7C,OAAO;QACL,IAAI,EAAE,YAAY;QAClB,GAAG;KACJ,CAAA;AACH,CAAC;AALD,gCAKC;AAED,SAAgB,QAAQ,CAAC,GAA0B;IACjD,OAAO;QACL,IAAI,EAAE,UAAU;QAChB,GAAG;KACJ,CAAA;AACH,CAAC;AALD,4BAKC;AAED,SAAgB,iBAAiB,CAC/B,KAAkB,EAClB,KAAqB,EACrB,QAAqB;IAErB,OAAO,UAAU,CAAC;QAChB,OAAO,CAAC;YACN,wBAAwB,gBAAY,CAAC,KAAK,CAAC,KAAK,CAAC,OAAO,CAAC,GAAG;YAC5D,EAAE;YACF,GAAG,WAAW,CAAC,KAAK,EAAE,QAAQ,CAAC;SAChC,CAAC;KACH,CAAC,CAAA;AACJ,CAAC;AAZD,8CAYC;AAED,SAAgB,cAAc,CAC5B,KAAkB,EAClB,KAAqB,EACrB,QAAqB;IAErB,OAAO,UAAU,CAAC;QAChB,OAAO,CAAC;YACN,iCAAiC;YACjC,EAAE;YACF,GAAG,QAAQ,CAAC,WAAW,CACrB,KAAK,CAAC,KAAK,EACX,CAAC,CAAC,MAAM,CAAC,KAAK,CAAC,IAAI,KAAK,CAAC,KAAK,CAAC,GAAG,KAAK,YAAY,IAAI,KAAK,CAAC,KAAK,CAAC,MAAM,CAAC,MAAM,GAAG,CAAC,CACrF;YACD,GAAG,WAAW,CAAC,KAAK,EAAE,QAAQ,CAAC;SAChC,CAAC;KACH,CAAC,CAAA;AACJ,CAAC;AAhBD,wCAgBC;AAED,SAAgB,gBAAgB,CAC9B,KAAiB,EACjB,KAAqB,EACrB,QAAqB;IAErB,OAAO,UAAU,CAAC;QAChB,OAAO,CAAC;YACN,mCAAmC;YACnC,EAAE;YACF,GAAG,QAAQ,CAAC,aAAa,CACvB,KAAK,CAAC,KAAK,EACX,CAAC,CAAC,MAAM,CAAC,KAAK,CAAC,IAAI,KAAK,CAAC,KAAK,CAAC,GAAG,KAAK,YAAY,IAAI,KAAK,CAAC,KAAK,CAAC,MAAM,CAAC,MAAM,GAAG,CAAC,CACrF;YACD,GAAG,WAAW,CAAC,KAAK,EAAE,QAAQ,CAAC;SAChC,CAAC;KACH,CAAC,CAAA;AACJ,CAAC;AAhBD,4CAgBC;AAED,SAAgB,uBAAuB,CAAI,KAAe,EAAE,QAAqB;IAC/E,QAAQ,KAAK,CAAC,GAAG,EAAE;QACjB,KAAK,OAAO;YACV,OAAO,UAAU,CAAC,EAAE,CAAC,CAAA;QACvB,KAAK,UAAU;YACb,OAAO,cAAc,CAAC,KAAK,EAAE,CAAC,CAAC,OAAO,EAAE,QAAQ,CAAC,CAAA;QACnD,KAAK,YAAY;YACf,OAAO,gBAAgB,CAAC,KAAK,EAAE,CAAC,CAAC,OAAO,EAAE,QAAQ,CAAC,CAAA;QACrD,KAAK,aAAa;YAChB,OAAO,iBAAiB,CAAC,KAAK,EAAE,CAAC,CAAC,OAAO,EAAE,QAAQ,CAAC,CAAA;QACtD,KAAK,YAAY;YACf,OAAO,UAAU,CAAC,cAAc,CAAC,KAAK,EAAE,QAAQ,CAAC,CAAC,CAAA;QACpD,KAAK,UAAU;YACb,OAAO,UAAU,CAAC,CAAC,QAAQ,CAAC,iBAAiB,CAAC,KAAK,EAAE,QAAQ,CAAC,CAAC,CAAC,CAAC,CAAA;QACnE,KAAK,QAAQ,CAAC,CAAC;YACb,QAAQ,KAAK,CAAC,KAAK,CAAC,GAAG,EAAE;gBACvB,KAAK,UAAU;oBACb,OAAO,cAAc,CAAC,KAAK,CAAC,KAAK,EAAE,CAAC,CAAC,IAAI,CAAC,KAAK,CAAC,KAAK,CAAC,EAAE,QAAQ,CAAC,CAAA;gBACnE,KAAK,YAAY;oBACf,OAAO,gBAAgB,CAAC,KAAK,CAAC,KAAK,EAAE,CAAC,CAAC,IAAI,CAAC,KAAK,CAAC,KAAK,CAAC,EAAE,QAAQ,CAAC,CAAA;gBACrE,KAAK,aAAa;oBAChB,OAAO,iBAAiB,CAAC,KAAK,CAAC,KAAK,EAAE,CAAC,CAAC,IAAI,CAAC,KAAK,CAAC,KAAK,CAAC,EAAE,QAAQ,CAAC,CAAA;gBACtE,OAAO,CAAC,CAAC;oBACP,MAAM,EAAE,GAAG,EAAE,GAAe,uBAAuB,CAAC,KAAK,CAAC,KAAK,EAAE,QAAQ,CAAC,CAAA;oBAC1E,MAAM,QAAQ,GAAG,WAAW,CAAC,CAAC,CAAC,IAAI,CAAC,KAAK,CAAC,KAAK,CAAC,EAAE,QAAQ,CAAC,CAAA;oBAE3D,OAAO,UAAU,CAAC;wBAChB,GAAG,CAAC,QAAQ,CAAC,KAAK,CAAC,CAAC,CAAC,EAAE,EAAE,CAAC,QAAQ,CAAC,GAAG,EAAE,CAAC,CAAC,CAAC;4BACzC,CAAC,CAAC,EAAE;4BACJ,CAAC,CAAC,CAAC,OAAO,CAAC,CAAC,yCAAyC,EAAE,GAAG,QAAQ,CAAC,CAAC,CAAC,CAAC;wBACxE,GAAG,GAAG;qBACP,CAAC,CAAA;iBACH;aACF;SACF;KACF;AACH,CAAC;AApCD,0DAoCC;AAED,SAAS,QAAQ,CAAC,KAA0B,EAAE,KAAa;IACzD,8EAA8E;IAC9E,KAAK,MAAM,IAAI,IAAI,KAAK,CAAC,KAAK,EAAE,CAAC,OAAO,EAAE,EAAE;QAC1C,IAAI,YAAY,CAAC,IAAI,EAAE,KAAK,CAAC,EAAE;YAC7B,OAAO,IAAI,CAAA;SACZ;KACF;IAED,OAAO,KAAK,CAAA;AACd,CAAC;AAED,SAAS,YAAY,CAAC,IAAU,EAAE,KAAa;IAC7C,QAAQ,IAAI,CAAC,IAAI,EAAE;QACjB,KAAK,SAAS;YACZ,OAAO,IAAI,CAAC,KAAK,CAAC,QAAQ,CAAC,KAAK,CAAC,CAAA;QACnC,KAAK,UAAU;YACb,OAAO,QAAQ,CACb,IAAI,CAAC,GAAG,CAAC,OAAO,CAAC,CAAC,CAAC,EAAE,EAAE,CAAC,CAAC,CAAC,GAAG,CAAC,EAC9B,KAAK,CACN,CAAA;KACJ;AACH,CAAC;AAED,SAAgB,cAAc,CAAI,KAAe,EAAE,QAAqB;IACtE,QAAQ,KAAK,CAAC,GAAG,EAAE;QACjB,KAAK,YAAY;YACf,OAAO,CAAC,GAAG,cAAc,CAAC,KAAK,CAAC,IAAI,EAAE,QAAQ,CAAC,EAAE,GAAG,cAAc,CAAC,KAAK,CAAC,KAAK,EAAE,QAAQ,CAAC,CAAC,CAAA;QAC5F;YACE,OAAO,uBAAuB,CAAC,KAAK,EAAE,QAAQ,CAAC,CAAC,GAAG,CAAA;KACtD;AACH,CAAC;AAPD,wCAOC;AAED,SAAgB,iBAAiB,CAC/B,KAAe,EACf,QAAqB;IAErB,QAAQ,KAAK,CAAC,GAAG,EAAE;QACjB,KAAK,UAAU;YACb,OAAO;gBACL,GAAG,iBAAiB,CAAC,KAAK,CAAC,IAAI,EAAE,QAAQ,CAAC;gBAC1C,GAAG,iBAAiB,CAAC,KAAK,CAAC,KAAK,EAAE,QAAQ,CAAC;aAC5C,CAAA;QACH;YACE,OAAO,CAAC,uBAAuB,CAAC,KAAK,EAAE,QAAQ,CAAC,CAAC,CAAA;KACpD;AACH,CAAC;AAbD,8CAaC;AAED,SAAgB,WAAW,CAAC,KAAY,EAAE,QAAQ,GAAG,KAAK;IACxD,OAAO,QAAQ,CAAC,CAAC,CAAC,KAAK,CAAC,GAAG,KAAK,CAAC,IAAI,KAAK,KAAK,CAAC,OAAO,EAAE,CAAC,CAAC,CAAC,CAAC,KAAK,CAAC,MAAM,CAAC,KAAK,CAAC,CAAC,CAAA;AACnF,CAAC;AAFD,kCAEC;AAED,SAAgB,WAAW,CAAI,KAAqB,EAAE,QAAqB;IACzE,OAAO,IAAA,eAAI,EACT,KAAK,EACL,CAAC,CAAC,KAAK,CACL,GAAG,EAAE,CAAC,EAAE,EACR,CAAC,KAAK,EAAE,EAAE,CAAC,KAAK,CAAC,UAAU,CAAC,QAAQ,CAAC,WAAW,CAAC,KAAK,CAAC,CAAC,CAAC,CAC1D,CACF,CAAA;AACH,CAAC;AARD,kCAQC;AAED,SAAgB,KAAK,CAAC,CAAS;IAC7B,OAAO,CAAC,CAAC,KAAK,CAAC,IAAI,CAAC,CAAC,GAAG,CAAC,CAAC,CAAC,EAAE,EAAE,CAAC,CAAC,CAAC,OAAO,CAAC,IAAI,EAAE,EAAE,CAAC,CAAC,CAAA;AACtD,CAAC;AAFD,sBAEC;AAED,6EAA6E;AAC7E,SAAgB,YAAY,CAAC,CAAM;IACjC,MAAM,CAAC,GAAG,CAAC,EAAE,QAAQ,EAAE,EAAE,CAAA;IACzB,MAAM,aAAa,GAAG,CAAC,CAAC,IAAI,CAAC,CAAC,IAAI,EAAE,CAAC,UAAU,CAAC,SAAS,CAAC,CAAA;IAE1D,OAAO,aAAa,CAAC,CAAC,CAAC,IAAA,oCAAe,EAAC,CAAC,CAAC,CAAC,CAAC,CAAC,CAAC,CAAA;AAC/C,CAAC;AALD,oCAKC;AAED,SAAgB,WAAW,CAAC,KAAY,EAAE,UAAkB,EAAE,UAAkB;IAC9E,IAAI,KAAK,CAAC,MAAM,KAAK,CAAC,EAAE;QACtB,OAAO,EAAE,CAAA;KACV;IAED,MAAM,CAAC,IAAI,EAAE,GAAG,IAAI,CAAC,GAAG,KAAK,CAAA;IAE7B,OAAO,CAAC,GAAG,UAAU,GAAG,IAAI,EAAE,EAAE,GAAG,IAAI,CAAC,GAAG,CAAC,CAAC,CAAC,EAAE,EAAE,CAAC,GAAG,UAAU,GAAG,CAAC,EAAE,CAAC,CAAC,CAAA;AAC1E,CAAC;AARD,kCAQC;AAED,SAAgB,MAAM,CAAC,OAAgB;IACrC,QAAQ,OAAO,CAAC,IAAI,EAAE;QACpB,KAAK,SAAS,CAAC,CAAC;YACd,OAAO,WAAW,CAAC,OAAO,CAAC,KAAK,EAAE,GAAG,EAAE,GAAG,CAAC,CAAA;SAC5C;QACD,KAAK,UAAU,CAAC,CAAC;YACf,OAAO;gBACL,KAAK,CAAC,MAAM,CAAC,OAAO,CAAC,GAAG,CAAC,MAAM,GAAG,CAAC,CAAC,GAAG,KAAK;gBAC5C,GAAG,OAAO,CAAC,GAAG,CAAC,WAAW,CACxB,CAAC,GAAU,EAAE,OAAmB,EAAS,EAAE,CAAC;oBAC1C,GAAG,WAAW,CAAC,GAAG,EAAE,KAAK,EAAE,KAAK,CAAC;oBACjC,GAAG,WAAW,CAAC,MAAM,CAAC,OAAO,CAAC,EAAE,IAAI,EAAE,IAAI,CAAC;iBAC5C,EACD,EAAE,CACH;aACF,CAAA;SACF;QACD,KAAK,YAAY,CAAC,CAAC;YACjB,OAAO,OAAO,CAAC,GAAG,CAAC,OAAO,CAAC,CAAC,GAAG,EAAE,EAAE,CAAC,CAAC,GAAG,EAAE,GAAG,WAAW,CAAC,MAAM,CAAC,GAAG,CAAC,EAAE,GAAG,EAAE,GAAG,CAAC,EAAE,GAAG,CAAC,CAAC,CAAA;SACvF;KACF;AACH,CAAC;AArBD,wBAqBC;AAED,SAAgB,WAAW,CAAI,KAAe,EAAE,QAAqB;IACnE,MAAM,CAAC,GAAG,uBAAuB,CAAC,KAAK,EAAE,QAAQ,CAAC,CAAA;IAElD,IAAI,CAAC,CAAC,GAAG,CAAC,MAAM,KAAK,CAAC,IAAI,CAAC,CAAC,GAAG,CAAC,CAAC,CAAC,CAAC,IAAI,KAAK,SAAS,EAAE;QACrD,OAAO,CAAC,CAAC,GAAG,CAAC,CAAC,CAAC,CAAC,KAAK,CAAA;KACtB;IAED,MAAM,SAAS,GAAG,MAAM,CAAC,CAAC,CAAC,CAAA;IAE3B,OAAO,SAAS,CAAC,MAAM,KAAK,CAAC,CAAC,CAAC,CAAC,EAAE,CAAC,CAAC,CAAC,CAAC,GAAG,EAAE,GAAG,SAAS,CAAC,KAAK,CAAC,CAAC,CAAC,CAAC,CAAA;AACnE,CAAC;AAVD,kCAUC;AAED,SAAgB,mBAAmB,CAAC,KAAc,EAAE,QAAQ,GAAG,KAAK;IAClE,OAAO,KAAK,YAAY,KAAK,CAAC,CAAC,CAAC,WAAW,CAAC,KAAK,EAAE,QAAQ,CAAC,CAAC,CAAC,CAAC,KAAK,CAAC,YAAY,CAAC,KAAK,CAAC,CAAC,CAAA;AAC3F,CAAC;AAFD,kDAEC;AAEY,QAAA,eAAe,GAAsB;IAChD,WAAW,EAAE,mBAAmB;IAChC,aAAa,EAAE,mBAAmB;IAClC,iDAAiD;IACjD,WAAW,EAAE,gBAAU,CAAC,KAAK;CAC9B,CAAA;AAED,qEAAqE;AACrE,SAAS,UAAU,CAAC,CAAS;IAC3B,OAAO,MAAM,GAAG,CAAC,CAAC,OAAO,CAAC,KAAK,EAAE,QAAQ,CAAC,CAAA;AAC5C,CAAC;AAED,SAAgB,WAAW,CAAI,KAAe,EAAE,WAAwB,uBAAe;IACrF,MAAM,KAAK,GAAG,WAAW,CAAC,KAAK,EAAE,QAAQ,CAAC,CAAA;IAE1C,OAAO,KAAK,KAAK,CAAC,IAAI,CAAC,IAAI,CAAC,EAAE,CAAC,OAAO,EAAE,CAAA;AAC1C,CAAC;AAJD,kCAIC"}

package/cjs/Cause/index.d.ts

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

package/cjs/Cause/index.d.ts.map

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

package/cjs/Cause/index.js

@@ -0,0 +1,18 @@
+"use strict";
+var __createBinding = (this && this.__createBinding) || (Object.create ? (function(o, m, k, k2) {
+    if (k2 === undefined) k2 = k;
+    var desc = Object.getOwnPropertyDescriptor(m, k);
+    if (!desc || ("get" in desc ? !m.__esModule : desc.writable || desc.configurable)) {
+      desc = { enumerable: true, get: function() { return m[k]; } };
+    }
+    Object.defineProperty(o, k2, desc);
+}) : (function(o, m, k, k2) {
+    if (k2 === undefined) k2 = k;
+    o[k2] = m[k];
+}));
+var __exportStar = (this && this.__exportStar) || function(m, exports) {
+    for (var p in m) if (p !== "default" && !Object.prototype.hasOwnProperty.call(exports, p)) __createBinding(exports, m, p);
+};
+Object.defineProperty(exports, "__esModule", { value: true });
+__exportStar(require("./Cause.js"), exports);
+//# sourceMappingURL=index.js.map

package/cjs/Cause/index.js.map

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

package/cjs/Cause/prettyStringify.d.ts

@@ -0,0 +1,2 @@
+export declare function prettyStringify(x: unknown, depth?: number): string;
+//# sourceMappingURL=prettyStringify.d.ts.map

package/cjs/Cause/prettyStringify.d.ts.map

@@ -0,0 +1 @@
+{"version":3,"file":"prettyStringify.d.ts","sourceRoot":"","sources":["../../src/Cause/prettyStringify.ts"],"names":[],"mappings":"AAEA,wBAAgB,eAAe,CAAC,CAAC,EAAE,OAAO,EAAE,KAAK,SAAI,GAAG,MAAM,CAK7D"}

package/cjs/Cause/prettyStringify.js

@@ -0,0 +1,11 @@
+"use strict";
+Object.defineProperty(exports, "__esModule", { value: true });
+exports.prettyStringify = void 0;
+const NEWLINE_REGEX = /\r?\n/g;
+function prettyStringify(x, depth = 2) {
+    const replacement = '\n'.padEnd(1 + depth, ' ');
+    // Optional chain is need for passing `undefined` to JSON.stringify returns `undefined`.
+    return JSON.stringify(x, null, 2)?.replace(NEWLINE_REGEX, replacement) ?? '';
+}
+exports.prettyStringify = prettyStringify;
+//# sourceMappingURL=prettyStringify.js.map

package/cjs/Cause/prettyStringify.js.map

@@ -0,0 +1 @@
+{"version":3,"file":"prettyStringify.js","sourceRoot":"","sources":["../../src/Cause/prettyStringify.ts"],"names":[],"mappings":";;;AAAA,MAAM,aAAa,GAAG,QAAQ,CAAA;AAE9B,SAAgB,eAAe,CAAC,CAAU,EAAE,KAAK,GAAG,CAAC;IACnD,MAAM,WAAW,GAAG,IAAI,CAAC,MAAM,CAAC,CAAC,GAAG,KAAK,EAAE,GAAG,CAAC,CAAA;IAE/C,wFAAwF;IACxF,OAAO,IAAI,CAAC,SAAS,CAAC,CAAC,EAAE,IAAI,EAAE,CAAC,CAAC,EAAE,OAAO,CAAC,aAAa,EAAE,WAAW,CAAC,IAAI,EAAE,CAAA;AAC9E,CAAC;AALD,0CAKC"}

package/cjs/Clock/Clock.d.ts

@@ -0,0 +1,26 @@
+import { Lazy } from 'hkt-ts';
+import * as Associative from 'hkt-ts/Typeclass/Associative';
+import { Identity } from 'hkt-ts/Typeclass/Identity';
+import { Service } from '@/Service/index.js';
+import { Delay, Time, UnixTime } from '@/Time/index.js';
+export interface Clock {
+    readonly startTime: UnixTime;
+    readonly getCurrentTime: Lazy<Time>;
+}
+export declare const Clock: Service<Clock>;
+export declare function make(startTime: UnixTime, getCurrentTime: Lazy<Time>): Clock;
+export declare function delayToUnixTime(delay: Delay): (clock: Clock) => UnixTime;
+export declare function timeToDate(time: Time): (clock: Clock) => Date;
+export declare function timeToUnixTime(time: Time): (clock: Clock) => UnixTime;
+export declare function dateToTime(date: Date): (clock: Clock) => Time;
+export declare function addDelay(delay: Delay): (clock: Clock) => Time;
+export declare function timeToDelay(time: Time): (clock: Clock) => Delay;
+export declare function unixTimeToDelay(time: UnixTime): (clock: Clock) => Delay;
+export declare const UnionAssociative: Associative.Associative<Clock>;
+export declare const IntersectionAssociative: Associative.Associative<Clock>;
+export declare const or: (second: Clock) => (first: Clock) => Clock;
+export declare const and: (second: Clock) => (first: Clock) => Clock;
+export declare const UnionIdentity: Identity<Clock>;
+export declare const IntersectionIdentity: Identity<Clock>;
+export declare function fork(clock: Clock): Clock;
+//# sourceMappingURL=Clock.d.ts.map

package/cjs/Clock/Clock.d.ts.map

@@ -0,0 +1 @@
+{"version":3,"file":"Clock.d.ts","sourceRoot":"","sources":["../../src/Clock/Clock.ts"],"names":[],"mappings":"AAAA,OAAO,EAAE,IAAI,EAAE,MAAM,QAAQ,CAAA;AAC7B,OAAO,KAAK,WAAW,MAAM,8BAA8B,CAAA;AAC3D,OAAO,EAAE,QAAQ,EAAE,MAAM,2BAA2B,CAAA;AAEpD,OAAO,EAAE,OAAO,EAAE,MAAM,oBAAoB,CAAA;AAC5C,OAAO,EAAE,KAAK,EAAgC,IAAI,EAAE,QAAQ,EAAE,MAAM,iBAAiB,CAAA;AAErF,MAAM,WAAW,KAAK;IACpB,QAAQ,CAAC,SAAS,EAAE,QAAQ,CAAA;IAC5B,QAAQ,CAAC,cAAc,EAAE,IAAI,CAAC,IAAI,CAAC,CAAA;CACpC;AAED,eAAO,MAAM,KAAK,gBAA0B,CAAA;AAE5C,wBAAgB,IAAI,CAAC,SAAS,EAAE,QAAQ,EAAE,cAAc,EAAE,IAAI,CAAC,IAAI,CAAC,GAAG,KAAK,CAK3E;AAED,wBAAgB,eAAe,CAAC,KAAK,EAAE,KAAK,WAC3B,KAAK,KAAG,QAAQ,CAChC;AAED,wBAAgB,UAAU,CAAC,IAAI,EAAE,IAAI,WACpB,KAAK,KAAG,IAAI,CAC5B;AAED,wBAAgB,cAAc,CAAC,IAAI,EAAE,IAAI,WACxB,KAAK,KAAG,QAAQ,CAChC;AAED,wBAAgB,UAAU,CAAC,IAAI,EAAE,IAAI,WACpB,KAAK,KAAG,IAAI,CAC5B;AAED,wBAAgB,QAAQ,CAAC,KAAK,EAAE,KAAK,WACpB,KAAK,KAAG,IAAI,CAC5B;AAED,wBAAgB,WAAW,CAAC,IAAI,EAAE,IAAI,WACrB,KAAK,KAAG,KAAK,CAC7B;AAED,wBAAgB,eAAe,CAAC,IAAI,EAAE,QAAQ,WAC7B,KAAK,KAAG,KAAK,CAE7B;AAED,eAAO,MAAM,gBAAgB,EAAE,WAAW,CAAC,WAAW,CAAC,KAAK,CAE3D,CAAA;AAED,eAAO,MAAM,uBAAuB,EAAE,WAAW,CAAC,WAAW,CAAC,KAAK,CAC5B,CAAA;AAEvC,eAAO,MAAM,EAAE,WACJ,KAAK,aACN,KAAK,KAAG,KACwB,CAAA;AAE1C,eAAO,MAAM,GAAG,WACL,KAAK,aACN,KAAK,KAAG,KAC+B,CAAA;AAEjD,eAAO,MAAM,aAAa,EAAE,QAAQ,CAAC,KAAK,CAGzC,CAAA;AAED,eAAO,MAAM,oBAAoB,EAAE,QAAQ,CAAC,KAAK,CAGhD,CAAA;AAED,wBAAgB,IAAI,CAAC,KAAK,EAAE,KAAK,GAAG,KAAK,CAIxC"}

package/cjs/Clock/Clock.js

@@ -0,0 +1,87 @@
+"use strict";
+var __createBinding = (this && this.__createBinding) || (Object.create ? (function(o, m, k, k2) {
+    if (k2 === undefined) k2 = k;
+    var desc = Object.getOwnPropertyDescriptor(m, k);
+    if (!desc || ("get" in desc ? !m.__esModule : desc.writable || desc.configurable)) {
+      desc = { enumerable: true, get: function() { return m[k]; } };
+    }
+    Object.defineProperty(o, k2, desc);
+}) : (function(o, m, k, k2) {
+    if (k2 === undefined) k2 = k;
+    o[k2] = m[k];
+}));
+var __setModuleDefault = (this && this.__setModuleDefault) || (Object.create ? (function(o, v) {
+    Object.defineProperty(o, "default", { enumerable: true, value: v });
+}) : function(o, v) {
+    o["default"] = v;
+});
+var __importStar = (this && this.__importStar) || function (mod) {
+    if (mod && mod.__esModule) return mod;
+    var result = {};
+    if (mod != null) for (var k in mod) if (k !== "default" && Object.prototype.hasOwnProperty.call(mod, k)) __createBinding(result, mod, k);
+    __setModuleDefault(result, mod);
+    return result;
+};
+Object.defineProperty(exports, "__esModule", { value: true });
+exports.fork = exports.IntersectionIdentity = exports.UnionIdentity = exports.and = exports.or = exports.IntersectionAssociative = exports.UnionAssociative = exports.unixTimeToDelay = exports.timeToDelay = exports.addDelay = exports.dateToTime = exports.timeToUnixTime = exports.timeToDate = exports.delayToUnixTime = exports.make = exports.Clock = void 0;
+const Associative = __importStar(require("hkt-ts/Typeclass/Associative"));
+const index_js_1 = require("@/Service/index.js");
+const index_js_2 = require("@/Time/index.js");
+exports.Clock = (0, index_js_1.Service)('Clock');
+function make(startTime, getCurrentTime) {
+    return {
+        startTime,
+        getCurrentTime,
+    };
+}
+exports.make = make;
+function delayToUnixTime(delay) {
+    return (clock) => (0, index_js_2.UnixTime)(clock.startTime + clock.getCurrentTime() + delay);
+}
+exports.delayToUnixTime = delayToUnixTime;
+function timeToDate(time) {
+    return (clock) => new Date(clock.startTime + time);
+}
+exports.timeToDate = timeToDate;
+function timeToUnixTime(time) {
+    return (clock) => (0, index_js_2.UnixTime)(clock.startTime + time);
+}
+exports.timeToUnixTime = timeToUnixTime;
+function dateToTime(date) {
+    return (clock) => (0, index_js_2.Time)(clock.startTime - date.getTime());
+}
+exports.dateToTime = dateToTime;
+function addDelay(delay) {
+    return (clock) => (0, index_js_2.Time)(clock.getCurrentTime() + delay);
+}
+exports.addDelay = addDelay;
+function timeToDelay(time) {
+    return (clock) => (0, index_js_2.Delay)(Math.max(0, time - clock.getCurrentTime()));
+}
+exports.timeToDelay = timeToDelay;
+function unixTimeToDelay(time) {
+    return (clock) => (0, index_js_2.Delay)(Math.max(0, time - timeToUnixTime(clock.getCurrentTime())(clock)));
+}
+exports.unixTimeToDelay = unixTimeToDelay;
+exports.UnionAssociative = {
+    concat: (f, s) => (f.startTime <= s.startTime ? f : s),
+};
+exports.IntersectionAssociative = Associative.reverse(exports.UnionAssociative);
+const or = (second) => (first) => exports.UnionAssociative.concat(first, second);
+exports.or = or;
+const and = (second) => (first) => exports.IntersectionAssociative.concat(first, second);
+exports.and = and;
+exports.UnionIdentity = {
+    ...exports.UnionAssociative,
+    id: make(index_js_2.MAX_UNIX_TIME, () => (0, index_js_2.Time)(0)),
+};
+exports.IntersectionIdentity = {
+    ...exports.IntersectionAssociative,
+    id: make(index_js_2.MIN_UNIX_TIME, () => (0, index_js_2.Time)(0)),
+};
+function fork(clock) {
+    const offset = clock.getCurrentTime();
+    return make(timeToUnixTime(offset)(clock), () => (0, index_js_2.Time)(clock.getCurrentTime() - offset));
+}
+exports.fork = fork;
+//# sourceMappingURL=Clock.js.map

package/cjs/Clock/Clock.js.map

@@ -0,0 +1 @@
+{"version":3,"file":"Clock.js","sourceRoot":"","sources":["../../src/Clock/Clock.ts"],"names":[],"mappings":";;;;;;;;;;;;;;;;;;;;;;;;;;AACA,0EAA2D;AAG3D,iDAA4C;AAC5C,8CAAqF;AAOxE,QAAA,KAAK,GAAG,IAAA,kBAAO,EAAQ,OAAO,CAAC,CAAA;AAE5C,SAAgB,IAAI,CAAC,SAAmB,EAAE,cAA0B;IAClE,OAAO;QACL,SAAS;QACT,cAAc;KACf,CAAA;AACH,CAAC;AALD,oBAKC;AAED,SAAgB,eAAe,CAAC,KAAY;IAC1C,OAAO,CAAC,KAAY,EAAY,EAAE,CAAC,IAAA,mBAAQ,EAAC,KAAK,CAAC,SAAS,GAAG,KAAK,CAAC,cAAc,EAAE,GAAG,KAAK,CAAC,CAAA;AAC/F,CAAC;AAFD,0CAEC;AAED,SAAgB,UAAU,CAAC,IAAU;IACnC,OAAO,CAAC,KAAY,EAAQ,EAAE,CAAC,IAAI,IAAI,CAAC,KAAK,CAAC,SAAS,GAAG,IAAI,CAAC,CAAA;AACjE,CAAC;AAFD,gCAEC;AAED,SAAgB,cAAc,CAAC,IAAU;IACvC,OAAO,CAAC,KAAY,EAAY,EAAE,CAAC,IAAA,mBAAQ,EAAC,KAAK,CAAC,SAAS,GAAG,IAAI,CAAC,CAAA;AACrE,CAAC;AAFD,wCAEC;AAED,SAAgB,UAAU,CAAC,IAAU;IACnC,OAAO,CAAC,KAAY,EAAQ,EAAE,CAAC,IAAA,eAAI,EAAC,KAAK,CAAC,SAAS,GAAG,IAAI,CAAC,OAAO,EAAE,CAAC,CAAA;AACvE,CAAC;AAFD,gCAEC;AAED,SAAgB,QAAQ,CAAC,KAAY;IACnC,OAAO,CAAC,KAAY,EAAQ,EAAE,CAAC,IAAA,eAAI,EAAC,KAAK,CAAC,cAAc,EAAE,GAAG,KAAK,CAAC,CAAA;AACrE,CAAC;AAFD,4BAEC;AAED,SAAgB,WAAW,CAAC,IAAU;IACpC,OAAO,CAAC,KAAY,EAAS,EAAE,CAAC,IAAA,gBAAK,EAAC,IAAI,CAAC,GAAG,CAAC,CAAC,EAAE,IAAI,GAAG,KAAK,CAAC,cAAc,EAAE,CAAC,CAAC,CAAA;AACnF,CAAC;AAFD,kCAEC;AAED,SAAgB,eAAe,CAAC,IAAc;IAC5C,OAAO,CAAC,KAAY,EAAS,EAAE,CAC7B,IAAA,gBAAK,EAAC,IAAI,CAAC,GAAG,CAAC,CAAC,EAAE,IAAI,GAAG,cAAc,CAAC,KAAK,CAAC,cAAc,EAAE,CAAC,CAAC,KAAK,CAAC,CAAC,CAAC,CAAA;AAC5E,CAAC;AAHD,0CAGC;AAEY,QAAA,gBAAgB,GAAmC;IAC9D,MAAM,EAAE,CAAC,CAAC,EAAE,CAAC,EAAE,EAAE,CAAC,CAAC,CAAC,CAAC,SAAS,IAAI,CAAC,CAAC,SAAS,CAAC,CAAC,CAAC,CAAC,CAAC,CAAC,CAAC,CAAC,CAAC;CACvD,CAAA;AAEY,QAAA,uBAAuB,GAClC,WAAW,CAAC,OAAO,CAAC,wBAAgB,CAAC,CAAA;AAEhC,MAAM,EAAE,GACb,CAAC,MAAa,EAAE,EAAE,CAClB,CAAC,KAAY,EAAS,EAAE,CACtB,wBAAgB,CAAC,MAAM,CAAC,KAAK,EAAE,MAAM,CAAC,CAAA;AAH7B,QAAA,EAAE,MAG2B;AAEnC,MAAM,GAAG,GACd,CAAC,MAAa,EAAE,EAAE,CAClB,CAAC,KAAY,EAAS,EAAE,CACtB,+BAAuB,CAAC,MAAM,CAAC,KAAK,EAAE,MAAM,CAAC,CAAA;AAHpC,QAAA,GAAG,OAGiC;AAEpC,QAAA,aAAa,GAAoB;IAC5C,GAAG,wBAAgB;IACnB,EAAE,EAAE,IAAI,CAAC,wBAAa,EAAE,GAAG,EAAE,CAAC,IAAA,eAAI,EAAC,CAAC,CAAC,CAAC;CACvC,CAAA;AAEY,QAAA,oBAAoB,GAAoB;IACnD,GAAG,+BAAuB;IAC1B,EAAE,EAAE,IAAI,CAAC,wBAAa,EAAE,GAAG,EAAE,CAAC,IAAA,eAAI,EAAC,CAAC,CAAC,CAAC;CACvC,CAAA;AAED,SAAgB,IAAI,CAAC,KAAY;IAC/B,MAAM,MAAM,GAAG,KAAK,CAAC,cAAc,EAAE,CAAA;IAErC,OAAO,IAAI,CAAC,cAAc,CAAC,MAAM,CAAC,CAAC,KAAK,CAAC,EAAE,GAAG,EAAE,CAAC,IAAA,eAAI,EAAC,KAAK,CAAC,cAAc,EAAE,GAAG,MAAM,CAAC,CAAC,CAAA;AACzF,CAAC;AAJD,oBAIC"}

package/cjs/Clock/DateClock.d.ts

@@ -0,0 +1,3 @@
+import { Clock } from './Clock.js';
+export declare function DateClock(startTime?: Date): Clock;
+//# sourceMappingURL=DateClock.d.ts.map

package/cjs/Clock/DateClock.d.ts.map

@@ -0,0 +1 @@
+{"version":3,"file":"DateClock.d.ts","sourceRoot":"","sources":["../../src/Clock/DateClock.ts"],"names":[],"mappings":"AAAA,OAAO,EAAE,KAAK,EAAQ,MAAM,YAAY,CAAA;AAIxC,wBAAgB,SAAS,CAAC,SAAS,GAAE,IAAiB,GAAG,KAAK,CAI7D"}

package/cjs/Clock/DateClock.js

@@ -0,0 +1,11 @@
+"use strict";
+Object.defineProperty(exports, "__esModule", { value: true });
+exports.DateClock = void 0;
+const Clock_js_1 = require("./Clock.js");
+const index_js_1 = require("@/Time/index.js");
+function DateClock(startTime = new Date()) {
+    const offset = startTime.getTime();
+    return (0, Clock_js_1.make)((0, index_js_1.UnixTime)(offset), () => (0, index_js_1.Time)(new Date().getTime() - offset));
+}
+exports.DateClock = DateClock;
+//# sourceMappingURL=DateClock.js.map

package/cjs/Clock/DateClock.js.map

@@ -0,0 +1 @@
+{"version":3,"file":"DateClock.js","sourceRoot":"","sources":["../../src/Clock/DateClock.ts"],"names":[],"mappings":";;;AAAA,yCAAwC;AAExC,8CAAgD;AAEhD,SAAgB,SAAS,CAAC,YAAkB,IAAI,IAAI,EAAE;IACpD,MAAM,MAAM,GAAG,SAAS,CAAC,OAAO,EAAE,CAAA;IAElC,OAAO,IAAA,eAAI,EAAC,IAAA,mBAAQ,EAAC,MAAM,CAAC,EAAE,GAAG,EAAE,CAAC,IAAA,eAAI,EAAC,IAAI,IAAI,EAAE,CAAC,OAAO,EAAE,GAAG,MAAM,CAAC,CAAC,CAAA;AAC1E,CAAC;AAJD,8BAIC"}

package/cjs/Clock/TestClock.d.ts

@@ -0,0 +1,11 @@
+import { Clock } from './Clock.js';
+import { Delay, Time, UnixTime } from '@/Time/index.js';
+/**
+ * A Clock which provides imperative access to progressing Time forward.
+ */
+export interface TestClock extends Clock {
+    readonly progressTimeBy: (delay: Delay) => Time;
+    readonly progressTimeTo: (delay: Time) => Time;
+}
+export declare function TestClock(startTime?: UnixTime): TestClock;
+//# sourceMappingURL=TestClock.d.ts.map

package/cjs/Clock/TestClock.d.ts.map

@@ -0,0 +1 @@
+{"version":3,"file":"TestClock.d.ts","sourceRoot":"","sources":["../../src/Clock/TestClock.ts"],"names":[],"mappings":"AAAA,OAAO,EAAE,KAAK,EAAQ,MAAM,YAAY,CAAA;AAExC,OAAO,EAAE,KAAK,EAAE,IAAI,EAAE,QAAQ,EAAE,MAAM,iBAAiB,CAAA;AAEvD;;GAEG;AACH,MAAM,WAAW,SAAU,SAAQ,KAAK;IACtC,QAAQ,CAAC,cAAc,EAAE,CAAC,KAAK,EAAE,KAAK,KAAK,IAAI,CAAA;IAC/C,QAAQ,CAAC,cAAc,EAAE,CAAC,KAAK,EAAE,IAAI,KAAK,IAAI,CAAA;CAC/C;AAED,wBAAgB,SAAS,CAAC,SAAS,GAAE,QAAqB,GAAG,SAAS,CAYrE"}

package/cjs/Clock/TestClock.js

@@ -0,0 +1,19 @@
+"use strict";
+Object.defineProperty(exports, "__esModule", { value: true });
+exports.TestClock = void 0;
+const Clock_js_1 = require("./Clock.js");
+const index_js_1 = require("@/Time/index.js");
+function TestClock(startTime = Date.now()) {
+    let time = (0, index_js_1.Time)(0);
+    return {
+        ...(0, Clock_js_1.make)(startTime, () => time),
+        progressTimeBy: (delay) => {
+            return (time = (0, index_js_1.Time)(time + delay));
+        },
+        progressTimeTo: (to) => {
+            return (time = to);
+        },
+    };
+}
+exports.TestClock = TestClock;
+//# sourceMappingURL=TestClock.js.map

package/cjs/Clock/TestClock.js.map

@@ -0,0 +1 @@
+{"version":3,"file":"TestClock.js","sourceRoot":"","sources":["../../src/Clock/TestClock.ts"],"names":[],"mappings":";;;AAAA,yCAAwC;AAExC,8CAAuD;AAUvD,SAAgB,SAAS,CAAC,YAAsB,IAAI,CAAC,GAAG,EAAE;IACxD,IAAI,IAAI,GAAS,IAAA,eAAI,EAAC,CAAC,CAAC,CAAA;IAExB,OAAO;QACL,GAAG,IAAA,eAAI,EAAC,SAAS,EAAE,GAAG,EAAE,CAAC,IAAI,CAAC;QAC9B,cAAc,EAAE,CAAC,KAAY,EAAE,EAAE;YAC/B,OAAO,CAAC,IAAI,GAAG,IAAA,eAAI,EAAC,IAAI,GAAG,KAAK,CAAC,CAAC,CAAA;QACpC,CAAC;QACD,cAAc,EAAE,CAAC,EAAQ,EAAE,EAAE;YAC3B,OAAO,CAAC,IAAI,GAAG,EAAE,CAAC,CAAA;QACpB,CAAC;KACF,CAAA;AACH,CAAC;AAZD,8BAYC"}

package/cjs/Clock/index.d.ts

@@ -0,0 +1,4 @@
+export * from './Clock.js';
+export * from './DateClock.js';
+export * from './TestClock.js';
+//# sourceMappingURL=index.d.ts.map

package/cjs/Clock/index.d.ts.map

@@ -0,0 +1 @@
+{"version":3,"file":"index.d.ts","sourceRoot":"","sources":["../../src/Clock/index.ts"],"names":[],"mappings":"AAAA,cAAc,YAAY,CAAA;AAC1B,cAAc,gBAAgB,CAAA;AAC9B,cAAc,gBAAgB,CAAA"}

package/cjs/Clock/index.js

@@ -0,0 +1,20 @@
+"use strict";
+var __createBinding = (this && this.__createBinding) || (Object.create ? (function(o, m, k, k2) {
+    if (k2 === undefined) k2 = k;
+    var desc = Object.getOwnPropertyDescriptor(m, k);
+    if (!desc || ("get" in desc ? !m.__esModule : desc.writable || desc.configurable)) {
+      desc = { enumerable: true, get: function() { return m[k]; } };
+    }
+    Object.defineProperty(o, k2, desc);
+}) : (function(o, m, k, k2) {
+    if (k2 === undefined) k2 = k;
+    o[k2] = m[k];
+}));
+var __exportStar = (this && this.__exportStar) || function(m, exports) {
+    for (var p in m) if (p !== "default" && !Object.prototype.hasOwnProperty.call(exports, p)) __createBinding(exports, m, p);
+};
+Object.defineProperty(exports, "__esModule", { value: true });
+__exportStar(require("./Clock.js"), exports);
+__exportStar(require("./DateClock.js"), exports);
+__exportStar(require("./TestClock.js"), exports);
+//# sourceMappingURL=index.js.map

package/cjs/Clock/index.js.map

@@ -0,0 +1 @@
+{"version":3,"file":"index.js","sourceRoot":"","sources":["../../src/Clock/index.ts"],"names":[],"mappings":";;;;;;;;;;;;;;;;AAAA,6CAA0B;AAC1B,iDAA8B;AAC9B,iDAA8B"}

package/cjs/Disposable/Disposable.d.ts

@@ -0,0 +1,25 @@
+/**
+ * A Synchronous representation of a Resource that can be disposed of or cancelled.
+ */
+export interface Disposable {
+    readonly dispose: () => void;
+}
+export declare function Disposable(dispose: () => void): Disposable;
+export declare namespace Disposable {
+    var None: Disposable;
+}
+export declare const None: Disposable;
+export declare function all(...disposables: readonly Disposable[]): Disposable;
+export interface Settable extends Disposable {
+    readonly isDisposed: () => boolean;
+    readonly add: (disposable: Disposable) => Disposable;
+}
+export declare function settable(): Settable;
+export declare class SettableDisposable implements Settable {
+    protected disposables: Set<Disposable>;
+    protected disposed: boolean;
+    readonly isDisposed: () => boolean;
+    readonly add: (d: Disposable) => Disposable;
+    readonly dispose: () => void;
+}
+//# sourceMappingURL=Disposable.d.ts.map

package/cjs/Disposable/Disposable.d.ts.map

@@ -0,0 +1 @@
+{"version":3,"file":"Disposable.d.ts","sourceRoot":"","sources":["../../src/Disposable/Disposable.ts"],"names":[],"mappings":"AAEA;;GAEG;AACH,MAAM,WAAW,UAAU;IACzB,QAAQ,CAAC,OAAO,EAAE,MAAM,IAAI,CAAA;CAC7B;AAED,wBAAgB,UAAU,CAAC,OAAO,EAAE,MAAM,IAAI,GAAG,UAAU,CAI1D;yBAJe,UAAU;;;AAM1B,eAAO,MAAM,IAAI,EAAE,UAElB,CAAA;AAID,wBAAgB,GAAG,CAAC,GAAG,WAAW,EAAE,SAAS,UAAU,EAAE,GAAG,UAAU,CAErE;AAED,MAAM,WAAW,QAAS,SAAQ,UAAU;IAC1C,QAAQ,CAAC,UAAU,EAAE,MAAM,OAAO,CAAA;IAClC,QAAQ,CAAC,GAAG,EAAE,CAAC,UAAU,EAAE,UAAU,KAAK,UAAU,CAAA;CACrD;AAED,wBAAgB,QAAQ,IAAI,QAAQ,CAEnC;AAED,qBAAa,kBAAmB,YAAW,QAAQ;IACjD,SAAS,CAAC,WAAW,kBAAwB;IAC7C,SAAS,CAAC,QAAQ,UAAQ;IAE1B,QAAQ,CAAC,UAAU,gBAAsB;IAEzC,QAAQ,CAAC,GAAG,MAAO,UAAU,gBAc5B;IAED,QAAQ,CAAC,OAAO,aAKf;CACF"}

package/cjs/Disposable/Disposable.js

@@ -0,0 +1,46 @@
+"use strict";
+Object.defineProperty(exports, "__esModule", { value: true });
+exports.SettableDisposable = exports.settable = exports.all = exports.None = exports.Disposable = void 0;
+const hkt_ts_1 = require("hkt-ts");
+function Disposable(dispose) {
+    return {
+        dispose,
+    };
+}
+exports.Disposable = Disposable;
+exports.None = {
+    dispose: hkt_ts_1.constVoid,
+};
+Disposable.None = exports.None;
+function all(...disposables) {
+    return Disposable(() => disposables.forEach((d) => d.dispose()));
+}
+exports.all = all;
+function settable() {
+    return new SettableDisposable();
+}
+exports.settable = settable;
+class SettableDisposable {
+    disposables = new Set();
+    disposed = false;
+    isDisposed = () => this.disposed;
+    add = (d) => {
+        if (d === exports.None) {
+            return d;
+        }
+        if (this.disposed) {
+            d.dispose();
+            return exports.None;
+        }
+        this.disposables.add(d);
+        return Disposable(() => this.disposables.delete(d));
+    };
+    dispose = () => {
+        this.disposed = true;
+        const disposable = all(...Array.from(this.disposables));
+        this.disposables.clear();
+        disposable.dispose();
+    };
+}
+exports.SettableDisposable = SettableDisposable;
+//# sourceMappingURL=Disposable.js.map

package/cjs/Disposable/Disposable.js.map

@@ -0,0 +1 @@
+{"version":3,"file":"Disposable.js","sourceRoot":"","sources":["../../src/Disposable/Disposable.ts"],"names":[],"mappings":";;;AAAA,mCAAkC;AASlC,SAAgB,UAAU,CAAC,OAAmB;IAC5C,OAAO;QACL,OAAO;KACR,CAAA;AACH,CAAC;AAJD,gCAIC;AAEY,QAAA,IAAI,GAAe;IAC9B,OAAO,EAAE,kBAAS;CACnB,CAAA;AAED,UAAU,CAAC,IAAI,GAAG,YAAI,CAAA;AAEtB,SAAgB,GAAG,CAAC,GAAG,WAAkC;IACvD,OAAO,UAAU,CAAC,GAAG,EAAE,CAAC,WAAW,CAAC,OAAO,CAAC,CAAC,CAAC,EAAE,EAAE,CAAC,CAAC,CAAC,OAAO,EAAE,CAAC,CAAC,CAAA;AAClE,CAAC;AAFD,kBAEC;AAOD,SAAgB,QAAQ;IACtB,OAAO,IAAI,kBAAkB,EAAE,CAAA;AACjC,CAAC;AAFD,4BAEC;AAED,MAAa,kBAAkB;IACnB,WAAW,GAAG,IAAI,GAAG,EAAc,CAAA;IACnC,QAAQ,GAAG,KAAK,CAAA;IAEjB,UAAU,GAAG,GAAG,EAAE,CAAC,IAAI,CAAC,QAAQ,CAAA;IAEhC,GAAG,GAAG,CAAC,CAAa,EAAE,EAAE;QAC/B,IAAI,CAAC,KAAK,YAAI,EAAE;YACd,OAAO,CAAC,CAAA;SACT;QAED,IAAI,IAAI,CAAC,QAAQ,EAAE;YACjB,CAAC,CAAC,OAAO,EAAE,CAAA;YAEX,OAAO,YAAI,CAAA;SACZ;QAED,IAAI,CAAC,WAAW,CAAC,GAAG,CAAC,CAAC,CAAC,CAAA;QAEvB,OAAO,UAAU,CAAC,GAAG,EAAE,CAAC,IAAI,CAAC,WAAW,CAAC,MAAM,CAAC,CAAC,CAAC,CAAC,CAAA;IACrD,CAAC,CAAA;IAEQ,OAAO,GAAG,GAAG,EAAE;QACtB,IAAI,CAAC,QAAQ,GAAG,IAAI,CAAA;QACpB,MAAM,UAAU,GAAG,GAAG,CAAC,GAAG,KAAK,CAAC,IAAI,CAAC,IAAI,CAAC,WAAW,CAAC,CAAC,CAAA;QACvD,IAAI,CAAC,WAAW,CAAC,KAAK,EAAE,CAAA;QACxB,UAAU,CAAC,OAAO,EAAE,CAAA;IACtB,CAAC,CAAA;CACF;AA5BD,gDA4BC"}

package/cjs/Disposable/index.d.ts

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

package/cjs/Disposable/index.d.ts.map

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

package/cjs/Disposable/index.js

@@ -0,0 +1,18 @@
+"use strict";
+var __createBinding = (this && this.__createBinding) || (Object.create ? (function(o, m, k, k2) {
+    if (k2 === undefined) k2 = k;
+    var desc = Object.getOwnPropertyDescriptor(m, k);
+    if (!desc || ("get" in desc ? !m.__esModule : desc.writable || desc.configurable)) {
+      desc = { enumerable: true, get: function() { return m[k]; } };
+    }
+    Object.defineProperty(o, k2, desc);
+}) : (function(o, m, k, k2) {
+    if (k2 === undefined) k2 = k;
+    o[k2] = m[k];
+}));
+var __exportStar = (this && this.__exportStar) || function(m, exports) {
+    for (var p in m) if (p !== "default" && !Object.prototype.hasOwnProperty.call(exports, p)) __createBinding(exports, m, p);
+};
+Object.defineProperty(exports, "__esModule", { value: true });
+__exportStar(require("./Disposable.js"), exports);
+//# sourceMappingURL=index.js.map