@fncts/io 0.0.19 → 0.0.20

package/Differ/api.d.ts

@@ -0,0 +1,24 @@
+import type { Environment } from "@fncts/base/data/Environment";
+import type { Supervisor } from "@fncts/io/Supervisor";
+import { Differ } from "./definition.js";
+/**
+ * Constructs a differ that just diffs two values by returning a function that
+ * sets the value to the new value. This differ does not support combining
+ * multiple updates to the value compositionally and should only be used when
+ * there is no compositional way to update them.
+ * @tsplus static fncts.io.DifferOps update
+ * @tsplus location "@fncts/io/Differ/api"
+ */
+export declare function update<A>(): Differ<A, (_: A) => A>;
+/**
+ * Constructs a differ that knows how to diff `Environment` values.
+ * @tsplus static fncts.io.DifferOps environment
+ * @tsplus location "@fncts/io/Differ/api"
+ */
+export declare function environment<A>(): Differ<Environment<A>, Environment.Patch<A, A>>;
+/**
+ * Constructs a differ that knows how to diff `Supervisor` values.
+ * @tsplus static fncts.io.DifferOps supervisor
+ * @tsplus location "@fncts/io/Differ/api"
+ */
+export declare function supervisor(): Differ<Supervisor<any>, Supervisor.Patch>;

package/Differ/definition.d.ts

@@ -0,0 +1,15 @@
+export declare const DifferTypeId: unique symbol;
+export type DifferTypeId = typeof DifferTypeId;
+/**
+ * @tsplus type fncts.io.Differ
+ * @tsplus companion fncts.io.DifferOps
+ */
+export declare abstract class Differ<Value, Patch> {
+    readonly _typeId: DifferTypeId;
+    _Value: Value;
+    _Patch: Patch;
+    abstract readonly empty: Patch;
+    abstract combine(first: Patch, second: Patch): Patch;
+    abstract diff(oldValue: Value, newValue: Value): Patch;
+    abstract patch(patch: Patch): (oldValue: Value) => Value;
+}

package/FiberRef/unsafe.d.ts

@@ -1,25 +1,31 @@
 import { FiberRef } from "@fncts/io/FiberRef/definition";
 import { Environment } from "@fncts/base/data/Environment/definition";
+import { Supervisor } from "@fncts/io/Supervisor/definition";
+import { SupervisorPatch } from "@fncts/io/SupervisorPatch";
 import { Maybe } from "@fncts/base/data/Maybe/definition";
 import { FiberScope } from "@fncts/io/FiberScope";
 import { LogLevel } from "@fncts/io/LogLevel";
 import { List } from "@fncts/base/collection/immutable/List/definition";
 import { HashMap } from "@fncts/base/collection/immutable/HashMap/definition";
-import { Supervisor } from "@fncts/io/Supervisor/definition";
 import type { LogSpan } from "../LogSpan.js";
 import type { Scheduler } from "@fncts/io/internal/Scheduler.js";
-import { Patch } from "@fncts/base/data/Patch";
+import { Differ } from "@fncts/io/Differ/definition";
 import { IsFatal } from "../internal/IsFatal.js";
 /**
  * @tsplus static fncts.io.FiberRefOps unsafeMakePatch
  * @tsplus location "@fncts/io/FiberRef/unsafe"
  */
-export declare function unsafeMakePatch<Value, Patch>(initial: Value, diff: (oldValue: Value, newValue: Value) => Patch, combine: (first: Patch, second: Patch) => Patch, patch: (patch: Patch) => (oldValue: Value) => Value, fork: Patch, join?: (oldValue: Value, newValue: Value) => Value): FiberRef.WithPatch<Value, Patch>;
+export declare function unsafeMakePatch<Value, Patch>(initial: Value, differ: Differ<Value, Patch>, fork: Patch, join?: (oldValue: Value, newValue: Value) => Value): FiberRef.WithPatch<Value, Patch>;
 /**
  * @tsplus static fncts.io.FiberRefOps unsafeMakeEnvironment
  * @tsplus location "@fncts/io/FiberRef/unsafe"
  */
-export declare function unsafeMakeEnvironment<A>(initial: Environment<A>): FiberRef.WithPatch<Environment<A>, Patch<A, A>>;
+export declare function unsafeMakeEnvironment<A>(initial: Environment<A>): FiberRef.WithPatch<Environment<A>, Environment.Patch<A, A>>;
+/**
+ * @tsplus static fncts.io.FiberRefOps unsafeMakeSupervisor
+ * @tsplus location "@fncts/io/FiberRef/unsafe"
+ */
+export declare function unsafeMakeSupervisor(initial: Supervisor<any>): FiberRef.WithPatch<Supervisor<any>, SupervisorPatch>;
 /**
  * @tsplus static fncts.io.FiberRefOps unsafeMake
  * @tsplus location "@fncts/io/FiberRef/unsafe"
@@ -34,7 +40,7 @@ export declare const forkScopeOverride: import("./definition.js").FiberRef.WithP
  * @tsplus static fncts.io.FiberRefOps currentEnvironment
  * @tsplus location "@fncts/io/FiberRef/unsafe"
  */
-export declare const currentEnvironment: import("./definition.js").FiberRef.WithPatch<import("@fncts/base/data/Environment.js").Environment<unknown>, Patch<unknown, unknown>>;
+export declare const currentEnvironment: import("./definition.js").FiberRef.WithPatch<import("@fncts/base/data/Environment.js").Environment<unknown>, import("@fncts/base/data/Environment.js").Environment.Patch<unknown, unknown>>;
 /**
  * @tsplus static fncts.io.FiberRefOps fiberName
  * @tsplus location "@fncts/io/FiberRef/unsafe"
@@ -64,7 +70,7 @@ export declare const currentScheduler: import("./definition.js").FiberRef.WithPa
  * @tsplus static fncts.io.FiberRefOps currentSupervisor
  * @tsplus location "@fncts/io/FiberRef/unsafe"
  */
-export declare const currentSupervisor: import("./definition.js").FiberRef.WithPatch<import("../Supervisor.js").Supervisor<any>, (_: import("../Supervisor.js").Supervisor<any>) => import("../Supervisor.js").Supervisor<any>>;
+export declare const currentSupervisor: import("./definition.js").FiberRef.WithPatch<import("../Supervisor.js").Supervisor<any>, import("../SupervisorPatch.js").SupervisorPatch>;
 /**
  * @tsplus static fncts.io.FiberRefOps currentIsFatal
  * @tsplus location "@fncts/io/FiberRef/unsafe"

package/IOEnv/services.d.ts

@@ -1,9 +1,9 @@
 import { FiberRef } from "@fncts/io/FiberRef/definition";
 import { Environment } from "@fncts/base/data/Environment/definition";
 import { IOEnv } from "@fncts/io/IOEnv";
-import type { Patch } from "@fncts/base/data/Patch";
+import type { EnvironmentPatch } from "@fncts/base/data/EnvironmentPatch";
 /**
  * @tsplus static fncts.io.IOEnvOps services
  * @tsplus location "@fncts/io/IOEnv/services"
  */
-export declare const services: FiberRef.WithPatch<Environment<IOEnv>, Patch<IOEnv, IOEnv>>;
+export declare const services: FiberRef.WithPatch<Environment<IOEnv>, EnvironmentPatch<IOEnv, IOEnv>>;

package/Supervisor/api.d.ts

@@ -1,11 +1,17 @@
 import { Supervisor } from "@fncts/io/Supervisor/definition";
-import { Environment } from "@fncts/base/data/Environment/definition";
-import { IO } from "@fncts/io/IO/definition";
-import { Maybe } from "@fncts/base/data/Maybe/definition";
-import { Fiber } from "@fncts/io/Fiber/definition";
-import { Exit } from "@fncts/base/data/Exit/definition";
+import { HashSet } from "@fncts/base/collection/immutable/HashSet/definition";
 /**
  * @tsplus fluent fncts.io.Supervisor zip
  * @tsplus location "@fncts/io/Supervisor/api"
  */
 export declare function zip_<A, B>(fa: Supervisor<A>, fb: Supervisor<B>): Supervisor<readonly [A, B]>;
+/**
+ * @tsplus getter fncts.io.Supervisor toSet
+ * @tsplus location "@fncts/io/Supervisor/api"
+ */
+export declare function toSet(self: Supervisor<any>): HashSet<Supervisor<any>>;
+/**
+ * @tsplus fluent fncts.io.Supervisor removeSupervisor
+ * @tsplus location "@fncts/io/Supervisor/api"
+ */
+export declare function removeSupervisor(self: Supervisor<any>, that: Supervisor<any>): Supervisor<any>;

package/Supervisor/definition.d.ts

@@ -3,6 +3,12 @@ import { Environment } from "@fncts/base/data/Environment/definition";
 import { Maybe } from "@fncts/base/data/Maybe/definition";
 import { Fiber } from "@fncts/io/Fiber/definition";
 import { Exit } from "@fncts/base/data/Exit/definition";
+import type { SupervisorPatch } from "@fncts/io/SupervisorPatch";
+export declare const enum SupervisorTag {
+    Const = 0,
+    Proxy = 1,
+    Zip = 2
+}
 /**
  * @tsplus type fncts.io.Supervisor
  * @tsplus companion fncts.io.SupervisorOps
@@ -15,8 +21,12 @@ export declare abstract class Supervisor<A> {
     unsafeOnSuspend<E, A>(_fiber: Fiber.Runtime<E, A>): void;
     unsafeOnResume<E, A>(_fiber: Fiber.Runtime<E, A>): void;
 }
+export declare namespace Supervisor {
+    type Patch = SupervisorPatch;
+}
 export declare class ConstSupervisor<A> extends Supervisor<A> {
     readonly value: UIO<A>;
+    readonly _tag = SupervisorTag.Const;
     constructor(value: UIO<A>);
     unsafeOnStart(): void;
     unsafeOnEnd(): void;
@@ -27,6 +37,7 @@ export declare class ConstSupervisor<A> extends Supervisor<A> {
 export declare class ProxySupervisor<A> extends Supervisor<A> {
     readonly value: UIO<A>;
     readonly underlying: Supervisor<any>;
+    readonly _tag = SupervisorTag.Proxy;
     constructor(value: UIO<A>, underlying: Supervisor<any>);
     unsafeOnStart<R, E, A>(environment: Environment<R>, effect: IO<R, E, A>, parent: Maybe<Fiber.Runtime<E, A>>, fiber: Fiber.Runtime<E, A>): void;
     unsafeOnEnd<E, A>(value: Exit<E, A>, fiber: Fiber.Runtime<E, A>): void;
@@ -34,3 +45,20 @@ export declare class ProxySupervisor<A> extends Supervisor<A> {
     unsafeOnSuspend<E, A>(fiber: Fiber.Runtime<E, A>): void;
     unsafeOnResume<E, A>(fiber: Fiber.Runtime<E, A>): void;
 }
+export declare class Zip<A, B> extends Supervisor<readonly [A, B]> {
+    readonly first: Supervisor<A>;
+    readonly second: Supervisor<B>;
+    readonly _tag = SupervisorTag.Zip;
+    constructor(first: Supervisor<A>, second: Supervisor<B>);
+    value: import("../IO").IO<never, never, readonly [A, B]>;
+    unsafeOnStart<R, E, A>(environment: Environment<R>, effect: IO<R, E, A>, parent: Maybe<Fiber.Runtime<any, any>>, fiber: Fiber.Runtime<E, A>): void;
+    unsafeOnEnd<E, A>(value: Exit<E, A>, fiber: Fiber.Runtime<E, A>): void;
+    unsafeOnEffect<E, A>(fiber: Fiber.Runtime<E, A>, effect: IO<any, any, any>): void;
+    unsafeOnSuspend<E, A>(fiber: Fiber.Runtime<E, A>): void;
+    unsafeOnResume<E, A>(fiber: Fiber.Runtime<E, A>): void;
+}
+export type Concrete = ConstSupervisor<any> | ProxySupervisor<any> | Zip<any, any>;
+/**
+ * @tsplus macro remove
+ */
+export declare function concrete(_: Supervisor<any>): asserts _ is Concrete;

package/SupervisorPatch.d.ts

@@ -0,0 +1,61 @@
+import { Supervisor } from "@fncts/io/Supervisor/definition";
+import { List } from "@fncts/base/collection/immutable/List/definition";
+export declare const SupervisorPatchTypeId: unique symbol;
+export type SupervisorPatchTypeId = typeof SupervisorPatchTypeId;
+export declare const enum SupervisorPatchTag {
+    AddSupervisor = 0,
+    Combine = 1,
+    Empty = 2,
+    RemoveSupervisor = 3
+}
+/**
+ * @tsplus type fncts.io.SupervisorPatch
+ * @tsplus companion fncts.io.SupervisorPatchOps
+ */
+export declare abstract class SupervisorPatch {
+    readonly _typeId: SupervisorPatchTypeId;
+}
+export declare class AddSupervisor extends SupervisorPatch {
+    readonly supervisor: Supervisor<any>;
+    readonly _tag = SupervisorPatchTag.AddSupervisor;
+    constructor(supervisor: Supervisor<any>);
+}
+export declare class Combine extends SupervisorPatch {
+    readonly first: SupervisorPatch;
+    readonly second: SupervisorPatch;
+    readonly _tag = SupervisorPatchTag.Combine;
+    constructor(first: SupervisorPatch, second: SupervisorPatch);
+}
+export declare class Empty extends SupervisorPatch {
+    readonly _tag = SupervisorPatchTag.Empty;
+}
+export declare class RemoveSupervisor extends SupervisorPatch {
+    readonly supervisor: Supervisor<any>;
+    readonly _tag = SupervisorPatchTag.RemoveSupervisor;
+    constructor(supervisor: Supervisor<any>);
+}
+export type Concrete = AddSupervisor | Combine | Empty | RemoveSupervisor;
+/**
+ * @tsplus macro remove
+ */
+export declare function concrete(_: SupervisorPatch): asserts _ is Concrete;
+/**
+ * @tsplus static fncts.io.SupervisorPatchOps empty
+ * @tsplus location "@fncts/io/SupervisorPatch"
+ */
+export declare const empty: SupervisorPatch;
+/**
+ * @tsplus fluent fncts.io.SupervisorPatch combine
+ * @tsplus location "@fncts/io/SupervisorPatch"
+ */
+export declare function combine(first: SupervisorPatch, second: SupervisorPatch): SupervisorPatch;
+/**
+ * @tsplus static fncts.io.SupervisorPatchOps diff
+ * @tsplus location "@fncts/io/SupervisorPatch"
+ */
+export declare function diff(oldValue: Supervisor<any>, newValue: Supervisor<any>): SupervisorPatch;
+/**
+ * @tsplus fluent fncts.io.SupervisorPatch __call
+ * @tsplus location "@fncts/io/SupervisorPatch"
+ */
+export declare function apply(self: SupervisorPatch, supervisor: Supervisor<any>): Supervisor<any>;

package/_cjs/Differ/api.cjs

@@ -0,0 +1,108 @@
+"use strict";
+
+Object.defineProperty(exports, "__esModule", {
+  value: true
+});
+exports.environment = environment;
+exports.supervisor = supervisor;
+exports.update = update;
+
+var tsplus_module_1 = /*#__PURE__*/_interopRequireWildcard( /*#__PURE__*/require("@fncts/base/data/function/api"));
+
+var tsplus_module_2 = /*#__PURE__*/_interopRequireWildcard( /*#__PURE__*/require("@fncts/base/data/EnvironmentPatch"));
+
+var tsplus_module_3 = /*#__PURE__*/_interopRequireWildcard( /*#__PURE__*/require("@fncts/io/SupervisorPatch"));
+
+var _definition = /*#__PURE__*/require("./definition.cjs");
+
+function _getRequireWildcardCache(nodeInterop) { if (typeof WeakMap !== "function") return null; var cacheBabelInterop = new WeakMap(); var cacheNodeInterop = new WeakMap(); return (_getRequireWildcardCache = function (nodeInterop) { return nodeInterop ? cacheNodeInterop : cacheBabelInterop; })(nodeInterop); }
+
+function _interopRequireWildcard(obj, nodeInterop) { if (!nodeInterop && obj && obj.__esModule) { return obj; } if (obj === null || typeof obj !== "object" && typeof obj !== "function") { return { default: obj }; } var cache = _getRequireWildcardCache(nodeInterop); if (cache && cache.has(obj)) { return cache.get(obj); } var newObj = {}; var hasPropertyDescriptor = Object.defineProperty && Object.getOwnPropertyDescriptor; for (var key in obj) { if (key !== "default" && Object.prototype.hasOwnProperty.call(obj, key)) { var desc = hasPropertyDescriptor ? Object.getOwnPropertyDescriptor(obj, key) : null; if (desc && (desc.get || desc.set)) { Object.defineProperty(newObj, key, desc); } else { newObj[key] = obj[key]; } } } newObj.default = obj; if (cache) { cache.set(obj, newObj); } return newObj; }
+
+/**
+ * Constructs a differ that just diffs two values by returning a function that
+ * sets the value to the new value. This differ does not support combining
+ * multiple updates to the value compositionally and should only be used when
+ * there is no compositional way to update them.
+ *
+ * @tsplus static fncts.io.DifferOps update
+ */
+function update() {
+  return new class extends _definition.Differ {
+    constructor() {
+      super(...arguments);
+      this.empty = tsplus_module_1.identity;
+    }
+
+    combine(first, second) {
+      if (first === this.empty) return second;else if (second === this.empty) return first;
+      return tsplus_module_1.compose_(first, second);
+    }
+
+    diff(oldValue, newValue) {
+      if (oldValue === newValue) return this.empty;else return () => newValue;
+    }
+
+    patch(patch) {
+      return patch;
+    }
+
+  }();
+}
+/**
+ * Constructs a differ that knows how to diff `Environment` values.
+ *
+ * @tsplus static fncts.io.DifferOps environment
+ */
+
+
+function environment() {
+  return new class extends _definition.Differ {
+    constructor() {
+      super(...arguments);
+      this.empty = tsplus_module_2.empty();
+    }
+
+    combine(first, second) {
+      return tsplus_module_2.combine(first, second);
+    }
+
+    diff(oldValue, newValue) {
+      return tsplus_module_2.diff(oldValue, newValue);
+    }
+
+    patch(patch) {
+      return oldValue => tsplus_module_2.apply(patch, oldValue);
+    }
+
+  }();
+}
+/**
+ * Constructs a differ that knows how to diff `Supervisor` values.
+ *
+ * @tsplus static fncts.io.DifferOps supervisor
+ */
+
+
+function supervisor() {
+  return new class extends _definition.Differ {
+    constructor() {
+      super(...arguments);
+      this.empty = tsplus_module_3.empty;
+    }
+
+    combine(first, second) {
+      return tsplus_module_3.combine(first, second);
+    }
+
+    diff(oldValue, newValue) {
+      return tsplus_module_3.diff(oldValue, newValue);
+    }
+
+    patch(patch) {
+      return oldValue => tsplus_module_3.apply(patch, oldValue);
+    }
+
+  }();
+}
+//# sourceMappingURL=api.cjs.map

package/_cjs/Differ/api.cjs.map

@@ -0,0 +1 @@
+{"version":3,"file":"api.cjs","mappings":";;;;;;;;;;;;;;;AAKA;;;;;;AAEA;;;;;;;;AAQM,SAAUA,MAAV,GAAgB;EACpB,OAAO,IAAK,cAAcC,kBAAd,CAAoC;IAApCC;;MAUV,aAAKC,wBAAL;IAID;;IAbCC,OAAO,CAACC,KAAD,EAAqBC,MAArB,EAAwC;MAC7C,IAAID,KAAK,KAAK,KAAKE,KAAnB,EAA0B,OAAOD,MAAP,CAA1B,KACK,IAAIA,MAAM,KAAK,KAAKC,KAApB,EAA2B,OAAOF,KAAP;MAChC,OAAOF,gCAAcG,MAAd,CAAP;IACD;;IACDE,IAAI,CAACC,QAAD,EAAcC,QAAd,EAAyB;MAC3B,IAAID,QAAQ,KAAKC,QAAjB,EAA2B,OAAO,KAAKH,KAAZ,CAA3B,KACK,OAAO,MAAMG,QAAb;IACN;;IAEDC,KAAK,CAACA,KAAD,EAAmB;MACtB,OAAOA,KAAP;IACD;;EAb6C,CAAzC,EAAP;AAeD;AAED;;;;;;;AAKM,SAAUC,WAAV,GAAqB;EACzB,OAAO,IAAK,cAAcX,kBAAd,CAA6D;IAA7DC;;MAOV,aAAQW,uBAAR;IAID;;IAVCT,OAAO,CAACC,KAAD,EAAiCC,MAAjC,EAAgE;MACrE,OAAOO,+BAAcP,MAAd,CAAP;IACD;;IACDE,IAAI,CAACC,QAAD,EAA2BC,QAA3B,EAAmD;MACrD,OAAOG,qBAAsBJ,QAAtB,EAAgCC,QAAhC,CAAP;IACD;;IAEDC,KAAK,CAACA,KAAD,EAA+B;MAClC,OAAQF,QAAD,IAAcI,6BAAMJ,QAAN,CAArB;IACD;;EAVsE,CAAlE,EAAP;AAYD;AAED;;;;;;;AAKM,SAAUK,UAAV,GAAoB;EACxB,OAAO,IAAK,cAAcb,kBAAd,CAAuD;IAAvDC;;MAOV,aAAKa,qBAAL;IAID;;IAVCX,OAAO,CAACC,KAAD,EAAyBC,MAAzB,EAAgD;MACrD,OAAOS,+BAAcT,MAAd,CAAP;IACD;;IACDE,IAAI,CAACC,QAAD,EAA4BC,QAA5B,EAAqD;MACvD,OAAOK,qBAAqBN,QAArB,EAA+BC,QAA/B,CAAP;IACD;;IAEDC,KAAK,CAACA,KAAD,EAAuB;MAC1B,OAAQF,QAAD,IAAcM,6BAAMN,QAAN,CAArB;IACD;;EAVgE,CAA5D,EAAP;AAYD","names":["update","Differ","constructor","tsplus_module_1","combine","first","second","empty","diff","oldValue","newValue","patch","environment","tsplus_module_2","supervisor","tsplus_module_3"],"sourceRoot":"","sources":["../../_src/Differ/api.ts"],"sourcesContent":[null]}

package/_cjs/Differ/definition.cjs

@@ -0,0 +1,23 @@
+"use strict";
+
+Object.defineProperty(exports, "__esModule", {
+  value: true
+});
+exports.DifferTypeId = exports.Differ = void 0;
+const DifferTypeId = /*#__PURE__*/Symbol.for("fncts.io.Differ");
+/**
+ * @tsplus type fncts.io.Differ
+ * @tsplus companion fncts.io.DifferOps
+ */
+
+exports.DifferTypeId = DifferTypeId;
+
+class Differ {
+  constructor() {
+    this._typeId = DifferTypeId;
+  }
+
+}
+
+exports.Differ = Differ;
+//# sourceMappingURL=definition.cjs.map

package/_cjs/Differ/definition.cjs.map

@@ -0,0 +1 @@
+{"version":3,"file":"definition.cjs","mappings":";;;;;;AAAO,MAAMA,YAAY,gBAAGC,MAAM,CAACC,GAAP,CAAW,iBAAX,CAArB;AAGP;;;;;;;AAIM,MAAgBC,MAAhB,CAAsB;EAA5BC;IACW,eAAwBJ,YAAxB;EAOV;;AAR2B","names":["DifferTypeId","Symbol","for","Differ","constructor"],"sourceRoot":"","sources":["../../_src/Differ/definition.ts"],"sourcesContent":[null]}

package/_cjs/FiberRef/unsafe.cjs

@@ -3,23 +3,27 @@
 Object.defineProperty(exports, "__esModule", {
   value: true
 });
-exports.unsafeMakePatch = exports.unsafeMakeEnvironment = exports.unsafeMake = exports.forkScopeOverride = exports.fiberName = exports.currentSupervisor = exports.currentScheduler = exports.currentReportFatal = exports.currentLogSpan = exports.currentLogLevel = exports.currentLogAnnotations = exports.currentIsFatal = exports.currentEnvironment = void 0;
+exports.unsafeMakeSupervisor = exports.unsafeMakePatch = exports.unsafeMakeEnvironment = exports.unsafeMake = exports.forkScopeOverride = exports.fiberName = exports.currentSupervisor = exports.currentScheduler = exports.currentReportFatal = exports.currentLogSpan = exports.currentLogLevel = exports.currentLogAnnotations = exports.currentIsFatal = exports.currentEnvironment = void 0;
 
-var tsplus_module_1 = /*#__PURE__*/_interopRequireWildcard( /*#__PURE__*/require("@fncts/base/data/Patch/api"));
+var tsplus_module_1 = /*#__PURE__*/_interopRequireWildcard( /*#__PURE__*/require("@fncts/io/Differ/api"));
 
-var tsplus_module_2 = /*#__PURE__*/_interopRequireWildcard( /*#__PURE__*/require("@fncts/base/data/Maybe/constructors"));
+var tsplus_module_2 = /*#__PURE__*/_interopRequireWildcard( /*#__PURE__*/require("@fncts/base/data/EnvironmentPatch"));
 
-var tsplus_module_3 = /*#__PURE__*/_interopRequireWildcard( /*#__PURE__*/require("@fncts/base/data/Environment/api"));
+var tsplus_module_3 = /*#__PURE__*/_interopRequireWildcard( /*#__PURE__*/require("@fncts/io/SupervisorPatch"));
 
-var tsplus_module_4 = /*#__PURE__*/_interopRequireWildcard( /*#__PURE__*/require("@fncts/io/LogLevel"));
+var tsplus_module_4 = /*#__PURE__*/_interopRequireWildcard( /*#__PURE__*/require("@fncts/base/data/Maybe/constructors"));
 
-var tsplus_module_5 = /*#__PURE__*/_interopRequireWildcard( /*#__PURE__*/require("@fncts/base/collection/immutable/List/constructors"));
+var tsplus_module_5 = /*#__PURE__*/_interopRequireWildcard( /*#__PURE__*/require("@fncts/base/data/Environment/api"));
 
-var tsplus_module_6 = /*#__PURE__*/_interopRequireWildcard( /*#__PURE__*/require("@fncts/base/collection/immutable/HashMap/api"));
+var tsplus_module_6 = /*#__PURE__*/_interopRequireWildcard( /*#__PURE__*/require("@fncts/io/LogLevel"));
 
-var tsplus_module_7 = /*#__PURE__*/_interopRequireWildcard( /*#__PURE__*/require("@fncts/io/Supervisor/constructors"));
+var tsplus_module_7 = /*#__PURE__*/_interopRequireWildcard( /*#__PURE__*/require("@fncts/base/collection/immutable/List/constructors"));
 
-var tsplus_module_8 = /*#__PURE__*/_interopRequireWildcard( /*#__PURE__*/require("@fncts/io/internal/IsFatal"));
+var tsplus_module_8 = /*#__PURE__*/_interopRequireWildcard( /*#__PURE__*/require("@fncts/base/collection/immutable/HashMap/api"));
+
+var tsplus_module_9 = /*#__PURE__*/_interopRequireWildcard( /*#__PURE__*/require("@fncts/io/Supervisor/constructors"));
+
+var tsplus_module_10 = /*#__PURE__*/_interopRequireWildcard( /*#__PURE__*/require("@fncts/io/internal/IsFatal"));
 
 var _function = /*#__PURE__*/require("@fncts/base/data/function");
 
@@ -35,14 +39,16 @@ const unsafeMakePatch = unsafeMakePatch_1;
 exports.unsafeMakePatch = unsafeMakePatch;
 const unsafeMakeEnvironment = unsafeMakeEnvironment_1;
 exports.unsafeMakeEnvironment = unsafeMakeEnvironment;
+const unsafeMakeSupervisor = unsafeMakeSupervisor_1;
+exports.unsafeMakeSupervisor = unsafeMakeSupervisor;
 const unsafeMake = unsafeMake_1;
 exports.unsafeMake = unsafeMake;
 
 /**
  * @tsplus static fncts.io.FiberRefOps unsafeMakePatch
  */
-function unsafeMakePatch_1(initial, diff, combine, patch, fork, join = (_, newValue) => newValue) {
-  return new _definition.FiberRefInternal(initial, diff, combine, patch, fork, join);
+function unsafeMakePatch_1(initial, differ, fork, join = (_, newValue) => newValue) {
+  return new _definition.FiberRefInternal(initial, (oldValue, newValue) => differ.diff(oldValue, newValue), (first, second) => differ.combine(first, second), patch => oldValue => differ.patch(patch)(oldValue), fork, join);
 }
 /**
  * @tsplus static fncts.io.FiberRefOps unsafeMakeEnvironment
@@ -50,7 +56,15 @@ function unsafeMakePatch_1(initial, diff, combine, patch, fork, join = (_, newVa
 
 
 function unsafeMakeEnvironment_1(initial) {
-  return unsafeMakePatch_1(initial, tsplus_module_1.diff, (first, second) => tsplus_module_1.compose(first, second), patch => value => tsplus_module_1.apply(patch, value), tsplus_module_1.empty());
+  return unsafeMakePatch_1(initial, tsplus_module_1.environment(), tsplus_module_2.empty());
+}
+/**
+ * @tsplus static fncts.io.FiberRefOps unsafeMakeSupervisor
+ */
+
+
+function unsafeMakeSupervisor_1(initial) {
+  return unsafeMakePatch_1(initial, tsplus_module_1.supervisor(), tsplus_module_3.empty);
 }
 /**
  * @tsplus static fncts.io.FiberRefOps unsafeMake
@@ -58,44 +72,44 @@ function unsafeMakeEnvironment_1(initial) {
 
 
 function unsafeMake_1(initial, fork = _function.identity, join = (_, a) => a) {
-  return unsafeMakePatch_1(initial, (_, newValue) => () => newValue, (first, second) => value => second(first(value)), patch => value => patch(value), fork, join);
+  return unsafeMakePatch_1(initial, tsplus_module_1.update(), fork, join);
 }
 /**
  * @tsplus static fncts.io.FiberRefOps forkScopeOverride
  */
 
 
-const forkScopeOverride = /*#__PURE__*/unsafeMake_1( /*#__PURE__*/tsplus_module_2.nothing(), () => tsplus_module_2.nothing(), (parent, _) => parent);
+const forkScopeOverride = /*#__PURE__*/unsafeMake_1( /*#__PURE__*/tsplus_module_4.nothing(), () => tsplus_module_4.nothing(), (parent, _) => parent);
 /**
  * @tsplus static fncts.io.FiberRefOps currentEnvironment
  */
 
 exports.forkScopeOverride = forkScopeOverride;
-const currentEnvironment = /*#__PURE__*/unsafeMakeEnvironment_1(tsplus_module_3.empty);
+const currentEnvironment = /*#__PURE__*/unsafeMakeEnvironment_1(tsplus_module_5.empty);
 /**
  * @tsplus static fncts.io.FiberRefOps fiberName
  */
 
 exports.currentEnvironment = currentEnvironment;
-const fiberName = /*#__PURE__*/unsafeMake_1( /*#__PURE__*/tsplus_module_2.nothing());
+const fiberName = /*#__PURE__*/unsafeMake_1( /*#__PURE__*/tsplus_module_4.nothing());
 /**
  * @tsplus static fncts.io.FiberRefOps currentLogLevel
  */
 
 exports.fiberName = fiberName;
-const currentLogLevel = /*#__PURE__*/unsafeMake_1(tsplus_module_4.Info);
+const currentLogLevel = /*#__PURE__*/unsafeMake_1(tsplus_module_6.Info);
 /**
  * @tsplus static fncts.io.FiberRefOps currentLogSpan
  */
 
 exports.currentLogLevel = currentLogLevel;
-const currentLogSpan = /*#__PURE__*/unsafeMake_1( /*#__PURE__*/tsplus_module_5.nil());
+const currentLogSpan = /*#__PURE__*/unsafeMake_1( /*#__PURE__*/tsplus_module_7.nil());
 /**
  * @tsplus static fncts.io.FiberRefOps currentLogAnnotations
  */
 
 exports.currentLogSpan = currentLogSpan;
-const currentLogAnnotations = /*#__PURE__*/unsafeMake_1( /*#__PURE__*/tsplus_module_6.makeDefault());
+const currentLogAnnotations = /*#__PURE__*/unsafeMake_1( /*#__PURE__*/tsplus_module_8.makeDefault());
 /**
  * @tsplus static fncts.io.FiberRefOps currentScheduler
  */
@@ -107,13 +121,13 @@ const currentScheduler = /*#__PURE__*/unsafeMake_1(_Scheduler.defaultScheduler);
  */
 
 exports.currentScheduler = currentScheduler;
-const currentSupervisor = /*#__PURE__*/unsafeMake_1(tsplus_module_7.none);
+const currentSupervisor = /*#__PURE__*/unsafeMakeSupervisor_1(tsplus_module_9.none);
 /**
  * @tsplus static fncts.io.FiberRefOps currentIsFatal
  */
 
 exports.currentSupervisor = currentSupervisor;
-const currentIsFatal = /*#__PURE__*/unsafeMake_1(tsplus_module_8.empty);
+const currentIsFatal = /*#__PURE__*/unsafeMake_1(tsplus_module_10.empty);
 /**
  * @tsplus static fncts.io.FiberRefOps currentReportFatal
  */

package/_cjs/FiberRef/unsafe.cjs.map

@@ -1 +1 @@
-{"version":3,"file":"unsafe.cjs","mappings":";;;;;;;;;;;;;;;;;;;;;;;AAGA;;AAEA;;AAGA;;;;;;MAKgBA,eAAe;;MAcfC,qBAAqB;;MAarBC,UAAU;;;AA9B1B;;;AAGA,2BACEC,OADF,EAEEC,IAFF,EAGEC,OAHF,EAIEC,KAJF,EAKEC,IALF,EAMEC,OAAoD,CAACC,CAAD,EAAIC,QAAJ,KAAiBA,QANvE,EAM+E;EAE7E,OAAO,IAAIC,4BAAJ,CAAqBR,OAArB,EAA8BC,IAA9B,EAAoCC,OAApC,EAA6CC,KAA7C,EAAoDC,IAApD,EAA0DC,IAA1D,CAAP;AACD;AAED;;;;;AAGA,iCAAyCL,OAAzC,EAAgE;EAC9D,OAAOS,kBACLT,OADK,EACEU,oBADF,EAGL,CAACC,KAAD,EAAQC,MAAR,KAAmBF,+BAAcE,MAAd,CAHd,EAIJT,KAAD,IAAYU,KAAD,IAAWH,6BAAMG,KAAN,CAJjB,EAKLH,uBALK,CAAP;AAOD;AAED;;;;;AAGA,sBACEV,OADF,EAEEI,OAAoBU,kBAFtB,EAGET,OAA4B,CAACC,CAAD,EAAIS,CAAJ,KAAUA,CAHxC,EAGyC;EAEvC,OAAON,kBACLT,OADK,EAEL,CAACM,CAAD,EAAIC,QAAJ,KAAiB,MAAMA,QAFlB,EAGL,CAACI,KAAD,EAAQC,MAAR,KAAoBC,KAAD,IAAWD,MAAM,CAACD,KAAK,CAACE,KAAD,CAAN,CAH/B,EAIJV,KAAD,IAAYU,KAAD,IAAWV,KAAK,CAACU,KAAD,CAJtB,EAKLT,IALK,EAMLC,IANK,CAAP;AAQD;AAED;;;;;AAGO,MAAMW,iBAAiB,gBAAGC,2BAC/BC,yBAD+B,EAE/B,MAAMA,yBAFyB,EAG/B,CAACC,MAAD,EAASb,CAAT,KAAea,MAHgB,CAA1B;AAMP;;;;;AAGO,MAAMC,kBAAkB,gBAAGC,8CAA3B;AAEP;;;;;AAGO,MAAMC,SAAS,gBAAGL,2BAAmCC,yBAAnC,CAAlB;AAEP;;;;;AAGO,MAAMK,eAAe,gBAAGN,kCAAxB;AAEP;;;;;AAGO,MAAMO,cAAc,gBAAGP,2BAAmCQ,qBAAnC,CAAvB;AAEP;;;;;AAGO,MAAMC,qBAAqB,gBAAGT,2BAA6CU,6BAA7C,CAA9B;AAEP;;;;;AAGO,MAAMC,gBAAgB,gBAAGX,aAA+BY,2BAA/B,CAAzB;AAEP;;;;;AAGO,MAAMC,iBAAiB,gBAAGb,kCAA1B;AAEP;;;;;AAGO,MAAMc,cAAc,gBAAGd,mCAAvB;AAEP;;;;;AAGO,MAAMe,kBAAkB,gBAAGf,aAA4CgB,CAAD,IAAM;EACjF,MAAMA,CAAN;AACD,CAFiC,CAA3B","names":["unsafeMakePatch","unsafeMakeEnvironment","unsafeMake","initial","diff","combine","patch","fork","join","_","newValue","FiberRefInternal","unsafeMakePatch_1","tsplus_module_1","first","second","value","identity","a","forkScopeOverride","unsafeMake_1","tsplus_module_2","parent","currentEnvironment","unsafeMakeEnvironment_1","fiberName","currentLogLevel","currentLogSpan","tsplus_module_5","currentLogAnnotations","tsplus_module_6","currentScheduler","defaultScheduler","currentSupervisor","currentIsFatal","currentReportFatal","t"],"sourceRoot":"","sources":["../../_src/FiberRef/unsafe.ts"],"sourcesContent":[null]}
+{"version":3,"file":"unsafe.cjs","mappings":";;;;;;;;;;;;;;;;;;;;;;;;;;;AAIA;;AAEA;;AAGA;;;;;;MAKgBA,eAAe;;MAmBfC,qBAAqB;;MASrBC,oBAAoB;;MAOpBC,UAAU;;;AAtC1B;;;AAGA,2BACEC,OADF,EAEEC,MAFF,EAGEC,IAHF,EAIEC,OAAoD,CAACC,CAAD,EAAIC,QAAJ,KAAiBA,QAJvE,EAI+E;EAE7E,OAAO,IAAIC,4BAAJ,CACLN,OADK,EAEL,CAACO,QAAD,EAAWF,QAAX,KAAwBJ,MAAM,CAACO,IAAP,CAAYD,QAAZ,EAAsBF,QAAtB,CAFnB,EAGL,CAACI,KAAD,EAAQC,MAAR,KAAmBT,MAAM,CAACU,OAAP,CAAeF,KAAf,EAAsBC,MAAtB,CAHd,EAIJE,KAAD,IAAYL,QAAD,IAAcN,MAAM,CAACW,KAAP,CAAaA,KAAb,EAAoBL,QAApB,CAJpB,EAKLL,IALK,EAMLC,IANK,CAAP;AAQD;AAED;;;;;AAGA,iCACEH,OADF,EACyB;EAEvB,OAAOa,kBAAyBb,OAAzB,EAAkCc,6BAAlC,EAAwDC,uBAAxD,CAAP;AACD;AAED;;;;;AAGA,gCAAqCf,OAArC,EAA6D;EAC3D,OAAOa,kBAAyBb,OAAzB,EAAkCc,4BAAlC,EAAqDE,qBAArD,CAAP;AACD;AAED;;;;;AAGA,sBACEhB,OADF,EAEEE,OAAoBe,kBAFtB,EAGEd,OAA4B,CAACC,CAAD,EAAIc,CAAJ,KAAUA,CAHxC,EAGyC;EAEvC,OAAOL,kBAAyBb,OAAzB,EAAkCc,wBAAlC,EAAmDZ,IAAnD,EAAyDC,IAAzD,CAAP;AACD;AAED;;;;;AAGO,MAAMgB,iBAAiB,gBAAGC,2BAC/BC,yBAD+B,EAE/B,MAAMA,yBAFyB,EAG/B,CAACC,MAAD,EAASlB,CAAT,KAAekB,MAHgB,CAA1B;AAMP;;;;;AAGO,MAAMC,kBAAkB,gBAAGC,8CAA3B;AAEP;;;;;AAGO,MAAMC,SAAS,gBAAGL,2BAAmCC,yBAAnC,CAAlB;AAEP;;;;;AAGO,MAAMK,eAAe,gBAAGN,kCAAxB;AAEP;;;;;AAGO,MAAMO,cAAc,gBAAGP,2BAAmCQ,qBAAnC,CAAvB;AAEP;;;;;AAGO,MAAMC,qBAAqB,gBAAGT,2BAA6CU,6BAA7C,CAA9B;AAEP;;;;;AAGO,MAAMC,gBAAgB,gBAAGX,aAA+BY,2BAA/B,CAAzB;AAEP;;;;;AAGO,MAAMC,iBAAiB,gBAAGC,4CAA1B;AAEP;;;;;AAGO,MAAMC,cAAc,gBAAGf,oCAAvB;AAEP;;;;;AAGO,MAAMgB,kBAAkB,gBAAGhB,aAA4CiB,CAAD,IAAM;EACjF,MAAMA,CAAN;AACD,CAFiC,CAA3B","names":["unsafeMakePatch","unsafeMakeEnvironment","unsafeMakeSupervisor","unsafeMake","initial","differ","fork","join","_","newValue","FiberRefInternal","oldValue","diff","first","second","combine","patch","unsafeMakePatch_1","tsplus_module_1","tsplus_module_2","tsplus_module_3","identity","a","forkScopeOverride","unsafeMake_1","tsplus_module_4","parent","currentEnvironment","unsafeMakeEnvironment_1","fiberName","currentLogLevel","currentLogSpan","tsplus_module_7","currentLogAnnotations","tsplus_module_8","currentScheduler","defaultScheduler","currentSupervisor","unsafeMakeSupervisor_1","currentIsFatal","currentReportFatal","t"],"sourceRoot":"","sources":["../../_src/FiberRef/unsafe.ts"],"sourcesContent":[null]}

package/_cjs/IOEnv/definition.cjs.map

@@ -1 +1 @@
-{"version":3,"file":"definition.cjs","mappings":";;;;;;;;;;;;;;;;;;;;;;;;;AAWO,MAAMA,KAAK,GAAa,EAAxB;AAEP;;;;;AAGO,MAAMC,WAAW,gBAAGC,8HAAaC,oBAAb,EAAaC,wBAAb,GACEC,oBADF,EACEC,yBADF,GAEIC,oBAFJ,EAEIC,0BAFJ,CAApB","names":["IOEnv","environment","tsplus_module_7","tsplus_module_5","tsplus_module_6","tsplus_module_3","tsplus_module_4","tsplus_module_1","tsplus_module_2"],"sourceRoot":"","sources":["../../_src/IOEnv/definition.ts"],"sourcesContent":[null]}
+{"version":3,"file":"definition.cjs","mappings":";;;;;;;;;;;;;;;;;;;;;;;;;AASO,MAAMA,KAAK,GAAa,EAAxB;AAEP;;;;;AAGO,MAAMC,WAAW,gBAAGC,8HAAaC,oBAAb,EAAaC,wBAAb,GACEC,oBADF,EACEC,yBADF,GAEIC,oBAFJ,EAEIC,0BAFJ,CAApB","names":["IOEnv","environment","tsplus_module_7","tsplus_module_5","tsplus_module_6","tsplus_module_3","tsplus_module_4","tsplus_module_1","tsplus_module_2"],"sourceRoot":"","sources":["../../_src/IOEnv/definition.ts"],"sourcesContent":[null]}

package/_cjs/IOEnv/services.cjs.map

@@ -1 +1 @@
-{"version":3,"file":"services.cjs","mappings":";;;;;;;;;AAEA;;;;;;AAEA;;;AAGO,MAAMA,QAAQ,gBAAgEC,sCACnFC,uBADmF,CAA9E","names":["services","tsplus_module_1","environment"],"sourceRoot":"","sources":["../../_src/IOEnv/services.ts"],"sourcesContent":[null]}
+{"version":3,"file":"services.cjs","mappings":";;;;;;;;;AAEA;;;;;;AAEA;;;AAGO,MAAMA,QAAQ,gBAGjBC,sCAA+BC,uBAA/B,CAHG","names":["services","tsplus_module_1","environment"],"sourceRoot":"","sources":["../../_src/IOEnv/services.ts"],"sourcesContent":[null]}