@fncts/io 0.0.21 → 0.0.22

package/_mjs/Fiber/FiberContext.mjs

@@ -1,1013 +0,0 @@
-const fileName_1 = "(@fncts/io) src/Fiber/FiberContext.ts";
-import * as tsplus_module_1 from "@fncts/base/data/Maybe/constructors";
-import * as tsplus_module_2 from "@fncts/base/typeclass/Hashable/definition";
-import * as tsplus_module_3 from "@fncts/base/data/FiberId/api";
-import * as tsplus_module_4 from "@fncts/base/typeclass/Hashable/hash";
-import * as tsplus_module_5 from "@fncts/base/typeclass/Equatable/definition";
-import * as tsplus_module_6 from "@fncts/io/Fiber/api/id";
-import * as tsplus_module_7 from "@fncts/base/typeclass/Equatable/api";
-import * as tsplus_module_8 from "@fncts/io/FiberState/constructors";
-import * as tsplus_module_9 from "@fncts/base/internal/Stack";
-import * as tsplus_module_10 from "@fncts/io/FiberRef/unsafe";
-import * as tsplus_module_11 from "@fncts/io/IO/api";
-import * as tsplus_module_12 from "@fncts/base/collection/immutable/HashMap/api";
-import * as tsplus_module_13 from "@fncts/io/FiberRefs/api";
-import * as tsplus_module_14 from "@fncts/io/FiberRefs/join";
-import * as tsplus_module_15 from "@fncts/base/data/Exit/api";
-import * as tsplus_module_16 from "@fncts/base/collection/immutable/Conc";
-import * as tsplus_module_17 from "@fncts/base/collection/immutable/Conc/api/empty";
-import * as tsplus_module_18 from "@fncts/io/Future/api";
-import * as tsplus_module_19 from "@fncts/io/IO/api/environment";
-import * as tsplus_module_20 from "@fncts/io/IO/api/fulfill";
-import * as tsplus_module_21 from "@fncts/io/Future/constructors";
-import * as tsplus_module_22 from "@fncts/base/data/Either/constructors";
-import * as tsplus_module_23 from "@fncts/io/FiberScope/constructors";
-import * as tsplus_module_24 from "@fncts/base/collection/immutable/List/constructors";
-import * as tsplus_module_25 from "@fncts/io/RuntimeConfig";
-import * as tsplus_module_26 from "@fncts/io/Supervisor/constructors";
-import * as tsplus_module_27 from "@fncts/base/data/Cause/api";
-import * as tsplus_module_28 from "@fncts/base/data/Exit/constructors";
-import * as tsplus_module_29 from "@fncts/base/data/exceptions";
-import * as tsplus_module_30 from "@fncts/base/data/FiberId/constructors";
-import * as tsplus_module_31 from "@fncts/io/IO/api/interrupt";
-import * as tsplus_module_32 from "@fncts/io/FiberRef/api";
-import * as tsplus_module_33 from "@fncts/base/data/Maybe/api";
-import * as tsplus_module_34 from "@fncts/base/collection/immutable/List/definition";
-import * as tsplus_module_35 from "@fncts/base/data/Cause/api/isEmpty";
-import * as tsplus_module_36 from "@fncts/io/FiberStatus/constructors";
-import * as tsplus_module_37 from "@fncts/io/CancellerState";
-import * as tsplus_module_38 from "@fncts/io/FiberState/api";
-import * as tsplus_module_39 from "@fncts/base/data/TraceElement/definition";
-import * as tsplus_module_40 from "@fncts/io/FiberDescriptor";
-import * as tsplus_module_41 from "@fncts/io/InterruptStatus/constructors";
-import * as tsplus_module_42 from "@fncts/base/collection/immutable/List/api";
-import * as tsplus_module_43 from "@fncts/base/data/Trace/definition";
-import { AtomicReference } from "@fncts/base/internal/AtomicReference";
-import { Stack } from "@fncts/base/internal/Stack";
-import { FiberTypeId, isFiber } from "@fncts/io/Fiber/definition";
-import { StackTraceBuilder } from "@fncts/io/internal/StackTraceBuilder";
-import { concrete, isIOError } from "@fncts/io/IO/definition";
-export class InterruptExit {
-  constructor(apply, trace) {
-    this.apply = apply;
-    this.trace = trace;
-    this._tag = "InterruptExit";
-  }
-
-}
-export class HandlerFrame {
-  constructor(apply, trace) {
-    this.apply = apply;
-    this.trace = trace;
-    this._tag = "HandlerFrame";
-  }
-
-}
-export class TracedCont {
-  constructor(apply, trace) {
-    this.apply = apply;
-    this.trace = trace;
-    this._tag = "TracedCont";
-  }
-
-}
-export class Finalizer {
-  constructor(finalizer, apply, trace) {
-    this.finalizer = finalizer;
-    this.apply = apply;
-    this.trace = trace;
-    this._tag = "Finalizer";
-  }
-
-}
-export const currentFiber = /*#__PURE__*/new AtomicReference(null);
-export function unsafeCurrentFiber() {
-  return tsplus_module_1.fromNullable(currentFiber.get);
-}
-/**
- * `FiberContext` provides all of the context and facilities required to run a `IO`
- *
- * @tsplus type fncts.io.Fiber
- */
-
-export class FiberContext {
-  get [tsplus_module_2.hashSymbol]() {
-    return tsplus_module_4.hashString(tsplus_module_3.threadName(this.id));
-  }
-
-  [tsplus_module_5.equalsSymbol](that) {
-    return isFiber(that) && tsplus_module_7.strictEquals(this.id, tsplus_module_6.id(that, fileName_1 + ":68:44"));
-  }
-
-  constructor(fiberId, runtimeConfig, interruptStatus, fiberRefLocals, _children) {
-    this.fiberId = fiberId;
-    this.runtimeConfig = runtimeConfig;
-    this.interruptStatus = interruptStatus;
-    this.fiberRefLocals = fiberRefLocals;
-    this._children = _children;
-    this._typeId = FiberTypeId;
-    this._tag = "RuntimeFiber";
-    this.state = tsplus_module_8.initial();
-    this.asyncEpoch = 0 | 0;
-    this.stack = tsplus_module_9.makeStack();
-    this.nextIO = null;
-    this.interruptExit = new InterruptExit(v => {
-      if (this.unsafeIsInterruptible) {
-        this.interruptStatus.pop();
-        return tsplus_module_11.succeedNow(v, fileName_1 + ":488:27");
-      } else {
-        return tsplus_module_11.succeed(() => {
-          this.interruptStatus.pop();
-          return v;
-        }, fileName_1 + ":490:24");
-      }
-    });
-    this.unsafeSetRef(tsplus_module_10.currentSupervisor, this.runtimeConfig.supervisor);
-  }
-
-  get poll() {
-    return tsplus_module_11.succeed(() => this.unsafePoll(), fileName_1 + ":87:22");
-  }
-
-  get inheritRefs() {
-    return tsplus_module_11.defer(() => {
-      const childFiberRefLocals = this.fiberRefLocals;
-
-      if (tsplus_module_12.isEmpty(childFiberRefLocals)) {
-        return tsplus_module_11.unit;
-      } else {
-        return tsplus_module_11.updateFiberRefs((parentFiberId, parentFiberRefs) => tsplus_module_14.join(parentFiberId, tsplus_module_13.make(childFiberRefLocals))(parentFiberRefs), fileName_1 + ":96:34");
-      }
-    }, fileName_1 + ":91:20");
-  }
-
-  get id() {
-    return this.fiberId;
-  }
-
-  awaitAsync(k) {
-    const exit = this.unsafeAddObserver(exit => k(tsplus_module_15.flatten(exit)));
-
-    if (exit != null) {
-      k(exit);
-    }
-  }
-
-  get children() {
-    return this.evalOnIO(tsplus_module_11.succeed(() => {
-      const concBuilder = new tsplus_module_16.ConcBuilder(tsplus_module_17.empty());
-
-      for (const child of this._children) {
-        concBuilder.append(child);
-      }
-
-      return concBuilder.result();
-    }, fileName_1 + ":117:17"), tsplus_module_11.succeed(() => tsplus_module_17.empty(), fileName_1 + ":126:17"), fileName_1 + ":116:25");
-  }
-
-  evalOnIO(effect, orElse, __tsplusTrace) {
-    return tsplus_module_11.flatMap(r => tsplus_module_11.flatMap(p => tsplus_module_11.flatMap(() => tsplus_module_18.wait(p, fileName_1 + ":139:17"), fileName_1 + ":138:8")(this.evalOn(tsplus_module_20.fulfill(p, fileName_1 + ":138:57")(tsplus_module_19.provideEnvironment(r, fileName_1 + ":138:46")(effect)), tsplus_module_20.fulfill(p, fileName_1 + ":138:98")(tsplus_module_19.provideEnvironment(r, fileName_1 + ":138:87")(orElse)))), fileName_1 + ":137:18")(tsplus_module_21.make(fileName_1 + ":137:30")), fileName_1 + ":136:18")(tsplus_module_19.environment(fileName_1 + ":136:33"));
-  }
-
-  get fiberRefs() {
-    return tsplus_module_13.make(this.fiberRefLocals);
-  }
-
-  get await() {
-    return tsplus_module_11.asyncInterrupt(k => {
-      const cb = x => k(tsplus_module_11.fromExit(() => x, fileName_1 + ":149:78"));
-
-      const result = this.unsafeAddObserver(cb);
-
-      if (result == null) {
-        return tsplus_module_22.left(tsplus_module_11.succeed(() => this.unsafeRemoveObserver(cb), fileName_1 + ":152:38"));
-      } else {
-        return tsplus_module_22.right(tsplus_module_11.succeedNow(result, fileName_1 + ":154:42"));
-      }
-    }, this.fiberId, fileName_1 + ":148:29");
-  }
-
-  run() {
-    this.runUntil(this.runtimeConfig.yieldOpCount);
-  }
-
-  get scope() {
-    return tsplus_module_23.unsafeMake(this);
-  }
-
-  get status() {
-    return tsplus_module_11.succeedNow(this.state.status, fileName_1 + ":168:25");
-  }
-
-  get trace() {
-    return tsplus_module_11.succeed(() => this.unsafeCaptureTrace(tsplus_module_24.empty()), fileName_1 + ":172:22");
-  }
-
-  interruptAs(fiberId) {
-    return tsplus_module_11.apSecond(this.await, fileName_1 + ":176:50")(this.interruptAsFork(fiberId));
-  }
-
-  evalOn(effect, orElse) {
-    return tsplus_module_11.defer(() => this.unsafeEvalOn(effect, orElse), fileName_1 + ":180:20");
-  }
-
-  get location() {
-    return this.fiberId.location;
-  }
-  /**
-   * The main evaluator loop for the fiber. For purely synchronous effects, this will run either
-   * to completion, or for the specified maximum operation count. For effects with asynchronous
-   * callbacks, the loop will proceed no further than the first asynchronous boundary.
-   */
-
-
-  runUntil(maxOpCount) {
-    try {
-      let current = this.nextIO;
-      this.nextIO = null;
-      let extraTrace = undefined;
-      const flags = this.runtimeConfig.flags;
-      const superviseOps = flags.isEnabled(tsplus_module_25.RuntimeConfigFlag.SuperviseOperations) && this.currentSupervisor !== tsplus_module_26.none;
-      this.runtimeConfig.flags.isEnabled(tsplus_module_25.RuntimeConfigFlag.EnableCurrentFiber) && currentFiber.set(this);
-      this.currentSupervisor !== tsplus_module_26.none && this.currentSupervisor.unsafeOnResume(this);
-
-      while (current !== null) {
-        try {
-          let opCount = 0;
-
-          while (current !== null) {
-            if (!this.unsafeShouldInterrupt) {
-              const message = this.unsafeDrainMailbox();
-
-              if (message !== null) {
-                const oldIO = current;
-                current = tsplus_module_11.flatMap(() => oldIO, fileName_1 + ":213:55")(message);
-              } else if (opCount === maxOpCount) {
-                this.unsafeRunLater(current);
-                current = null;
-              } else {
-                superviseOps && this.currentSupervisor.unsafeOnEffect(this, current);
-
-                switch (current._tag) {
-                  case "Chain"
-                  /* IOTag.Chain */
-                  :
-                    {
-                      const nested = current.io;
-                      const k = current.f;
-
-                      switch (nested._tag) {
-                        case "SucceedNow"
-                        /* IOTag.SucceedNow */
-                        :
-                          {
-                            current = k(nested.value);
-                            break;
-                          }
-
-                        case "SucceedLazy"
-                        /* IOTag.Succeed */
-                        :
-                          {
-                            extraTrace = nested.trace;
-                            const value = nested.effect();
-                            extraTrace = undefined;
-                            current = k(value);
-                            break;
-                          }
-
-                        case "SucceedLazyWith"
-                        /* IOTag.SucceedWith */
-                        :
-                          {
-                            extraTrace = current.trace;
-                            const value = nested.effect(this.runtimeConfig, this.fiberId);
-                            extraTrace = undefined;
-                            current = k(value);
-                            break;
-                          }
-
-                        case "Yield"
-                        /* IOTag.Yield */
-                        :
-                          {
-                            extraTrace = current.trace;
-                            this.unsafeRunLater(tsplus_module_11.unit);
-                            extraTrace = undefined;
-                            current = null;
-                            break;
-                          }
-
-                        default:
-                          {
-                            this.stack.push(new TracedCont(current.f, current.trace));
-                            current = current.io;
-                            break;
-                          }
-                      }
-
-                      break;
-                    }
-
-                  case "Trace"
-                  /* IOTag.Trace */
-                  :
-                    {
-                      current = this.unsafeNextEffect(this.unsafeCaptureTrace(tsplus_module_24.cons(current.trace, tsplus_module_24.nil())));
-                      break;
-                    }
-
-                  case "SucceedNow"
-                  /* IOTag.SucceedNow */
-                  :
-                    {
-                      current = this.unsafeNextEffect(current.value);
-                      break;
-                    }
-
-                  case "SucceedLazy"
-                  /* IOTag.Succeed */
-                  :
-                    {
-                      current = this.unsafeNextEffect(current.effect());
-                      break;
-                    }
-
-                  case "SucceedLazyWith"
-                  /* IOTag.SucceedWith */
-                  :
-                    {
-                      current = this.unsafeNextEffect(current.effect(this.runtimeConfig, this.fiberId));
-                      break;
-                    }
-
-                  case "Fail"
-                  /* IOTag.Fail */
-                  :
-                    {
-                      const fastPathTrace = extraTrace === undefined ? tsplus_module_24.nil() : tsplus_module_24.cons(extraTrace, tsplus_module_24.nil());
-                      extraTrace = undefined;
-                      const cause = current.cause();
-                      const tracedCause = tsplus_module_27.isTraced(cause) ? cause : tsplus_module_27.traced(cause, this.unsafeCaptureTrace(tsplus_module_24.cons(current.trace, fastPathTrace)));
-                      const discardedFolds = this.unsafeUnwindStack();
-                      const strippedCause = discardedFolds ? // We threw away some error handlers while unwinding the stack because
-                      tsplus_module_27.stripFailures( // We threw away some error handlers while unwinding the stack because
-                      // we got interrupted during this instruction. So it's not safe to return
-                      // typed failures from cause0, because they might not be typed correctly.
-                      // Instead, we strip the typed failures, and return the remainders and
-                      // the interruption
-                      tracedCause) : tracedCause;
-                      const suppressed = this.unsafeClearSuppressedCause();
-                      const fullCause = tsplus_module_27.contains(suppressed)(strippedCause) ? strippedCause : tsplus_module_27.then(strippedCause, suppressed);
-
-                      if (!this.stack.hasNext) {
-                        // Error not caught, stack is empty:
-                        this.unsafeSetInterrupting(true);
-                        current = this.unsafeTryDone(tsplus_module_28.failCause(fullCause), current.trace);
-                      } else {
-                        this.unsafeSetInterrupting(false); // Error caught, next continuation on the stack will deal
-                        // with it, so we just have to compute it here
-
-                        current = this.unsafeNextEffect(fullCause);
-                      }
-
-                      break;
-                    }
-
-                  case "Match"
-                  /* IOTag.Match */
-                  :
-                    {
-                      this.stack.push(current);
-                      current = current.io;
-                      break;
-                    }
-
-                  case "Async"
-                  /* IOTag.Async */
-                  :
-                    {
-                      const trace = current.trace;
-                      const epoch = this.asyncEpoch;
-                      this.asyncEpoch = epoch + 1;
-                      this.unsafeEnterAsync(epoch, current.blockingOn, trace);
-                      const r = current.register(this.unsafeCreateAsyncResume(epoch));
-                      void 0;
-
-                      switch (r._tag) {
-                        case "Left":
-                          {
-                            this.unsafeSetAsyncCanceller(epoch, r.left);
-
-                            if (this.unsafeShouldInterrupt) {
-                              if (this.unsafeExitAsync(epoch)) {
-                                this.unsafeSetInterrupting(true);
-                                current = tsplus_module_11.flatMap(() => tsplus_module_11.failCauseNow(this.unsafeClearSuppressedCause(), fileName_1 + ":334:67"), fileName_1 + ":334:45")(r.left);
-                              } else {
-                                current = null;
-                              }
-                            } else {
-                              current = null;
-                            }
-
-                            break;
-                          }
-
-                        case "Right":
-                          {
-                            if (!this.unsafeExitAsync(epoch)) {
-                              current = null;
-                            } else {
-                              current = r.right;
-                            }
-                          }
-                      }
-
-                      break;
-                    }
-
-                  case "Fork"
-                  /* IOTag.Fork */
-                  :
-                    {
-                      current = this.unsafeNextEffect(this.unsafeFork(current.io, current.scope, current.trace));
-                      break;
-                    }
-
-                  case "Yield"
-                  /* IOTag.Yield */
-                  :
-                    {
-                      current = null;
-                      this.unsafeRunLater(tsplus_module_11.unit);
-                      break;
-                    }
-
-                  case "Defer"
-                  /* IOTag.Defer */
-                  :
-                    {
-                      current = current.make();
-                      break;
-                    }
-
-                  case "DeferWith"
-                  /* IOTag.DeferWith */
-                  :
-                    {
-                      current = current.make(this.runtimeConfig, this.fiberId);
-                      break;
-                    }
-
-                  case "Stateful"
-                  /* IOTag.Stateful */
-                  :
-                    {
-                      current = current.onState(this, this.state.status);
-                      break;
-                    }
-
-                  case "Race"
-                  /* IOTag.Race */
-                  :
-                    {
-                      current = this.unsafeRace(current);
-                      break;
-                    }
-
-                  case "Logged"
-                  /* IOTag.Logged */
-                  :
-                    {
-                      this.unsafeLogWith(current.message, current.cause, current.overrideLogLevel, current.overrideRef1, current.overrideValue1, current.trace);
-                      current = this.unsafeNextEffect(undefined);
-                      break;
-                    }
-
-                  default:
-                    {
-                      console.log("Unrecognized Instruction", current);
-                      throw new Error("Unrecognized Instruction");
-                    }
-                }
-              }
-            } else {
-              const trace = current.trace;
-              current = tsplus_module_11.failCauseNow(this.unsafeClearSuppressedCause(), trace);
-              this.unsafeSetInterrupting(true);
-            }
-
-            opCount++;
-          }
-        } catch (e) {
-          if (tsplus_module_29.isInterruptedException(e)) {
-            const trace = current ? current.trace : undefined;
-            current = tsplus_module_31.interruptAs(tsplus_module_30.none, trace);
-            this.unsafeSetInterrupting(true);
-          } else if (isIOError(e)) {
-            switch (e.exit._tag) {
-              case "Success":
-                {
-                  current = this.unsafeNextEffect(e.exit.value);
-                  break;
-                }
-
-              case "Failure":
-                {
-                  const trace = current ? current.trace : undefined;
-                  current = tsplus_module_11.failCauseNow(e.exit.cause, trace);
-                }
-            }
-          } else if (this.unsafeIsFatal(e)) {
-            this.unsafeHandleFatalError(e);
-          } else {
-            this.unsafeSetInterrupting(true);
-            current = tsplus_module_11.haltNow(e, fileName_1 + ":427:42");
-          }
-        }
-      }
-    } finally {
-      currentFiber.set(null);
-      this.currentSupervisor.unsafeOnSuspend(this);
-    }
-  }
-
-  unsafeRunLater(i0) {
-    this.unsafeGetRef(tsplus_module_10.currentScheduler).scheduleTask(() => {
-      this.nextIO = i0;
-      this.runUntil(this.runtimeConfig.yieldOpCount);
-    });
-  }
-
-  unsafeGetRef(ref) {
-    return tsplus_module_33.getOrElse(() => tsplus_module_32.initial(ref))(tsplus_module_33.map(_ => _.head[1])(tsplus_module_12.get(ref)(this.fiberRefLocals)));
-  }
-
-  unsafeGetRefs(fiberRefLocals) {
-    return tsplus_module_12.map(stack => stack.head[1])(fiberRefLocals);
-  }
-
-  unsafeSetRef(ref, value) {
-    const oldState = this.fiberRefLocals;
-    const oldStack = tsplus_module_33.getOrElse(() => tsplus_module_24.empty())(tsplus_module_12.get(ref)(oldState));
-    let newStack;
-
-    if (tsplus_module_34.isEmpty(oldStack)) {
-      newStack = tsplus_module_24.cons([this.fiberId, value]);
-    } else if (tsplus_module_7.strictEquals(oldStack.head[0], this.fiberId)) {
-      newStack = tsplus_module_24.cons([this.fiberId, value], oldStack.tail);
-    } else {
-      newStack = tsplus_module_24.cons([this.fiberId, value], oldStack);
-    }
-
-    const newState = tsplus_module_12.set(ref, newStack)(oldState);
-    this.fiberRefLocals = newState;
-  }
-
-  unsafeDeleteRef(ref) {
-    this.fiberRefLocals = tsplus_module_12.remove(ref)(this.fiberRefLocals);
-  }
-
-  unsafePoll() {
-    switch (this.state._tag) {
-      case "Executing":
-        {
-          return tsplus_module_1.nothing();
-        }
-
-      case "Done":
-        {
-          return tsplus_module_1.just(this.state.value);
-        }
-    }
-  }
-
-  unsafeAddFinalizer(finalizer) {
-    this.stack.push(new Finalizer(finalizer, v => {
-      this.unsafeDisableInterruption();
-      this.unsafeRestoreInterruptStatus();
-      return tsplus_module_11.map(() => v, fileName_1 + ":502:29")(finalizer);
-    }));
-  }
-
-  get unsafeIsInterruptible() {
-    return this.interruptStatus.hasNext ? this.interruptStatus.peek() : true;
-  }
-
-  get unsafeIsInterrupted() {
-    return this.state.interruptors.size > 0;
-  }
-
-  get unsafeIsInterrupting() {
-    return this.state.status.isInterrupting;
-  }
-
-  get unsafeShouldInterrupt() {
-    return this.unsafeIsInterrupted && this.unsafeIsInterruptible && !this.unsafeIsInterrupting;
-  }
-
-  unsafeDisableInterruption() {
-    this.interruptStatus.push(false);
-  }
-
-  unsafeRestoreInterruptStatus() {
-    this.stack.push(this.interruptExit);
-  }
-
-  unsafeAddSuppressedCause(cause) {
-    if (!tsplus_module_35.isEmpty(cause)) {
-      if (this.state._tag === "Executing") {
-        this.state.suppressed = tsplus_module_27.then(this.state.suppressed, cause);
-      }
-    }
-  }
-  /**
-   * Unwinds the stack, looking for the first error handler, and exiting
-   * interruptible / uninterruptible regions.
-   */
-
-
-  unsafeUnwindStack() {
-    let unwinding = true;
-    let discardedFolds = false; // Unwind the stack, looking for an error handler:
-
-    while (unwinding && this.stack.hasNext) {
-      // eslint-disable-next-line @typescript-eslint/no-non-null-assertion
-      const frame = this.stack.pop();
-
-      switch (frame._tag) {
-        case "InterruptExit":
-          {
-            this.interruptStatus.pop();
-            break;
-          }
-
-        case "Finalizer":
-          {
-            this.unsafeDisableInterruption();
-            this.stack.push(new TracedCont(cause => tsplus_module_11.matchCauseIO(finalizerCause => {
-              this.interruptStatus.pop();
-              this.unsafeAddSuppressedCause(finalizerCause);
-              return tsplus_module_11.failCauseNow(cause, fileName_1 + ":566:43");
-            }, () => {
-              this.interruptStatus.pop();
-              return tsplus_module_11.failCauseNow(cause, fileName_1 + ":570:43");
-            }, fileName_1 + ":562:45")(frame.finalizer), frame.trace));
-            unwinding = false;
-            break;
-          }
-
-        case "Match"
-        /* IOTag.Match */
-        :
-          {
-            if (!this.unsafeShouldInterrupt) {
-              // Push error handler back onto the stack and halt iteration:
-              this.stack.push(new HandlerFrame(frame.onFailure, frame.trace));
-              unwinding = false;
-            } else {
-              discardedFolds = true;
-            }
-
-            break;
-          }
-      }
-    }
-
-    return discardedFolds;
-  }
-
-  unsafeAddObserver(k) {
-    switch (this.state._tag) {
-      case "Done":
-        {
-          return this.state.value;
-        }
-
-      case "Executing":
-        {
-          this.state.observers.add(k);
-          return null;
-        }
-    }
-  }
-
-  unsafeNextEffect(value) {
-    if (this.stack.hasNext) {
-      const k = this.stack.pop();
-      return k.apply(value);
-    } else {
-      return this.unsafeTryDone(tsplus_module_28.succeed(value));
-    }
-  }
-
-  unsafeNotifyObservers(v, observers) {
-    if (observers.size > 0) {
-      const result = tsplus_module_28.succeed(v);
-      observers.forEach(k => k(result));
-    }
-  }
-
-  unsafeRemoveObserver(k) {
-    if (this.state._tag === "Executing") {
-      this.state.observers.delete(k);
-    }
-  }
-
-  interruptAsFork(fiberId) {
-    const interruptedCause = tsplus_module_27.interrupt(fiberId);
-    return tsplus_module_11.succeed(() => {
-      const oldState = this.state;
-
-      if (this.state._tag === "Executing" && this.state.status._tag === "Suspended" && this.state.status.interruptible && this.state.asyncCanceller._tag === "Registered") {
-        const asyncCanceller = this.state.asyncCanceller.asyncCanceller;
-        const interrupt = tsplus_module_11.failCauseNow(interruptedCause, fileName_1 + ":640:52");
-        this.state.status = tsplus_module_36.running(true);
-        this.state.interruptors = new Set(oldState.interruptors).add(fiberId);
-        this.state.asyncCanceller = tsplus_module_37.empty;
-        this.unsafeRunLater(tsplus_module_11.flatMap(() => interrupt, fileName_1 + ":644:60")(asyncCanceller));
-      } else if (this.state._tag === "Executing") {
-        const newCause = tsplus_module_27.then(this.state.suppressed, interruptedCause);
-        this.state.interruptors.add(fiberId);
-        this.state.suppressed = newCause;
-      }
-    }, fileName_1 + ":631:14");
-  }
-
-  unsafeTryDone(exit, trace) {
-    switch (this.state._tag) {
-      case "Done":
-        {
-          // Already done
-          return null;
-        }
-
-      case "Executing":
-        {
-          if (this.state.mailbox !== null) {
-            // Not done because the mailbox isn't empty
-            const mailbox = this.state.mailbox;
-            this.state.mailbox = null;
-            this.unsafeSetInterrupting(true);
-            return tsplus_module_11.flatMap(() => tsplus_module_11.fromExit(() => exit, fileName_1 + ":665:60"), fileName_1 + ":665:42")(mailbox);
-          } else if (this._children.size === 0) {
-            // We are truly "done" because all the children of this fiber have terminated,
-            // and there are no more pending effects that we have to execute on the fiber.
-            const interruptorsCause = tsplus_module_38.interruptorsCause(this.state);
-            const newExit = tsplus_module_35.isEmpty(interruptorsCause) ? exit : tsplus_module_15.mapErrorCause(cause => {
-              if (tsplus_module_27.contains(interruptorsCause)(cause)) {
-                return cause;
-              } else {
-                return tsplus_module_27.then(cause, interruptorsCause);
-              }
-            })(exit);
-            const observers = this.state.observers;
-            this.state = tsplus_module_8.done(newExit);
-            this.unsafeReportUnhandled(newExit);
-            this.unsafeNotifyObservers(newExit, observers);
-            return null;
-          } else {
-            // not done because there are children left to close
-            this.unsafeSetInterrupting(true);
-            let interruptChildren = tsplus_module_11.unit;
-
-            this._children.forEach(child => {
-              interruptChildren = tsplus_module_11.flatMap(() => child.interruptAs(this.fiberId), fileName_1 + ":694:58")(interruptChildren);
-            });
-
-            this._children.clear();
-
-            return tsplus_module_11.flatMap(() => tsplus_module_11.fromExit(() => exit, fileName_1 + ":698:70"), fileName_1 + ":698:52")(interruptChildren);
-          }
-        }
-    }
-  }
-
-  unsafeSetAsyncCanceller(epoch, asyncCanceller0) {
-    const asyncCanceller = !asyncCanceller0 ? tsplus_module_11.unit : asyncCanceller0;
-
-    if (this.state._tag === "Executing") {
-      if (this.state.status._tag === "Suspended" && this.state.asyncCanceller._tag === "Pending" && this.state.status.epoch === epoch) {
-        this.state.asyncCanceller = tsplus_module_37.registered(asyncCanceller);
-      } else if (this.state.status._tag === "Suspended" && this.state.asyncCanceller._tag === "Registered" && this.state.status.epoch === epoch) {
-        throw new Error("inconsistent state in setAsyncCanceller");
-      }
-    } else {
-      return;
-    }
-  }
-
-  unsafeReportUnhandled(exit, trace) {
-    if (exit._tag === "Failure"
-    /* ExitTag.Failure */
-    ) {
-      this.runtimeConfig.reportFailure(exit.cause);
-    }
-  }
-
-  unsafeSetInterrupting(value) {
-    switch (this.state._tag) {
-      case "Executing":
-        {
-          this.state.status = this.state.status.withInterrupting(value);
-          return;
-        }
-
-      case "Done":
-        {
-          return;
-        }
-    }
-  }
-
-  unsafeEnterAsync(epoch, blockingOn, trace) {
-    if (this.state._tag === "Executing" && this.state.status._tag === "Running"
-    /* FiberStatusTag.Running */
-    && this.state.asyncCanceller._tag === "Empty") {
-      const newStatus = tsplus_module_36.suspended(this.state.status.interrupting, this.unsafeIsInterruptible && !this.unsafeIsInterrupting, epoch, blockingOn, trace);
-      this.state.status = newStatus;
-      this.state.asyncCanceller = tsplus_module_37.pending;
-    } else {
-      throw new tsplus_module_29.IllegalStateError(`Fiber ${tsplus_module_3.threadName(this.fiberId)} is not running`);
-    }
-  }
-
-  unsafeExitAsync(epoch) {
-    if (this.state._tag === "Executing" && this.state.status._tag === "Suspended" && this.state.status.epoch === epoch) {
-      this.state.status = tsplus_module_36.running(this.state.status.interrupting);
-      this.state.asyncCanceller = tsplus_module_37.empty;
-      return true;
-    }
-
-    return false;
-  }
-
-  unsafeCreateAsyncResume(epoch) {
-    return _ => {
-      if (this.unsafeExitAsync(epoch)) {
-        this.unsafeRunLater(_);
-      }
-    };
-  }
-
-  unsafeFork(io, forkScope = tsplus_module_1.nothing(), trace) {
-    const childId = tsplus_module_30.unsafeMake(tsplus_module_39.parse(trace));
-    const childFiberRefLocals = tsplus_module_13.forkAs(childId)(this.fiberRefs).fiberRefLocals;
-    const parentScope = tsplus_module_33.getOrElse(() => this.scope)(tsplus_module_33.orElse(() => this.unsafeGetRef(tsplus_module_10.forkScopeOverride))(forkScope));
-    const grandChildren = new Set();
-    const childContext = new FiberContext(childId, this.runtimeConfig, tsplus_module_9.single(this.unsafeIsInterruptible), childFiberRefLocals, grandChildren);
-
-    if (this.currentSupervisor !== tsplus_module_26.none) {
-      this.currentSupervisor.unsafeOnStart(this.unsafeGetRef(tsplus_module_10.currentEnvironment), io, tsplus_module_1.just(this), childContext);
-      childContext.unsafeOnDone(exit => {
-        this.currentSupervisor.unsafeOnEnd(tsplus_module_15.flatten(exit), childContext);
-      });
-    }
-
-    const childIO = !parentScope.unsafeAdd(childContext) ? tsplus_module_31.interruptAs(parentScope.fiberId, fileName_1 + ":815:80") : io;
-    childContext.nextIO = childIO;
-    this.unsafeGetRef(tsplus_module_10.currentScheduler).scheduleTask(() => childContext.runUntil(this.runtimeConfig.yieldOpCount));
-    return childContext;
-  }
-
-  unsafeOnDone(k) {
-    const exit = this.unsafeAddObserver(k);
-
-    if (exit == null) {
-      return;
-    } else {
-      k(tsplus_module_28.succeed(exit));
-    }
-  }
-
-  unsafeClearSuppressedCause() {
-    switch (this.state._tag) {
-      case "Executing":
-        {
-          const suppressed = this.state.suppressed;
-          this.state.suppressed = tsplus_module_27.empty();
-          return suppressed;
-        }
-
-      case "Done":
-        {
-          return tsplus_module_27.empty();
-        }
-    }
-  }
-
-  unsafeGetDescriptor() {
-    return new tsplus_module_40.FiberDescriptor(this.fiberId, this.state.status, this.state.interruptors, tsplus_module_41.fromBoolean(this.unsafeIsInterruptible), this.scope);
-  }
-
-  unsafeRace(race) {
-    const raceIndicator = new AtomicReference(true);
-    const left = this.unsafeFork(race.left, tsplus_module_1.nothing(), race.trace);
-    const right = this.unsafeFork(race.right, tsplus_module_1.nothing(), race.trace);
-    return tsplus_module_11.async(cb => {
-      const leftRegister = left.unsafeAddObserver(() => {
-        this.unsafeCompleteRace(left, right, race.leftWins, raceIndicator, cb);
-      });
-
-      if (leftRegister != null) {
-        this.unsafeCompleteRace(left, right, race.leftWins, raceIndicator, cb);
-      } else {
-        const rightRegister = right.unsafeAddObserver(() => {
-          this.unsafeCompleteRace(right, left, race.rightWins, raceIndicator, cb);
-        });
-
-        if (rightRegister != null) {
-          this.unsafeCompleteRace(right, left, race.rightWins, raceIndicator, cb);
-        }
-      }
-    }, tsplus_module_3.combine(right.fiberId)(left.fiberId), fileName_1 + ":863:20");
-  }
-
-  unsafeCompleteRace(winner, loser, cont, ab, cb) {
-    if (ab.compareAndSet(true, false)) {
-      cb(cont(winner, loser));
-    }
-  }
-
-  unsafeCaptureTrace(prefix) {
-    const builder = new StackTraceBuilder();
-    tsplus_module_42.forEach(element => builder.append(tsplus_module_39.parse(element)))(prefix);
-    const stack = this.stack.clone();
-
-    while (stack.hasNext) {
-      builder.append(tsplus_module_39.parse(stack.pop().trace));
-    }
-
-    return new tsplus_module_43.Trace(this.fiberId, builder.result());
-  }
-
-  unsafeEvalOn(effect, orElse) {
-    if (this.state._tag === "Executing") {
-      const newMailbox = this.state.mailbox == null ? effect : tsplus_module_11.flatMap(() => effect, fileName_1 + ":907:92")(this.state.mailbox);
-      this.state.mailbox = newMailbox;
-      return tsplus_module_11.unit;
-    } else {
-      return tsplus_module_11.asUnit(orElse, fileName_1 + ":911:20");
-    }
-  }
-
-  unsafeDrainMailbox() {
-    if (this.state._tag === "Executing") {
-      const mailbox = this.state.mailbox;
-      this.state.mailbox = null;
-      return mailbox;
-    } else {
-      return null;
-    }
-  }
-
-  unsafeAddChild(child) {
-    this.unsafeEvalOn(tsplus_module_11.succeed(() => {
-      this._children.add(child);
-    }, fileName_1 + ":927:17"), tsplus_module_11.unit);
-  }
-
-  unsafeLog(message, trace) {
-    const logLevel = this.unsafeGetRef(tsplus_module_10.currentLogLevel);
-    const spans = this.unsafeGetRef(tsplus_module_10.currentLogSpan);
-    const annotations = this.unsafeGetRef(tsplus_module_10.currentLogAnnotations);
-    this.runtimeConfig.logger.log(tsplus_module_39.parse(trace), this.fiberId, logLevel, message, tsplus_module_27.empty(), this.fiberRefLocals, spans, annotations);
-  }
-
-  unsafeLogWith(message, cause, overrideLogLevel, overrideRef1 = null, overrideValue1 = null, trace) {
-    const logLevel = tsplus_module_33.getOrElse(() => this.unsafeGetRef(tsplus_module_10.currentLogLevel))(overrideLogLevel);
-    const spans = this.unsafeGetRef(tsplus_module_10.currentLogSpan);
-    const annotations = this.unsafeGetRef(tsplus_module_10.currentLogAnnotations);
-    let contextMap;
-
-    if (overrideRef1 !== null) {
-      const map = this.unsafeGetRefs(this.fiberRefLocals);
-
-      if (overrideValue1 === null) {
-        tsplus_module_12.remove(overrideRef1)(map);
-      } else {
-        tsplus_module_12.set(overrideRef1, overrideValue1)(map);
-      }
-
-      contextMap = map;
-    } else {
-      contextMap = this.fiberRefLocals;
-    }
-
-    this.runtimeConfig.logger.log(tsplus_module_39.parse(trace), this.fiberId, logLevel, message, cause, contextMap, spans, annotations);
-  }
-
-  unsafeIsFatal(t) {
-    return this.unsafeGetRef(tsplus_module_10.currentIsFatal).apply(t);
-  }
-
-  unsafeHandleFatalError(t) {
-    return this.unsafeGetRef(tsplus_module_10.currentReportFatal)(t);
-  }
-
-  get currentSupervisor() {
-    return this.unsafeGetRef(tsplus_module_10.currentSupervisor);
-  }
-
-}
-//# sourceMappingURL=FiberContext.mjs.map