@fncts/io 0.0.24 → 0.0.25

package/_src/TReentrantLock/api.ts

@@ -92,7 +92,7 @@ export function releaseWrite(self: TReentrantLock, __tsplusTrace?: string): USTM
 export function withReadLock<R, E, A>(io: IO<R, E, A>, __tsplusTrace?: string) {
   return (self: TReentrantLock): IO<R, E, A> => {
     return IO.uninterruptibleMask(
-      ({ restore }) => restore(self.acquireRead.commit) > restore(io).ensuring(self.releaseRead.commit),
+      (restore) => restore(self.acquireRead.commit) > restore(io).ensuring(self.releaseRead.commit),
     );
   };
 }
@@ -103,7 +103,7 @@ export function withReadLock<R, E, A>(io: IO<R, E, A>, __tsplusTrace?: string) {
 export function withWriteLock<R, E, A>(io: IO<R, E, A>, __tsplusTrace?: string) {
   return (self: TReentrantLock): IO<R, E, A> => {
     return IO.uninterruptibleMask(
-      ({ restore }) => restore(self.acquireWrite.commit) > restore(io).ensuring(self.releaseWrite.commit),
+      (restore) => restore(self.acquireWrite.commit) > restore(io).ensuring(self.releaseWrite.commit),
     );
   };
 }

package/_src/TSemaphore/api.ts

@@ -56,7 +56,7 @@ export function releaseN(n: number, __tsplusTrace?: string) {
 export function withPermits(self: TSemaphore, __tsplusTrace?: string) {
   return (n: number) =>
     <R, E, A>(io: IO<R, E, A>) =>
-      IO.uninterruptibleMask(({ restore }) =>
+      IO.uninterruptibleMask((restore) =>
         restore(self.acquireN(n).commit).zipRight(restore(io).ensuring(self.releaseN(n).commit)),
       );
 }

package/package.json

@@ -1,6 +1,6 @@
 {
   "name": "@fncts/io",
-  "version": "0.0.24",
+  "version": "0.0.25",
   "dependencies": {
     "@fncts/base": "0.0.23",
     "@fncts/transformers": "0.0.4",

package/FiberRefs/join.d.ts

@@ -1,9 +0,0 @@
-import { FiberId } from "@fncts/base/data/FiberId/definition";
-import { FiberRefs } from "@fncts/io/FiberRefs";
-import { Cons, List } from "@fncts/base/collection/immutable/List/definition";
-import { FiberRef } from "@fncts/io/FiberRef/definition";
-/**
- * @tsplus pipeable fncts.io.FiberRefs join
- * @tsplus location "@fncts/io/FiberRefs/join"
- */
-export declare function join(fiberId: FiberId.Runtime, that: FiberRefs): (self: FiberRefs) => FiberRefs;

package/IO/api/core-scope.d.ts

@@ -1,43 +0,0 @@
-import { Lazy } from "@fncts/base/data/function/definition";
-import { Exit } from "@fncts/base/data/Exit/definition";
-import { Fiber } from "@fncts/io/Fiber/definition";
-import { URIO } from "@fncts/io/IO/definition";
-import type { FiberRuntime } from "@fncts/io/Fiber/FiberRuntime";
-import { IO } from "../definition.js";
-/**
- * @tsplus getter fncts.io.IO daemonChildren
- * @tsplus location "@fncts/io/IO/api/core-scope"
- */
-export declare function daemonChildren<R, E, A>(self: IO<R, E, A>, __tsplusTrace?: string): IO<R, E, A>;
-/**
- * @tsplus pipeable fncts.io.IO raceFibersWith
- * @tsplus location "@fncts/io/IO/api/core-scope"
- */
-export declare function raceFibersWith<R, E, A, R1, E1, B, R2, E2, C, R3, E3, D>(right: Lazy<IO<R1, E1, B>>, leftWins: (winner: FiberRuntime<E, A>, loser: FiberRuntime<E1, B>) => IO<R2, E2, C>, rightWins: (winner: FiberRuntime<E1, B>, loser: FiberRuntime<E, A>) => IO<R3, E3, D>, __tsplusTrace?: string): (left: IO<R, E, A>) => IO<R | R1 | R2 | R3, E2 | E3, C | D>;
-/**
- * Returns an effect that races this effect with the specified effect, calling
- * the specified finisher as soon as one result or the other has been computed.
- * @tsplus pipeable fncts.io.IO raceWith
- * @tsplus location "@fncts/io/IO/api/core-scope"
- */
-export declare function raceWith<R, E, A, R1, E1, A1, R2, E2, A2, R3, E3, A3>(right: Lazy<IO<R1, E1, A1>>, leftWins: (exit: Exit<E, A>, fiber: Fiber<E1, A1>) => IO<R2, E2, A2>, rightWins: (exit: Exit<E1, A1>, fiber: Fiber<E, A>) => IO<R3, E3, A3>, __tsplusTrace?: string): (left: IO<R, E, A>) => IO<R | R1 | R2 | R3, E2 | E3, A2 | A3>;
-export type Grafter = <R, E, A>(effect: IO<R, E, A>) => IO<R, E, A>;
-/**
- * Transplants specified effects so that when those effects fork other
- * effects, the forked effects will be governed by the scope of the
- * fiber that executes this effect.
- *
- * This can be used to "graft" deep grandchildren onto a higher-level
- * scope, effectively extending their lifespans into the parent scope.
- * @tsplus static fncts.io.IOOps transplant
- * @tsplus location "@fncts/io/IO/api/core-scope"
- */
-export declare function transplant<R, E, A>(f: (_: Grafter) => IO<R, E, A>, __tsplusTrace?: string): IO<R, E, A>;
-/**
- * Forks the effect into a new fiber attached to the global scope. Because the
- * new fiber is attached to the global scope, when the fiber executing the
- * returned effect terminates, the forked fiber will continue running.
- * @tsplus getter fncts.io.IO forkDaemon
- * @tsplus location "@fncts/io/IO/api/core-scope"
- */
-export declare function forkDaemon<R, E, A>(ma: IO<R, E, A>, __tsplusTrace?: string): URIO<R, FiberRuntime<E, A>>;

package/_cjs/FiberRefs/join.cjs

@@ -1,104 +0,0 @@
-"use strict";
-
-Object.defineProperty(exports, "__esModule", {
-  value: true
-});
-exports.join = join;
-var tsplus_module_1 = /*#__PURE__*/_interopRequireWildcard( /*#__PURE__*/require("@fncts/io/FiberRefs"));
-var tsplus_module_2 = /*#__PURE__*/_interopRequireWildcard( /*#__PURE__*/require("@fncts/base/data/Equatable/api"));
-var tsplus_module_3 = /*#__PURE__*/_interopRequireWildcard( /*#__PURE__*/require("@fncts/io/FiberRef/api"));
-var tsplus_module_4 = /*#__PURE__*/_interopRequireWildcard( /*#__PURE__*/require("@fncts/base/collection/immutable/List/constructors"));
-var tsplus_module_5 = /*#__PURE__*/_interopRequireWildcard( /*#__PURE__*/require("@fncts/base/collection/immutable/HashMap/api"));
-var tsplus_module_6 = /*#__PURE__*/_interopRequireWildcard( /*#__PURE__*/require("@fncts/base/collection/immutable/List/definition"));
-var tsplus_module_7 = /*#__PURE__*/_interopRequireWildcard( /*#__PURE__*/require("@fncts/base/data/Maybe/destructors"));
-var tsplus_module_8 = /*#__PURE__*/_interopRequireWildcard( /*#__PURE__*/require("@fncts/base/data/number/instances"));
-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; }
-/**
- * @tsplus pipeable fncts.io.FiberRefs join
- */
-function join(fiberId, that) {
-  return self => {
-    const parentFiberRefs = tsplus_module_1.FiberRefs.reverseGet(self);
-    const childFiberRefs = tsplus_module_1.FiberRefs.reverseGet(that);
-    const fiberRefLocals = tsplus_module_5.foldLeftWithIndex(parentFiberRefs, (ref, parentFiberRefs, childStack) => {
-      const childValue = childStack.head[1];
-      if (tsplus_module_2.strictEquals(childStack.head[0], fiberId)) {
-        return parentFiberRefs;
-      }
-      return tsplus_module_7.match(() => {
-        if (tsplus_module_2.strictEquals(childValue, tsplus_module_3.initial(ref))) return parentFiberRefs;
-        return tsplus_module_5.set(ref, tsplus_module_4.cons([fiberId, childValue]))(parentFiberRefs);
-      }, parentStack => {
-        const [ancestor, wasModified] = findAncestor(ref, parentStack, childStack);
-        if (!wasModified) return parentFiberRefs;
-        const patch = tsplus_module_3.diff(ref)(ancestor, childValue);
-        const oldValue = parentStack.head[1];
-        const newValue = tsplus_module_3.join(oldValue, tsplus_module_3.patch(ref)(patch)(oldValue))(ref);
-        if (oldValue === newValue) return parentFiberRefs;
-        let newStack;
-        if (tsplus_module_6.isEmpty(parentStack)) {
-          newStack = tsplus_module_4.cons([fiberId, newValue]);
-        } else {
-          const [parentFiberId] = parentStack.head;
-          if (tsplus_module_2.strictEquals(parentFiberId, fiberId)) {
-            newStack = tsplus_module_4.cons([parentFiberId, newValue], parentStack.tail);
-          } else {
-            newStack = tsplus_module_4.cons([fiberId, newValue], parentStack);
-          }
-        }
-        return tsplus_module_5.set(ref, newStack)(parentFiberRefs);
-      })(tsplus_module_5.get(ref)(parentFiberRefs));
-    })(childFiberRefs);
-    return tsplus_module_1.FiberRefs.get(fiberRefLocals);
-  };
-}
-function compareFiberId(left, right) {
-  const compare = tsplus_module_8.Ord.compare(right.startTime)(left.startTime);
-  return compare === 0 ? tsplus_module_8.Ord.compare(right.id)(left.id) : compare;
-}
-/**
- * @tsplus tailRec
- */
-function findAncestor(ref, parentStack, childStack, childModified = false) {
-  var ref_1 = ref,
-    parentStack_1 = parentStack,
-    childStack_1 = childStack,
-    childModified_1 = childModified;
-  var ref_2 = ref,
-    parentStack_2 = parentStack,
-    childStack_2 = childStack,
-    childModified_2 = childModified;
-  while (1) {
-    if (tsplus_module_6.isNonEmpty(parentStack_1) && tsplus_module_6.isNonEmpty(childStack_1)) {
-      const [parentFiberId] = parentStack_1.head;
-      const [childFiberId, childValue] = childStack_1.head;
-      const compare = compareFiberId(parentFiberId, childFiberId);
-      if (compare < 0) {
-        ref_2 = ref_1;
-        parentStack_2 = parentStack_1;
-        childStack_2 = childStack_1.tail;
-        childModified_2 = true;
-        ref_1 = ref_2;
-        parentStack_1 = parentStack_2;
-        childStack_1 = childStack_2;
-        childModified_1 = childModified_2;
-        continue;
-      } else if (compare > 0) {
-        ref_2 = ref_1;
-        parentStack_2 = parentStack_1.tail;
-        childStack_2 = childStack_1;
-        childModified_2 = childModified_1;
-        ref_1 = ref_2;
-        parentStack_1 = parentStack_2;
-        childStack_1 = childStack_2;
-        childModified_1 = childModified_2;
-        continue;
-      } else {
-        return [childValue, childModified_1];
-      }
-    }
-    return [tsplus_module_3.initial(ref_1), true];
-  }
-}
-//# sourceMappingURL=join.cjs.map

package/_cjs/FiberRefs/join.cjs.map

@@ -1 +0,0 @@
-{"version":3,"file":"join.cjs","mappings":";;;;;;;;;;;;;;;;AAAA;;;AAGM,SAAUA,IAAI,CAACC,OAAwB,EAAEC,IAAe;EAC5D,OAAQC,IAAe,IAAe;IACpC,MAAMC,eAAe,GAAGC,yBAAS,CAACC,UAAU,CAACH,IAAI,CAAC;IAClD,MAAMI,cAAc,GAAIF,yBAAS,CAACC,UAAU,CAACJ,IAAI,CAAC;IAClD,MAAMM,cAAc,GAAIC,kCAAiCL,eAAe,EAAE,CAACM,GAAG,EAAEN,eAAe,EAAEO,UAAU,KAAI;MAC7G,MAAMC,UAAU,GAAGD,UAAU,CAACE,IAAI,CAAC,CAAC,CAAC;MACrC,iCAAIF,UAAU,CAACE,IAAI,CAAC,CAAC,CAAC,EAAIZ,OAAO,GAAE;QACjC,OAAOG,eAAe;;MAExB,OAAOU,sBACL,MAAK;QACH,IAAIC,6BAAuBH,UAAU,0BAAEF,GAAG,EAAS,EAAE,OAAON,eAAe;QAC3E,OAAOK,oBAAoBC,GAAG,EAAEM,qBAAK,CAACf,OAAO,EAAEW,UAAU,CAAU,CAAC,EAA7DR,eAAe,CAA+C;MACvE,CAAC,EACAa,WAAW,IAAI;QACd,MAAM,CAACC,QAAQ,EAAEC,WAAW,CAAC,GAAGC,YAAY,CAACV,GAAG,EAAEO,WAAW,EAAEN,UAAU,CAAC;QAC1E,IAAI,CAACQ,WAAW,EAAE,OAAOf,eAAe;QACxC,MAAMiB,KAAK,GAAMC,wBAAG,EAAMJ,QAAQ,EAAEN,UAAU,CAAC;QAC/C,MAAMW,QAAQ,GAAGN,WAAW,CAACJ,IAAI,CAAC,CAAC,CAAC;QACpC,MAAMW,QAAQ,GAAGF,qBAASC,QAAQ,EAAED,yBAAG,EAAOD,KAAK,CAAC,CAACE,QAAQ,CAAC,EAA7Cb,GAAG,CAA2C;QAC/D,IAAIa,QAAQ,KAAKC,QAAQ,EAAE,OAAOpB,eAAe;QACjD,IAAIqB,QAAmD;QACvD,IAAIC,mCAAW,CAAU,EAAE;UACzBD,QAAQ,GAAGT,qBAAK,CAACf,OAAO,EAAEuB,QAAQ,CAAU,CAAC;SAC9C,MAAM;UACL,MAAM,CAACG,aAAa,CAAC,GAAGV,WAAW,CAACJ,IAAI;UACxC,iCAAIc,aAAa,EAAI1B,OAAO,GAAE;YAC5BwB,QAAQ,GAAGT,qBAAK,CAACW,aAAa,EAAEH,QAAQ,CAAC,EAAEP,WAAW,CAACW,IAAI,CAAC;WAC7D,MAAM;YACLH,QAAQ,GAAGT,qBAAK,CAACf,OAAO,EAAEuB,QAAQ,CAAC,EAAEP,WAAW,CAAC;;;QAGrD,OAAOR,oBAAoBC,GAAG,EAAEe,QAAQ,EAAjCrB,eAAe,CAAmB;MAC3C,CAAC,EAxBIK,oBAAoBC,GAAG,EAAvBN,eAAe,CAAS,CAyB9B;IACH,CAAC,EA/BuBG,cAAc,CA+BpC;IACF,OAAOF,yBAAS,CAACwB,GAAG,CAACrB,cAAc,CAAC;EACtC,CAAC;AACH;AAEA,SAASsB,cAAc,CAACC,IAAqB,EAAEC,KAAsB;EACnE,MAAMC,OAAO,GAAGC,oBAAWD,OAAO,CAACD,KAAK,CAACG,SAAS,CAAC,CAACJ,IAAI,CAACI,SAAS,CAAC;EACnE,OAAOF,OAAO,KAAK,CAAC,GAAGC,oBAAWD,OAAO,CAACD,KAAK,CAACI,EAAE,CAAC,CAACL,IAAI,CAACK,EAAE,CAAC,GAAGH,OAAO;AACxE;AAEA;;;AAGA,SAASb,YAAY,CACnBV,GAAkB,EAClBO,WAAkD,EAClDN,UAAiD,EACjD0B,aAAa,GAAG,KAAK;cAHrB3B;IAAA4B,gBACArB;IAAAsB,eACA5B;IAAA6B,kBACAH,aAAa;cAHb3B;IAAA+B,gBACAxB;IAAAyB,eACA/B;IAAAgC,kBACAN,aAAa;YACY;IACzB,IAAIX,yCAAwB,IAAIA,wCAAuB,EAAE;MACvD,MAAM,CAACC,aAAa,CAAC,GAAcW,cAAYzB,IAAI;MACnD,MAAM,CAAC+B,YAAY,EAAEhC,UAAU,CAAC,GAAG2B,aAAW1B,IAAI;MAClD,MAAMoB,OAAO,GAAsBH,cAAc,CAACH,aAAa,EAAEiB,YAAY,CAAC;MAC9E,IAAIX,OAAO,GAAG,CAAC,EAAE;;;uBACuBM,aAAWX,IAAI;0BAAE,IAAI;;;;;;OAC5D,MAAM,IAAIK,OAAO,GAAG,CAAC,EAAE;;wBACGK,cAAYV,IAAI;;;;;;;;OAC1C,MAAM;QACL,OAAO,CAAChB,UAAU,kBAAgB;;;IAGtC,OAAO,iCAAc,IAAI,CAAC","names":["join","fiberId","that","self","parentFiberRefs","tsplus_module_1","reverseGet","childFiberRefs","fiberRefLocals","tsplus_module_5","ref","childStack","childValue","head","tsplus_module_7","tsplus_module_2","tsplus_module_4","parentStack","ancestor","wasModified","findAncestor","patch","tsplus_module_3","oldValue","newValue","newStack","tsplus_module_6","parentFiberId","tail","get","compareFiberId","left","right","compare","tsplus_module_8","startTime","id","childModified","parentStack_1","childStack_1","childModified_1","parentStack_2","childStack_2","childModified_2","childFiberId"],"sourceRoot":"","sources":["../../_src/FiberRefs/join.ts"],"sourcesContent":[null]}

package/_cjs/IO/api/core-scope.cjs.map

@@ -1 +0,0 @@
-{"version":3,"file":"core-scope.cjs","mappings":";;;;;;;;;;;;;;;;;AAGA;AAAmE;AAAA;MASnDA,cAAc;AAAA;MAOdC,cAAc;AAAA;AAV9B;;;AAGA,0BAAwCC,IAAiB,EAAEC,aAAsB;EAC/E,OAAOC,2DAAmCC,4CAAuB,EADRF,cACS,CAACD,IAAI,CAAC;AAC1E;AAEA;;;AAGA,0BACEI,KAA0B,EAC1BC,QAAmF,EACnFC,SAAoF,EACpFL,aAAsB;EAEtB,OAAQM,IAAiB,IAA0C;IACjE,OAAOC,iCAAoB,CAACC,WAAW,EAAEC,YAAY,KAAI;MACvD,MAAMC,MAAM,GAAeP,KAAK,EAAE;MAClC,MAAMQ,kBAAkB,GAAGF,YAAY,CAACG,YAAY;MACpD,SAASC,QAAQ,CACfC,MAA2B,EAC3BC,KAA0B,EAC1BC,IAAgF,EAChFC,EAAiB,EACjBC,EAA6B;QAE7B,IAAID,EAAE,CAACE,aAAa,CAAC,IAAI,EAAE,KAAK,CAAC,EAAE;UACjCD,EAAE,CAACF,IAAI,CAACF,MAAM,EAAEC,KAAK,CAAC,CAAC;;MAE3B;MAEA,MAAMK,aAAa,GAAG,IAAIC,4BAAa,CAAC,IAAI,CAAC;MAC7C,MAAMC,SAAS,GAAO,wCAAoB,EAAChB,IAAI,EAAEE,WAAW,EAAEG,kBAAkB,EAAE,IAAI,EAAEX,aAAa,CAAC;MACtG,MAAMuB,UAAU,GAAM,wCAAoB,EAACb,MAAM,EAAEF,WAAW,EAAEG,kBAAkB,EAAE,IAAI,EAAEX,aAAa,CAAC;MACxGsB,SAAS,CAACE,WAAW,oCAA6BtB,qBAAKM,WAAW,CAACiB,KAAK,CAAC,CAAC;MAC1EF,UAAU,CAACC,WAAW,oCAA6BtB,qBAAKM,WAAW,CAACiB,KAAK,CAAC,CAAC;MAE3E,OAAOlB,sBAAUW,EAAE,IAAI;QACrBI,SAAS,CAACI,WAAW,CAAC,MAAMb,QAAQ,CAACS,SAAS,EAAEC,UAAU,EAAEnB,QAAQ,EAAEgB,aAAa,EAAEF,EAAE,CAAC,CAAC;QACzFK,UAAU,CAACG,WAAW,CAAC,MAAMb,QAAQ,CAACU,UAAU,EAAED,SAAS,EAAEjB,SAAS,EAAEe,aAAa,EAAEF,EAAE,CAAC,CAAC;QAC3FI,SAAS,CAACK,SAAS,CAACrB,IAAI,CAAC;QACzBiB,UAAU,CAACI,SAAS,CAACjB,MAAM,CAAC;MAC9B,CAAC,CAAC;IACJ,CAAC,EA9BHV,cA8BI;EACJ,CAAC;AACH;AAEA;;;;;;AAMM,SAAU4B,QAAQ,CACtBzB,KAA2B,EAC3BC,QAAoE,EACpEC,SAAqE,EACrEL,aAAsB;EAEtB,OAAQM,IAAiB,IAA4C;IACnE,OAAOuB,iBACL1B,KAAK,EACL,CAACW,MAAM,EAAEC,KAAK,KACZR,wBAAsBuB,IAAI,IAAI;MAC5B,QAAQA,IAAI,CAACC,IAAI;QACf;UACE,OAAOxB,wBAA0B,MAAMH,QAAQ,CAAC0B,IAAI,EAAEf,KAAK,CAAC,EATxEf,eASmBc,MAAM,CAACkB,UAAU,CAAqC;QAC/D;UACE,OAAO5B,QAAQ,CAAC0B,IAAI,EAAEf,KAAK,CAAC;MAAC;IAEnC,CAAC,EAbPf,eAMMc,MAAM,CAACmB,KAAK,CAOV,EACJ,CAACnB,MAAM,EAAEC,KAAK,KACZR,wBAAsBuB,IAAI,IAAI;MAC5B,QAAQA,IAAI,CAACC,IAAI;QACf;UACE,OAAOxB,wBAA0B,MAAMF,SAAS,CAACyB,IAAI,EAAEf,KAAK,CAAC,EAlBzEf,eAkBmBc,MAAM,CAACkB,UAAU,CAAsC;QAChE;UACE,OAAO3B,SAAS,CAACyB,IAAI,EAAEf,KAAK,CAAC;MAAC;IAEpC,CAAC,EAtBPf,eAeMc,MAAM,CAACmB,KAAK,CAOV,EAtBRjC,eAGSM,IAAI,CAoBV;EACH,CAAC;AACH;AAIA;;;;;;;;;;AAUM,SAAU4B,UAAU,CAAUC,CAA8B,EAAEnC,aAAsB;EACxF,OAAOO,iCAAqB6B,UAAU,IAAI;IACxC,MAAMC,aAAa,GAAGD,UAAU,CAACE,WAAW,mCAA4B;IACxE,MAAMb,KAAK,GAAWc,gCAAwBH,UAAU,CAACX,KAAK,EAAxCY,aAAa,CAA4B;IAC/D,OAAOF,CAAC,CAAClC,2DAAmCC,qBAAKuB,KAAK,CAAC,EAJSzB,cAIR,CAAC;EAC3D,CAAC,EALiEA,cAKhE;AACJ;AAEA;;;;;;;AAOM,SAAUwC,UAAU,CAAUC,EAAe,EAAEzC,aAAsB;EACzE,6CAAOyC,EAAE,EAD0CzC;AAErD","names":["daemonChildren","raceFibersWith","self","__tsplusTrace","tsplus_module_4","tsplus_module_2","right","leftWins","rightWins","left","tsplus_module_5","parentState","parentStatus","right0","parentRuntimeFlags","runtimeFlags","complete","winner","loser","cont","ab","cb","compareAndSet","raceIndicator","AtomicBoolean","leftFiber","rightFiber","setFiberRef","scope","addObserver","startFork","raceWith","raceFibersWith_1","exit","_tag","inheritAll","await","transplant","f","fiberState","scopeOverride","getFiberRef","tsplus_module_6","forkDaemon","ma"],"sourceRoot":"","sources":["../../../_src/IO/api/core-scope.ts"],"sourcesContent":[null]}

package/_mjs/FiberRefs/join.mjs

@@ -1,96 +0,0 @@
-import * as tsplus_module_1 from "@fncts/io/FiberRefs";
-import * as tsplus_module_2 from "@fncts/base/data/Equatable/api";
-import * as tsplus_module_3 from "@fncts/io/FiberRef/api";
-import * as tsplus_module_4 from "@fncts/base/collection/immutable/List/constructors";
-import * as tsplus_module_5 from "@fncts/base/collection/immutable/HashMap/api";
-import * as tsplus_module_6 from "@fncts/base/collection/immutable/List/definition";
-import * as tsplus_module_7 from "@fncts/base/data/Maybe/destructors";
-import * as tsplus_module_8 from "@fncts/base/data/number/instances";
-/**
- * @tsplus pipeable fncts.io.FiberRefs join
- */
-export function join(fiberId, that) {
-  return self => {
-    const parentFiberRefs = tsplus_module_1.FiberRefs.reverseGet(self);
-    const childFiberRefs = tsplus_module_1.FiberRefs.reverseGet(that);
-    const fiberRefLocals = tsplus_module_5.foldLeftWithIndex(parentFiberRefs, (ref, parentFiberRefs, childStack) => {
-      const childValue = childStack.head[1];
-      if (tsplus_module_2.strictEquals(childStack.head[0], fiberId)) {
-        return parentFiberRefs;
-      }
-      return tsplus_module_7.match(() => {
-        if (tsplus_module_2.strictEquals(childValue, tsplus_module_3.initial(ref))) return parentFiberRefs;
-        return tsplus_module_5.set(ref, tsplus_module_4.cons([fiberId, childValue]))(parentFiberRefs);
-      }, parentStack => {
-        const [ancestor, wasModified] = findAncestor(ref, parentStack, childStack);
-        if (!wasModified) return parentFiberRefs;
-        const patch = tsplus_module_3.diff(ref)(ancestor, childValue);
-        const oldValue = parentStack.head[1];
-        const newValue = tsplus_module_3.join(oldValue, tsplus_module_3.patch(ref)(patch)(oldValue))(ref);
-        if (oldValue === newValue) return parentFiberRefs;
-        let newStack;
-        if (tsplus_module_6.isEmpty(parentStack)) {
-          newStack = tsplus_module_4.cons([fiberId, newValue]);
-        } else {
-          const [parentFiberId] = parentStack.head;
-          if (tsplus_module_2.strictEquals(parentFiberId, fiberId)) {
-            newStack = tsplus_module_4.cons([parentFiberId, newValue], parentStack.tail);
-          } else {
-            newStack = tsplus_module_4.cons([fiberId, newValue], parentStack);
-          }
-        }
-        return tsplus_module_5.set(ref, newStack)(parentFiberRefs);
-      })(tsplus_module_5.get(ref)(parentFiberRefs));
-    })(childFiberRefs);
-    return tsplus_module_1.FiberRefs.get(fiberRefLocals);
-  };
-}
-function compareFiberId(left, right) {
-  const compare = tsplus_module_8.Ord.compare(right.startTime)(left.startTime);
-  return compare === 0 ? tsplus_module_8.Ord.compare(right.id)(left.id) : compare;
-}
-/**
- * @tsplus tailRec
- */
-function findAncestor(ref, parentStack, childStack, childModified = false) {
-  var ref_1 = ref,
-    parentStack_1 = parentStack,
-    childStack_1 = childStack,
-    childModified_1 = childModified;
-  var ref_2 = ref,
-    parentStack_2 = parentStack,
-    childStack_2 = childStack,
-    childModified_2 = childModified;
-  while (1) {
-    if (tsplus_module_6.isNonEmpty(parentStack_1) && tsplus_module_6.isNonEmpty(childStack_1)) {
-      const [parentFiberId] = parentStack_1.head;
-      const [childFiberId, childValue] = childStack_1.head;
-      const compare = compareFiberId(parentFiberId, childFiberId);
-      if (compare < 0) {
-        ref_2 = ref_1;
-        parentStack_2 = parentStack_1;
-        childStack_2 = childStack_1.tail;
-        childModified_2 = true;
-        ref_1 = ref_2;
-        parentStack_1 = parentStack_2;
-        childStack_1 = childStack_2;
-        childModified_1 = childModified_2;
-        continue;
-      } else if (compare > 0) {
-        ref_2 = ref_1;
-        parentStack_2 = parentStack_1.tail;
-        childStack_2 = childStack_1;
-        childModified_2 = childModified_1;
-        ref_1 = ref_2;
-        parentStack_1 = parentStack_2;
-        childStack_1 = childStack_2;
-        childModified_1 = childModified_2;
-        continue;
-      } else {
-        return [childValue, childModified_1];
-      }
-    }
-    return [tsplus_module_3.initial(ref_1), true];
-  }
-}
-//# sourceMappingURL=join.mjs.map

package/_mjs/FiberRefs/join.mjs.map

@@ -1 +0,0 @@
-{"version":3,"file":"join.mjs","mappings":";;;;;;;;AAAA;;;AAGA,OAAM,SAAUA,IAAI,CAACC,OAAwB,EAAEC,IAAe;EAC5D,OAAQC,IAAe,IAAe;IACpC,MAAMC,eAAe,GAAGC,yBAAS,CAACC,UAAU,CAACH,IAAI,CAAC;IAClD,MAAMI,cAAc,GAAIF,yBAAS,CAACC,UAAU,CAACJ,IAAI,CAAC;IAClD,MAAMM,cAAc,GAAIC,kCAAiCL,eAAe,EAAE,CAACM,GAAG,EAAEN,eAAe,EAAEO,UAAU,KAAI;MAC7G,MAAMC,UAAU,GAAGD,UAAU,CAACE,IAAI,CAAC,CAAC,CAAC;MACrC,iCAAIF,UAAU,CAACE,IAAI,CAAC,CAAC,CAAC,EAAIZ,OAAO,GAAE;QACjC,OAAOG,eAAe;;MAExB,OAAOU,sBACL,MAAK;QACH,IAAIC,6BAAuBH,UAAU,0BAAEF,GAAG,EAAS,EAAE,OAAON,eAAe;QAC3E,OAAOK,oBAAoBC,GAAG,EAAEM,qBAAK,CAACf,OAAO,EAAEW,UAAU,CAAU,CAAC,EAA7DR,eAAe,CAA+C;MACvE,CAAC,EACAa,WAAW,IAAI;QACd,MAAM,CAACC,QAAQ,EAAEC,WAAW,CAAC,GAAGC,YAAY,CAACV,GAAG,EAAEO,WAAW,EAAEN,UAAU,CAAC;QAC1E,IAAI,CAACQ,WAAW,EAAE,OAAOf,eAAe;QACxC,MAAMiB,KAAK,GAAMC,wBAAG,EAAMJ,QAAQ,EAAEN,UAAU,CAAC;QAC/C,MAAMW,QAAQ,GAAGN,WAAW,CAACJ,IAAI,CAAC,CAAC,CAAC;QACpC,MAAMW,QAAQ,GAAGF,qBAASC,QAAQ,EAAED,yBAAG,EAAOD,KAAK,CAAC,CAACE,QAAQ,CAAC,EAA7Cb,GAAG,CAA2C;QAC/D,IAAIa,QAAQ,KAAKC,QAAQ,EAAE,OAAOpB,eAAe;QACjD,IAAIqB,QAAmD;QACvD,IAAIC,mCAAW,CAAU,EAAE;UACzBD,QAAQ,GAAGT,qBAAK,CAACf,OAAO,EAAEuB,QAAQ,CAAU,CAAC;SAC9C,MAAM;UACL,MAAM,CAACG,aAAa,CAAC,GAAGV,WAAW,CAACJ,IAAI;UACxC,iCAAIc,aAAa,EAAI1B,OAAO,GAAE;YAC5BwB,QAAQ,GAAGT,qBAAK,CAACW,aAAa,EAAEH,QAAQ,CAAC,EAAEP,WAAW,CAACW,IAAI,CAAC;WAC7D,MAAM;YACLH,QAAQ,GAAGT,qBAAK,CAACf,OAAO,EAAEuB,QAAQ,CAAC,EAAEP,WAAW,CAAC;;;QAGrD,OAAOR,oBAAoBC,GAAG,EAAEe,QAAQ,EAAjCrB,eAAe,CAAmB;MAC3C,CAAC,EAxBIK,oBAAoBC,GAAG,EAAvBN,eAAe,CAAS,CAyB9B;IACH,CAAC,EA/BuBG,cAAc,CA+BpC;IACF,OAAOF,yBAAS,CAACwB,GAAG,CAACrB,cAAc,CAAC;EACtC,CAAC;AACH;AAEA,SAASsB,cAAc,CAACC,IAAqB,EAAEC,KAAsB;EACnE,MAAMC,OAAO,GAAGC,oBAAWD,OAAO,CAACD,KAAK,CAACG,SAAS,CAAC,CAACJ,IAAI,CAACI,SAAS,CAAC;EACnE,OAAOF,OAAO,KAAK,CAAC,GAAGC,oBAAWD,OAAO,CAACD,KAAK,CAACI,EAAE,CAAC,CAACL,IAAI,CAACK,EAAE,CAAC,GAAGH,OAAO;AACxE;AAEA;;;AAGA,SAASb,YAAY,CACnBV,GAAkB,EAClBO,WAAkD,EAClDN,UAAiD,EACjD0B,aAAa,GAAG,KAAK;cAHrB3B;IAAA4B,gBACArB;IAAAsB,eACA5B;IAAA6B,kBACAH,aAAa;cAHb3B;IAAA+B,gBACAxB;IAAAyB,eACA/B;IAAAgC,kBACAN,aAAa;YACY;IACzB,IAAIX,yCAAwB,IAAIA,wCAAuB,EAAE;MACvD,MAAM,CAACC,aAAa,CAAC,GAAcW,cAAYzB,IAAI;MACnD,MAAM,CAAC+B,YAAY,EAAEhC,UAAU,CAAC,GAAG2B,aAAW1B,IAAI;MAClD,MAAMoB,OAAO,GAAsBH,cAAc,CAACH,aAAa,EAAEiB,YAAY,CAAC;MAC9E,IAAIX,OAAO,GAAG,CAAC,EAAE;;;uBACuBM,aAAWX,IAAI;0BAAE,IAAI;;;;;;OAC5D,MAAM,IAAIK,OAAO,GAAG,CAAC,EAAE;;wBACGK,cAAYV,IAAI;;;;;;;;OAC1C,MAAM;QACL,OAAO,CAAChB,UAAU,kBAAgB;;;IAGtC,OAAO,iCAAc,IAAI,CAAC","names":["join","fiberId","that","self","parentFiberRefs","tsplus_module_1","reverseGet","childFiberRefs","fiberRefLocals","tsplus_module_5","ref","childStack","childValue","head","tsplus_module_7","tsplus_module_2","tsplus_module_4","parentStack","ancestor","wasModified","findAncestor","patch","tsplus_module_3","oldValue","newValue","newStack","tsplus_module_6","parentFiberId","tail","get","compareFiberId","left","right","compare","tsplus_module_8","startTime","id","childModified","parentStack_1","childStack_1","childModified_1","parentStack_2","childStack_2","childModified_2","childFiberId"],"sourceRoot":"","sources":["../../_src/FiberRefs/join.ts"],"sourcesContent":[null]}

package/_mjs/IO/api/core-scope.mjs

@@ -1,97 +0,0 @@
-import * as tsplus_module_1 from "@fncts/io/FiberScope/constructors";
-import * as tsplus_module_2 from "@fncts/base/data/Maybe/constructors";
-import * as tsplus_module_3 from "@fncts/io/FiberRef/unsafe";
-import * as tsplus_module_4 from "@fncts/io/FiberRef/api";
-import * as tsplus_module_5 from "@fncts/io/IO/api";
-import * as tsplus_module_6 from "@fncts/base/data/Maybe/api";
-import * as tsplus_module_7 from "@fncts/io/IO/api/fork";
-export const daemonChildren = daemonChildren_1;
-export const raceFibersWith = raceFibersWith_1;
-import { AtomicBoolean } from "@fncts/base/internal/AtomicBoolean";
-import { unsafeMakeChildFiber } from "@fncts/io/IO/api/fork";
-/**
- * @tsplus getter fncts.io.IO daemonChildren
- */
-function daemonChildren_1(self, __tsplusTrace) {
-  return tsplus_module_4.locally(tsplus_module_3.forkScopeOverride, tsplus_module_2.just(tsplus_module_1.global), __tsplusTrace)(self);
-}
-/**
- * @tsplus pipeable fncts.io.IO raceFibersWith
- */
-function raceFibersWith_1(right, leftWins, rightWins, __tsplusTrace) {
-  return left => {
-    return tsplus_module_5.withFiberRuntime((parentState, parentStatus) => {
-      const right0 = right();
-      const parentRuntimeFlags = parentStatus.runtimeFlags;
-      function complete(winner, loser, cont, ab, cb) {
-        if (ab.compareAndSet(true, false)) {
-          cb(cont(winner, loser));
-        }
-      }
-      const raceIndicator = new AtomicBoolean(true);
-      const leftFiber = unsafeMakeChildFiber(left, parentState, parentRuntimeFlags, null, __tsplusTrace);
-      const rightFiber = unsafeMakeChildFiber(right0, parentState, parentRuntimeFlags, null, __tsplusTrace);
-      leftFiber.setFiberRef(tsplus_module_3.forkScopeOverride, tsplus_module_2.just(parentState.scope));
-      rightFiber.setFiberRef(tsplus_module_3.forkScopeOverride, tsplus_module_2.just(parentState.scope));
-      return tsplus_module_5.async(cb => {
-        leftFiber.addObserver(() => complete(leftFiber, rightFiber, leftWins, raceIndicator, cb));
-        rightFiber.addObserver(() => complete(rightFiber, leftFiber, rightWins, raceIndicator, cb));
-        leftFiber.startFork(left);
-        rightFiber.startFork(right0);
-      });
-    }, __tsplusTrace);
-  };
-}
-/**
- * Returns an effect that races this effect with the specified effect, calling
- * the specified finisher as soon as one result or the other has been computed.
- *
- * @tsplus pipeable fncts.io.IO raceWith
- */
-export function raceWith(right, leftWins, rightWins, __tsplusTrace) {
-  return left => {
-    return raceFibersWith_1(right, (winner, loser) => tsplus_module_5.flatMap(exit => {
-      switch (exit._tag) {
-        case "Success" /* ExitTag.Success */:
-          return tsplus_module_5.flatMap(() => leftWins(exit, loser), __tsplusTrace)(winner.inheritAll);
-        case "Failure" /* ExitTag.Failure */:
-          return leftWins(exit, loser);
-      }
-    }, __tsplusTrace)(winner.await), (winner, loser) => tsplus_module_5.flatMap(exit => {
-      switch (exit._tag) {
-        case "Success" /* ExitTag.Success */:
-          return tsplus_module_5.flatMap(() => rightWins(exit, loser), __tsplusTrace)(winner.inheritAll);
-        case "Failure" /* ExitTag.Failure */:
-          return rightWins(exit, loser);
-      }
-    }, __tsplusTrace)(winner.await), __tsplusTrace)(left);
-  };
-}
-/**
- * Transplants specified effects so that when those effects fork other
- * effects, the forked effects will be governed by the scope of the
- * fiber that executes this effect.
- *
- * This can be used to "graft" deep grandchildren onto a higher-level
- * scope, effectively extending their lifespans into the parent scope.
- *
- * @tsplus static fncts.io.IOOps transplant
- */
-export function transplant(f, __tsplusTrace) {
-  return tsplus_module_5.withFiberRuntime(fiberState => {
-    const scopeOverride = fiberState.getFiberRef(tsplus_module_3.forkScopeOverride);
-    const scope = tsplus_module_6.getOrElse(() => fiberState.scope)(scopeOverride);
-    return f(tsplus_module_4.locally(tsplus_module_3.forkScopeOverride, tsplus_module_2.just(scope), __tsplusTrace));
-  }, __tsplusTrace);
-}
-/**
- * Forks the effect into a new fiber attached to the global scope. Because the
- * new fiber is attached to the global scope, when the fiber executing the
- * returned effect terminates, the forked fiber will continue running.
- *
- * @tsplus getter fncts.io.IO forkDaemon
- */
-export function forkDaemon(ma, __tsplusTrace) {
-  return daemonChildren_1(tsplus_module_7.fork(ma, __tsplusTrace), __tsplusTrace);
-}
-//# sourceMappingURL=core-scope.mjs.map

package/_mjs/IO/api/core-scope.mjs.map

@@ -1 +0,0 @@
-{"version":3,"file":"core-scope.mjs","mappings":";;;;;;;aAYgBA,cAAc;aAOdC,cAAc;AAhB9B,SAASC,aAAa,QAAQ,oCAAoC;AAClE,SAASC,oBAAoB,QAAQ,uBAAuB;AAK5D;;;AAGA,0BAAwCC,IAAiB,EAAEC,aAAsB;EAC/E,OAAOC,2DAAmCC,4CAAuB,EADRF,cACS,CAACD,IAAI,CAAC;AAC1E;AAEA;;;AAGA,0BACEI,KAA0B,EAC1BC,QAAmF,EACnFC,SAAoF,EACpFL,aAAsB;EAEtB,OAAQM,IAAiB,IAA0C;IACjE,OAAOC,iCAAoB,CAACC,WAAW,EAAEC,YAAY,KAAI;MACvD,MAAMC,MAAM,GAAeP,KAAK,EAAE;MAClC,MAAMQ,kBAAkB,GAAGF,YAAY,CAACG,YAAY;MACpD,SAASC,QAAQ,CACfC,MAA2B,EAC3BC,KAA0B,EAC1BC,IAAgF,EAChFC,EAAiB,EACjBC,EAA6B;QAE7B,IAAID,EAAE,CAACE,aAAa,CAAC,IAAI,EAAE,KAAK,CAAC,EAAE;UACjCD,EAAE,CAACF,IAAI,CAACF,MAAM,EAAEC,KAAK,CAAC,CAAC;;MAE3B;MAEA,MAAMK,aAAa,GAAG,IAAIvB,aAAa,CAAC,IAAI,CAAC;MAC7C,MAAMwB,SAAS,GAAOvB,oBAAoB,CAACQ,IAAI,EAAEE,WAAW,EAAEG,kBAAkB,EAAE,IAAI,EAAEX,aAAa,CAAC;MACtG,MAAMsB,UAAU,GAAMxB,oBAAoB,CAACY,MAAM,EAAEF,WAAW,EAAEG,kBAAkB,EAAE,IAAI,EAAEX,aAAa,CAAC;MACxGqB,SAAS,CAACE,WAAW,oCAA6BrB,qBAAKM,WAAW,CAACgB,KAAK,CAAC,CAAC;MAC1EF,UAAU,CAACC,WAAW,oCAA6BrB,qBAAKM,WAAW,CAACgB,KAAK,CAAC,CAAC;MAE3E,OAAOjB,sBAAUW,EAAE,IAAI;QACrBG,SAAS,CAACI,WAAW,CAAC,MAAMZ,QAAQ,CAACQ,SAAS,EAAEC,UAAU,EAAElB,QAAQ,EAAEgB,aAAa,EAAEF,EAAE,CAAC,CAAC;QACzFI,UAAU,CAACG,WAAW,CAAC,MAAMZ,QAAQ,CAACS,UAAU,EAAED,SAAS,EAAEhB,SAAS,EAAEe,aAAa,EAAEF,EAAE,CAAC,CAAC;QAC3FG,SAAS,CAACK,SAAS,CAACpB,IAAI,CAAC;QACzBgB,UAAU,CAACI,SAAS,CAAChB,MAAM,CAAC;MAC9B,CAAC,CAAC;IACJ,CAAC,EA9BHV,cA8BI;EACJ,CAAC;AACH;AAEA;;;;;;AAMA,OAAM,SAAU2B,QAAQ,CACtBxB,KAA2B,EAC3BC,QAAoE,EACpEC,SAAqE,EACrEL,aAAsB;EAEtB,OAAQM,IAAiB,IAA4C;IACnE,OAAOsB,iBACLzB,KAAK,EACL,CAACW,MAAM,EAAEC,KAAK,KACZR,wBAAsBsB,IAAI,IAAI;MAC5B,QAAQA,IAAI,CAACC,IAAI;QACf;UACE,OAAOvB,wBAA0B,MAAMH,QAAQ,CAACyB,IAAI,EAAEd,KAAK,CAAC,EATxEf,eASmBc,MAAM,CAACiB,UAAU,CAAqC;QAC/D;UACE,OAAO3B,QAAQ,CAACyB,IAAI,EAAEd,KAAK,CAAC;MAAC;IAEnC,CAAC,EAbPf,eAMMc,MAAM,CAACkB,KAAK,CAOV,EACJ,CAAClB,MAAM,EAAEC,KAAK,KACZR,wBAAsBsB,IAAI,IAAI;MAC5B,QAAQA,IAAI,CAACC,IAAI;QACf;UACE,OAAOvB,wBAA0B,MAAMF,SAAS,CAACwB,IAAI,EAAEd,KAAK,CAAC,EAlBzEf,eAkBmBc,MAAM,CAACiB,UAAU,CAAsC;QAChE;UACE,OAAO1B,SAAS,CAACwB,IAAI,EAAEd,KAAK,CAAC;MAAC;IAEpC,CAAC,EAtBPf,eAeMc,MAAM,CAACkB,KAAK,CAOV,EAtBRhC,eAGSM,IAAI,CAoBV;EACH,CAAC;AACH;AAIA;;;;;;;;;;AAUA,OAAM,SAAU2B,UAAU,CAAUC,CAA8B,EAAElC,aAAsB;EACxF,OAAOO,iCAAqB4B,UAAU,IAAI;IACxC,MAAMC,aAAa,GAAGD,UAAU,CAACE,WAAW,mCAA4B;IACxE,MAAMb,KAAK,GAAWc,gCAAwBH,UAAU,CAACX,KAAK,EAAxCY,aAAa,CAA4B;IAC/D,OAAOF,CAAC,CAACjC,2DAAmCC,qBAAKsB,KAAK,CAAC,EAJSxB,cAIR,CAAC;EAC3D,CAAC,EALiEA,cAKhE;AACJ;AAEA;;;;;;;AAOA,OAAM,SAAUuC,UAAU,CAAUC,EAAe,EAAExC,aAAsB;EACzE,6CAAOwC,EAAE,EAD0CxC;AAErD","names":["daemonChildren","raceFibersWith","AtomicBoolean","unsafeMakeChildFiber","self","__tsplusTrace","tsplus_module_4","tsplus_module_2","right","leftWins","rightWins","left","tsplus_module_5","parentState","parentStatus","right0","parentRuntimeFlags","runtimeFlags","complete","winner","loser","cont","ab","cb","compareAndSet","raceIndicator","leftFiber","rightFiber","setFiberRef","scope","addObserver","startFork","raceWith","raceFibersWith_1","exit","_tag","inheritAll","await","transplant","f","fiberState","scopeOverride","getFiberRef","tsplus_module_6","forkDaemon","ma"],"sourceRoot":"","sources":["../../../_src/IO/api/core-scope.ts"],"sourcesContent":[null]}

package/_src/FiberRefs/join.ts

@@ -1,71 +0,0 @@
-/**
- * @tsplus pipeable fncts.io.FiberRefs join
- */
-export function join(fiberId: FiberId.Runtime, that: FiberRefs) {
-  return (self: FiberRefs): FiberRefs => {
-    const parentFiberRefs = FiberRefs.reverseGet(self);
-    const childFiberRefs  = FiberRefs.reverseGet(that);
-    const fiberRefLocals  = childFiberRefs.foldLeftWithIndex(parentFiberRefs, (ref, parentFiberRefs, childStack) => {
-      const childValue = childStack.head[1];
-      if (childStack.head[0] == fiberId) {
-        return parentFiberRefs;
-      }
-      return parentFiberRefs.get(ref).match(
-        () => {
-          if (Equatable.strictEquals(childValue, ref.initial)) return parentFiberRefs;
-          return parentFiberRefs.set(ref, Cons([fiberId, childValue] as const));
-        },
-        (parentStack) => {
-          const [ancestor, wasModified] = findAncestor(ref, parentStack, childStack);
-          if (!wasModified) return parentFiberRefs;
-          const patch    = ref.diff(ancestor, childValue);
-          const oldValue = parentStack.head[1];
-          const newValue = ref.join(oldValue, ref.patch(patch)(oldValue));
-          if (oldValue === newValue) return parentFiberRefs;
-          let newStack: Cons<readonly [FiberId.Runtime, unknown]>;
-          if (parentStack.isEmpty()) {
-            newStack = Cons([fiberId, newValue] as const);
-          } else {
-            const [parentFiberId] = parentStack.head;
-            if (parentFiberId == fiberId) {
-              newStack = Cons([parentFiberId, newValue], parentStack.tail);
-            } else {
-              newStack = Cons([fiberId, newValue], parentStack);
-            }
-          }
-          return parentFiberRefs.set(ref, newStack);
-        },
-      );
-    });
-    return FiberRefs.get(fiberRefLocals);
-  };
-}
-
-function compareFiberId(left: FiberId.Runtime, right: FiberId.Runtime): number {
-  const compare = Number.Ord.compare(right.startTime)(left.startTime);
-  return compare === 0 ? Number.Ord.compare(right.id)(left.id) : compare;
-}
-
-/**
- * @tsplus tailRec
- */
-function findAncestor(
-  ref: FiberRef<any>,
-  parentStack: List<readonly [FiberId.Runtime, any]>,
-  childStack: List<readonly [FiberId.Runtime, any]>,
-  childModified = false,
-): readonly [any, boolean] {
-  if (parentStack.isNonEmpty() && childStack.isNonEmpty()) {
-    const [parentFiberId]            = parentStack.head;
-    const [childFiberId, childValue] = childStack.head;
-    const compare                    = compareFiberId(parentFiberId, childFiberId);
-    if (compare < 0) {
-      return findAncestor(ref, parentStack, childStack.tail, true);
-    } else if (compare > 0) {
-      return findAncestor(ref, parentStack.tail, childStack, childModified);
-    } else {
-      return [childValue, childModified];
-    }
-  }
-  return [ref.initial, true];
-}