@fncts/io 0.0.24 → 0.0.26

package/_src/IO/api/zipConcurrent.ts

@@ -1,4 +1,8 @@
+import type { InterruptibilityRestorer } from "./interrupt.js";
+import type { Grafter } from "./transplant.js";
+
 import { tuple } from "@fncts/base/data/function";
+import { AtomicBoolean } from "@fncts/base/internal/AtomicBoolean";
 import { AtomicReference } from "@fncts/base/internal/AtomicReference";
 
 /**
@@ -16,54 +20,48 @@ export function zipConcurrent<R1, E1, B>(that: IO<R1, E1, B>, __tsplusTrace?: st
 export function zipWithConcurrent<A, R1, E1, B, C>(that: IO<R1, E1, B>, f: (a: A, b: B) => C, __tsplusTrace?: string) {
   return <R, E>(self: IO<R, E, A>): IO<R | R1, E | E1, C> => {
     return IO.fiberId.flatMap((fiberId) =>
-      IO.uninterruptibleMask(({ restore }) => {
-        const future = Future.unsafeMake<void, C>(FiberId.none);
-        const ref    = new AtomicReference<Maybe<Either<A, B>>>(Nothing());
-        return IO.transplant((graft) =>
-          graft(
-            restore(self).matchCauseIO(
-              (cause) => future.fail(undefined) > IO.failCauseNow(cause),
-              (a) =>
-                ref.getAndSet(Just(Either.left(a))).match(
-                  () => IO.unit,
-                  (value) =>
-                    value.match(
-                      () => IO.unit,
-                      (b) => future.succeed(f(a, b)).asUnit,
-                    ),
-                ),
-            ),
-          )
-            .forkDaemon.zip(
-              graft(
-                restore(that).matchCauseIO(
-                  (cause) => future.fail(undefined) > IO.failCauseNow(cause),
-                  (b) =>
-                    ref.getAndSet(Just(Either.right(b))).match(
-                      () => IO.unit,
-                      (value) =>
-                        value.match(
-                          (a) => future.succeed(f(a, b)).asUnit,
-                          () => IO.unit,
-                        ),
-                    ),
-                ),
-              ).forkDaemon,
-            )
+      IO.uninterruptibleMask((restore) => {
+        return IO.transplant((graft) => {
+          const future = Future.unsafeMake<void, void>(FiberId.none);
+          const ref    = new AtomicBoolean(false);
+          return fork(self, restore, graft, future, ref)
+            .zip(fork(that, restore, graft, future, ref))
             .flatMap(([left, right]) =>
               restore(future.await).matchCauseIO(
                 (cause) =>
-                  left
-                    .interruptAs(fiberId)
-                    .zipConcurrent(right.interruptAs(fiberId))
-                    .flatMap(([left, right]) =>
-                      left.zipConcurrent(right).match(IO.failCauseNow, () => IO.failCauseNow(cause.stripFailures)),
-                    ),
-                (c) => left.inheritRefs.zip(right.inheritRefs).as(c),
+                  left.interruptFork >
+                  right.interruptFork >
+                  left.await.zip(right.await).flatMap(([left, right]) =>
+                    left
+                      .zipWithCause(right, f, (a, b) => Cause.both(a, b))
+                      .match(
+                        (causes) => IO.refailCause(Cause.both(cause.stripFailures, causes)),
+                        () => IO.refailCause(cause.stripFailures),
+                      ),
+                  ),
+                () => left.join.zipWith(right.join, f),
               ),
-            ),
-        );
+            );
+        });
       }),
     );
   };
 }
+
+function fork<R, E, A, C>(
+  io: Lazy<IO<R, E, A>>,
+  restore: InterruptibilityRestorer,
+  graft: Grafter,
+  future: Future<void, void>,
+  ref: AtomicBoolean,
+): IO<R, never, Fiber<E, A>> {
+  return graft(restore(io())).matchCauseIO(
+    (cause) => future.fail(undefined) > IO.refailCause(cause),
+    (a) => {
+      if (ref.getAndSet(true)) {
+        future.unsafeDone(IO.unit);
+      }
+      return IO.succeedNow(a);
+    },
+  ).forkDaemon;
+}

package/_src/IO/api.ts

@@ -1061,6 +1061,16 @@ export function left<A>(a: Lazy<A>, __tsplusTrace?: string): UIO<Either<A, never
   return IO.succeed(a).flatMap((a) => IO.succeedNow(Either.left(a)));
 }
 
+/**
+ * @tsplus getter fncts.io.IO just
+ */
+export function just<R, E, A>(self: IO<R, E, Maybe<A>>): IO<R, Maybe<E>, A> {
+  return self.matchIO(
+    (e) => IO.fail(Just(e)),
+    (a) => a.match(() => IO.fail(Nothing()), IO.succeedNow),
+  );
+}
+
 /**
  * @tsplus static fncts.io.IOOps log
  */
@@ -1291,6 +1301,11 @@ export function mergeAll<R, E, A, B>(
   return fas.foldLeft(IO.succeed(b) as IO<R, E, B>, (b, a) => b.zipWith(a, f));
 }
 
+/**
+ * @tsplus static fncts.io.IOOps nothing
+ */
+export const nothing = IO.succeedNow(Nothing());
+
 /**
  * Converts an option on errors into an option on values.
  *
@@ -1871,10 +1886,11 @@ export function when(b: Lazy<boolean>, __tsplusTrace?: string) {
  * The moral equivalent of `if (p) exp` when `p` has side-effects
  *
  * @tsplus pipeable fncts.io.IO whenIO
+ * @tsplus static fncts.io.IOOps whenIO
  */
 export function whenIO<R1, E1>(mb: IO<R1, E1, boolean>, __tsplusTrace?: string) {
-  return <R, E, A>(ma: IO<R, E, A>): IO<R1 | R, E | E1, void> => {
-    return mb.flatMap((b) => (b ? ma.asUnit : IO.unit));
+  return <R, E, A>(ma: IO<R, E, A>): IO<R1 | R, E | E1, Maybe<A>> => {
+    return mb.flatMap((b) => (b ? ma.asJust : IO.nothing));
   };
 }
 

package/_src/IO.ts

@@ -19,15 +19,17 @@ export * from "./IO/api/clockWith.js";
 export * from "./IO/api/concurrency.js";
 export * from "./IO/api/concurrentFinalizers.js";
 export * from "./IO/api/consoleWith.js";
-export * from "./IO/api/core-scope.js";
+export * from "./IO/api/daemonChildren.js";
 export * from "./IO/api/delay.js";
 export * from "./IO/api/descriptor.js";
+export * from "./IO/api/disconnect.js";
 export * from "./IO/api/ensuringChildren.js";
 export * from "./IO/api/environment.js";
 export * from "./IO/api/foreachConcurrent.js";
 export * from "./IO/api/foreachExec.js";
 export * from "./IO/api/fork.js";
 export * from "./IO/api/forkAll.js";
+export * from "./IO/api/forkDaemon.js";
 export * from "./IO/api/forkIn.js";
 export * from "./IO/api/forkScoped.js";
 export * from "./IO/api/fulfill.js";
@@ -39,6 +41,7 @@ export * from "./IO/api/provideLayer.js";
 export * from "./IO/api/provideSomeLayer.js";
 export * from "./IO/api/race.js";
 export * from "./IO/api/raceFirst.js";
+export * from "./IO/api/raceWith.js";
 export * from "./IO/api/randomWith.js";
 export * from "./IO/api/repeat.js";
 export * from "./IO/api/retry.js";
@@ -51,6 +54,9 @@ export * from "./IO/api/sleep.js";
 export * from "./IO/api/stateful.js";
 export * from "./IO/api/supervised.js";
 export * from "./IO/api/timeout.js";
+export * from "./IO/api/transplant.js";
+export * from "./IO/api/whenFiberRef.js";
+export * from "./IO/api/whenRef.js";
 export * from "./IO/api/withChildren.js";
 export * from "./IO/api/withEarlyRelease.js";
 export * from "./IO/api/withFinalizer.js";

package/_src/Layer/MemoMap.ts

@@ -35,7 +35,7 @@ export class MemoMap {
           const observers    = _(Ref.make(0));
           const future       = _(Future.make<E, Environment<A>>());
           const finalizerRef = _(Ref.make<Finalizer>(Finalizer.noop));
-          const resource     = IO.uninterruptibleMask(({ restore }) =>
+          const resource     = IO.uninterruptibleMask((restore) =>
             Do((_) => {
               const outerScope = scope;
               const innerScope = _(Scope.make);

package/_src/RefSubject/Atomic.ts

@@ -3,7 +3,7 @@ import type { Emitter } from "@fncts/io/Push";
 import { AtomicReference } from "@fncts/base/internal/AtomicReference";
 import { Hold, Push } from "@fncts/io/Push";
 import { Atomic } from "@fncts/io/Ref";
-import { RefSubjectInternal } from "@fncts/io/RefSubject";
+import { RefSubjectInternal } from "@fncts/io/RefSubject/definition";
 
 export class AtomicRefSubject<E, A> extends RefSubjectInternal<never, E, A, A> {
   readonly stream   = new Hold<never, E, A>(Push.never);

package/_src/STM/api/atomically.ts

@@ -21,7 +21,7 @@ export function atomically<R, E, A>(stm: STM<R, E, A>, __tsplusTrace?: string):
             const id    = TxnId.make();
             const state = new AtomicReference<CommitState<E, A>>(CommitState.Running);
             const async = IO.async(tryCommitAsync(result.journal, fiberId, stm, id, state, r, scheduler));
-            return IO.uninterruptibleMask(({ restore }) =>
+            return IO.uninterruptibleMask((restore) =>
               restore(async).catchAllCause((cause) => {
                 state.compareAndSet(CommitState.Running, CommitState.Interrupted);
                 const newState = state.get;

package/_src/ScopedRef/api.ts

@@ -2,7 +2,7 @@
  * @tsplus static fncts.io.ScopedRefOps fromAcquire
  */
 export function fromAcquire<R, E, A>(acquire: IO<R, E, A>, __tsplusTrace?: string): IO<R | Scope, E, ScopedRef<A>> {
-  return IO.uninterruptibleMask(({ restore }) =>
+  return IO.uninterruptibleMask((restore) =>
     Do((_) => {
       const newScope = _(Scope.make);
       const a        = _(
@@ -23,7 +23,7 @@ class Synch<A> extends ScopedRef<A> {
   close: UIO<void> = this.ref.get.flatMap(([scope, _]) => scope.close(Exit.unit));
   set<R, E>(acquire: IO<R, E, A>, __tsplusTrace?: string): IO<Exclude<R, Scope>, E, void> {
     return this.ref.modifyIO(([oldScope, a]) =>
-      IO.uninterruptibleMask(({ restore }) =>
+      IO.uninterruptibleMask((restore) =>
         Do((_) => {
           const newScope = _(Scope.make);
           const exit     = _(restore(acquire.provideSomeService(newScope, Scope.Tag)).result);

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,8 +1,8 @@
 {
   "name": "@fncts/io",
-  "version": "0.0.24",
+  "version": "0.0.26",
   "dependencies": {
-    "@fncts/base": "0.0.23",
+    "@fncts/base": "0.0.24",
     "@fncts/transformers": "0.0.4",
     "@fncts/typelevel": "0.0.15"
   },

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]}