@fncts/io 0.0.18 → 0.0.19

package/Clock/definition.d.ts

@@ -11,6 +11,7 @@ export declare abstract class Clock {
 }
 /**
  * @tsplus static fncts.io.ClockOps Tag
+ * @tsplus implicit
  * @tsplus location "@fncts/io/Clock/definition"
  */
 export declare const ClockTag: import("@fncts/base/data/Tag").Tag<Clock>;

package/Fiber/FiberContext.d.ts

@@ -28,7 +28,7 @@ import { Stack } from "@fncts/base/internal/Stack";
 import { FiberTypeId } from "@fncts/io/Fiber/definition";
 import { FiberState } from "@fncts/io/FiberState";
 import { FiberStatus } from "@fncts/io/FiberStatus";
-export type FiberRefLocals = AtomicReference<HashMap<FiberRef<unknown>, Cons<readonly [FiberId.Runtime, unknown]>>>;
+export type FiberRefLocals = HashMap<FiberRef<unknown>, Cons<readonly [FiberId.Runtime, unknown]>>;
 type Erased = IO<any, any, any>;
 type ErasedCont = (a: any) => Erased;
 export declare class InterruptExit {
@@ -87,6 +87,7 @@ export declare class FiberContext<E, A> implements Fiber.Runtime<E, A>, Hashable
     awaitAsync(k: FiberState.Callback<E, A>): void;
     get children(): UIO<Conc<Fiber.Runtime<any, any>>>;
     evalOnIO<R1, E1, B, R2, E2, C>(effect: IO<R1, E1, B>, orElse: IO<R2, E2, C>, __tsplusTrace?: string): IO<R1 & R2, E1 | E2, B | C>;
+    get fiberRefs(): FiberRefs;
     get await(): UIO<Exit<E, A>>;
     run(): void;
     get scope(): FiberScope;
@@ -125,7 +126,7 @@ export declare class FiberContext<E, A> implements Fiber.Runtime<E, A>, Hashable
     private unsafeNextEffect;
     private unsafeNotifyObservers;
     private unsafeRemoveObserver;
-    private unsafeInterruptAs;
+    interruptAsFork(fiberId: FiberId): UIO<void>;
     private unsafeTryDone;
     private unsafeSetAsyncCanceller;
     private unsafeReportUnhandled;
@@ -145,6 +146,8 @@ export declare class FiberContext<E, A> implements Fiber.Runtime<E, A>, Hashable
     unsafeAddChild(child: FiberContext<unknown, unknown>): void;
     private unsafeLog;
     private unsafeLogWith;
+    private unsafeIsFatal;
+    private unsafeHandleFatalError;
     get currentSupervisor(): Supervisor<any>;
 }
 export {};

package/Fiber/api/interruptAll.d.ts

@@ -6,7 +6,7 @@ import { UIO } from "@fncts/io/IO/definition";
  * @tsplus static fncts.io.FiberOps interruptAllAs
  * @tsplus location "@fncts/io/Fiber/api/interruptAll"
  */
-export declare function interruptAllAs_(fs: Iterable<Fiber<any, any>>, id: FiberId, __tsplusTrace?: string): UIO<void>;
+export declare function interruptAllAs(fs: Iterable<Fiber<any, any>>, id: FiberId, __tsplusTrace?: string): UIO<void>;
 /**
  * Interrupts all fibers and awaits their interruption
  * @tsplus static fncts.io.FiberOps interruptAll

package/Fiber/api/interruptAsFork.d.ts

@@ -0,0 +1,8 @@
+import { Fiber } from "@fncts/io/Fiber/definition";
+import { FiberId } from "@fncts/base/data/FiberId/definition";
+import { UIO } from "@fncts/io/IO/definition";
+/**
+ * @tsplus fluent fncts.io.Fiber interruptAsFork
+ * @tsplus location "@fncts/io/Fiber/api/interruptAsFork"
+ */
+export declare function interruptAsFork<E, A>(self: Fiber<E, A>, fiberId: FiberId): UIO<void>;

package/Fiber/definition.d.ts

@@ -39,11 +39,9 @@ export interface FiberCommon<E, A> extends Fiber<E, A> {
      */
     readonly inheritRefs: UIO<void>;
     /**
-     * Interrupts the fiber as if interrupted from the specified fiber. If the
-     * fiber has already exited, the returned effect will resume immediately.
-     * Otherwise, the effect will resume when the fiber exits.
+     * Interrupts the fiber as if interrupted from the specified fiber.
      */
-    readonly interruptAs: (fiberId: FiberId) => UIO<Exit<E, A>>;
+    readonly interruptAsFork: (fiberId: FiberId) => UIO<void>;
     /**
      * Tentatively observes the fiber, but returns immediately if it is not already done.
      */
@@ -84,13 +82,13 @@ export declare class SyntheticFiber<E, A> implements FiberCommon<E, A> {
     readonly children: UIO<Conc<Fiber.Runtime<any, any>>>;
     readonly inheritRefs: UIO<void>;
     readonly poll: UIO<Maybe<Exit<E, A>>>;
-    readonly interruptAs: (fiberId: FiberId) => UIO<Exit<E, A>>;
+    readonly interruptAsFork: (fiberId: FiberId) => UIO<void>;
     readonly _tag = "SyntheticFiber";
     readonly _typeId: FiberTypeId;
     readonly _E: () => E;
     readonly _A: () => A;
     readonly await: import("../IO").UIO<import("@fncts/base/data/Exit").Exit<E, A>>;
-    constructor(id: FiberId, wait: UIO<Exit<E, A>>, children: UIO<Conc<Fiber.Runtime<any, any>>>, inheritRefs: UIO<void>, poll: UIO<Maybe<Exit<E, A>>>, interruptAs: (fiberId: FiberId) => UIO<Exit<E, A>>);
+    constructor(id: FiberId, wait: UIO<Exit<E, A>>, children: UIO<Conc<Fiber.Runtime<any, any>>>, inheritRefs: UIO<void>, poll: UIO<Maybe<Exit<E, A>>>, interruptAsFork: (fiberId: FiberId) => UIO<void>);
 }
 export type ConcreteFiber<E, A> = Fiber.Runtime<E, A> | Fiber.Synthetic<E, A>;
 /**

package/FiberRef/api.d.ts

@@ -87,3 +87,8 @@ export declare function patch<Value, Patch>(self: FiberRef.WithPatch<Value, Patc
  * @tsplus location "@fncts/io/FiberRef/api"
  */
 export declare function fork<Value, Patch>(self: FiberRef.WithPatch<Value, Patch>): Patch;
+/**
+ * @tsplus fluent fncts.io.FiberRef join
+ * @tsplus location "@fncts/io/FiberRef/api"
+ */
+export declare function join<Value, Patch>(self: FiberRef.WithPatch<Value, Patch>, oldValue: Value, newValue: Value): Value;

package/FiberRef/definition.d.ts

@@ -25,9 +25,10 @@ export declare class FiberRefInternal<Value, Patch> extends FiberRef<Value> impl
     readonly _combine: (first: Patch, second: Patch) => Patch;
     readonly _patch: (patch: Patch) => (oldValue: Value) => Value;
     readonly _fork: Patch;
+    readonly _join: (oldValue: Value, newValue: Value) => Value;
     readonly _Patch: Patch;
     private readonly id;
-    constructor(_initial: Value, _diff: (oldValue: Value, newValue: Value) => Patch, _combine: (first: Patch, second: Patch) => Patch, _patch: (patch: Patch) => (oldValue: Value) => Value, _fork: Patch);
+    constructor(_initial: Value, _diff: (oldValue: Value, newValue: Value) => Patch, _combine: (first: Patch, second: Patch) => Patch, _patch: (patch: Patch) => (oldValue: Value) => Value, _fork: Patch, _join: (oldValue: Value, newValue: Value) => Value);
     get [Symbol.hash](): number;
     [Symbol.equals](that: unknown): boolean;
 }

package/FiberRef/unsafe.d.ts

@@ -9,11 +9,12 @@ import { Supervisor } from "@fncts/io/Supervisor/definition";
 import type { LogSpan } from "../LogSpan.js";
 import type { Scheduler } from "@fncts/io/internal/Scheduler.js";
 import { Patch } from "@fncts/base/data/Patch";
+import { IsFatal } from "../internal/IsFatal.js";
 /**
  * @tsplus static fncts.io.FiberRefOps unsafeMakePatch
  * @tsplus location "@fncts/io/FiberRef/unsafe"
  */
-export declare function unsafeMakePatch<Value, Patch>(initial: Value, diff: (oldValue: Value, newValue: Value) => Patch, combine: (first: Patch, second: Patch) => Patch, patch: (patch: Patch) => (oldValue: Value) => Value, fork: Patch): FiberRef.WithPatch<Value, Patch>;
+export declare function unsafeMakePatch<Value, Patch>(initial: Value, diff: (oldValue: Value, newValue: Value) => Patch, combine: (first: Patch, second: Patch) => Patch, patch: (patch: Patch) => (oldValue: Value) => Value, fork: Patch, join?: (oldValue: Value, newValue: Value) => Value): FiberRef.WithPatch<Value, Patch>;
 /**
  * @tsplus static fncts.io.FiberRefOps unsafeMakeEnvironment
  * @tsplus location "@fncts/io/FiberRef/unsafe"
@@ -64,3 +65,13 @@ export declare const currentScheduler: import("./definition.js").FiberRef.WithPa
  * @tsplus location "@fncts/io/FiberRef/unsafe"
  */
 export declare const currentSupervisor: import("./definition.js").FiberRef.WithPatch<import("../Supervisor.js").Supervisor<any>, (_: import("../Supervisor.js").Supervisor<any>) => import("../Supervisor.js").Supervisor<any>>;
+/**
+ * @tsplus static fncts.io.FiberRefOps currentIsFatal
+ * @tsplus location "@fncts/io/FiberRef/unsafe"
+ */
+export declare const currentIsFatal: import("./definition.js").FiberRef.WithPatch<IsFatal, (_: IsFatal) => IsFatal>;
+/**
+ * @tsplus static fncts.io.FiberRefOps currentReportFatal
+ * @tsplus location "@fncts/io/FiberRef/unsafe"
+ */
+export declare const currentReportFatal: import("./definition.js").FiberRef.WithPatch<(t: unknown) => never, (_: (t: unknown) => never) => (t: unknown) => never>;

package/FiberRefs/api.d.ts

@@ -14,3 +14,8 @@ export declare function fiberRefs(self: FiberRefs): HashSet<FiberRef<unknown>>;
  * @tsplus location "@fncts/io/FiberRefs/api"
  */
 export declare function make(fiberRefLocals: HashMap<FiberRef<unknown>, Cons<readonly [FiberId.Runtime, unknown]>>): FiberRefs;
+/**
+ * @tsplus fluent fncts.io.FiberRefs forkAs
+ * @tsplus location "@fncts/io/FiberRefs/api"
+ */
+export declare function forkAs(self: FiberRefs, childId: FiberId.Runtime): FiberRefs;

package/Reloadable/api.d.ts

@@ -0,0 +1,21 @@
+import { Tag } from "@fncts/base/data/Tag/definition";
+import { IO } from "@fncts/io/IO/definition";
+import type { Reloadable } from "./definition.js";
+/**
+ * @tsplus static fncts.io.ReloadableOps get
+ * @tsplus location "@fncts/io/Reloadable/api"
+ */
+export declare function get<Service>(
+/** @tsplus auto */ tag: Tag<Reloadable<Service>>): IO<Reloadable<Service>, unknown, Service>;
+/**
+ * @tsplus static fncts.io.ReloadableOps reload
+ * @tsplus location "@fncts/io/Reloadable/api"
+ */
+export declare function reload<Service>(
+/** @tsplua auto */ tag: Tag<Reloadable<Service>>): IO<Reloadable<Service>, unknown, void>;
+/**
+ * @tsplus static fncts.io.ReloadableOps reloadFork
+ * @tsplus location "@fncts/io/Reloadable/api"
+ */
+export declare function reloadFork<Service>(
+/** @tsplus auto */ tag: Tag<Reloadable<Service>>): IO<Reloadable<Service>, never, void>;

package/Reloadable/constructors.d.ts

@@ -0,0 +1,23 @@
+import { Layer } from "@fncts/io/Layer";
+import { Tag } from "@fncts/base/data/Tag/definition";
+import { Schedule } from "@fncts/io/Schedule/definition";
+import { Environment } from "@fncts/base/data/Environment/definition";
+import { Reloadable } from "./definition.js";
+/**
+ * @tsplus static fncts.io.ReloadableOps auto
+ * @tsplus location "@fncts/io/Reloadable/constructors"
+ */
+export declare function auto<In, E, Out, Env>(layer: Layer<In, E, Out>, tag: Tag<Out>, schedule: Schedule<Env, any, any>, 
+/** @tsplus auto */ reloadableTag: Tag<Reloadable<Out>>): Layer<In | Env, E, Reloadable<Out>>;
+/**
+ * @tsplus static fncts.io.ReloadableOps autoFromConfig
+ * @tsplus location "@fncts/io/Reloadable/constructors"
+ */
+export declare function autoFromConfig<In, E, Out, Env>(layer: Layer<In, E, Out>, tag: Tag<Out>, scheduleFromConfig: (env: Environment<In>) => Schedule<Env, any, any>, 
+/** @tsplus auto */ reloadableTag: Tag<Reloadable<Out>>): Layer<In | Env, E, Reloadable<Out>>;
+/**
+ * @tsplus static fncts.io.ReloadableOps manual
+ * @tsplus location "@fncts/io/Reloadable/constructors"
+ */
+export declare function manual<In, E, Out>(layer: Layer<In, E, Out>, tag: Tag<Out>, 
+/** @tsplus auto */ reloadableTag: Tag<Reloadable<Out>>): Layer<In, E, Reloadable<Out>>;

package/Reloadable/definition.d.ts

@@ -0,0 +1,20 @@
+import { ScopedRef } from "@fncts/io/ScopedRef/definition";
+import { IO, UIO } from "@fncts/io/IO/definition";
+import { Tag } from "@fncts/base/data/Tag/definition";
+/**
+ * @tsplus type fncts.io.Reloadable
+ * @tsplus companion fncts.io.ReloadableOps
+ */
+export declare class Reloadable<Service> {
+    readonly scopedRef: ScopedRef<Service>;
+    readonly reload: IO<never, unknown, void>;
+    _Service: (_: never) => Service;
+    constructor(scopedRef: ScopedRef<Service>, reload: IO<never, unknown, void>);
+    get get(): UIO<Service>;
+    get reloadFork(): UIO<void>;
+}
+/**
+ * @tsplus derive fncts.Tag[fncts.io.Reloadable]<_> 10
+ * @tsplus location "@fncts/io/Reloadable/definition"
+ */
+export declare function deriveTag<S>(...[tag]: [S] extends [Reloadable<infer X>] ? [tag: Tag<X>] : [tag: Tag<S>]): Tag<Reloadable<S>>;

package/Reloadable.d.ts

@@ -0,0 +1,3 @@
+export * from "./Reloadable/api.js";
+export * from "./Reloadable/constructors.js";
+export * from "./Reloadable/definition.js";

package/_cjs/Clock/definition.cjs

@@ -18,10 +18,11 @@ function _interopRequireWildcard(obj, nodeInterop) { if (!nodeInterop && obj &&
 class Clock {}
 /**
  * @tsplus static fncts.io.ClockOps Tag
+ * @tsplus implicit
  */
 
 
 exports.Clock = Clock;
-const ClockTag = /*#__PURE__*/tsplus_module_1.makeTag("19435fc3-3855-4914-989b-3d23ff58fa87");
+const ClockTag = /*#__PURE__*/tsplus_module_1.makeTag("fncts.io.Clock");
 exports.ClockTag = ClockTag;
 //# sourceMappingURL=definition.cjs.map

package/_cjs/Clock/definition.cjs.map

@@ -1 +1 @@
-{"version":3,"file":"definition.cjs","mappings":";;;;;;;;;;;;;AAAA;;;;AAIM,MAAgBA,KAAhB,CAAqB;AAK3B;;;;;;AAGO,MAAMC,QAAQ,gBAAGC,+DAAjB","names":["Clock","ClockTag","tsplus_module_1"],"sourceRoot":"","sources":["../../_src/Clock/definition.ts"],"sourcesContent":[null]}
+{"version":3,"file":"definition.cjs","mappings":";;;;;;;;;;;;;AAAA;;;;AAIM,MAAgBA,KAAhB,CAAqB;AAK3B;;;;;;;AAIO,MAAMC,QAAQ,gBAAGC,wBAAW,gBAAX,CAAjB","names":["Clock","ClockTag","tsplus_module_1"],"sourceRoot":"","sources":["../../_src/Clock/definition.ts"],"sourcesContent":[null]}

package/_cjs/Console/definition.cjs

@@ -22,6 +22,6 @@ class Console {}
 
 
 exports.Console = Console;
-const ConsoleTag = /*#__PURE__*/tsplus_module_1.makeTag("d4a1e3a7-acd8-4e99-90cd-6d866a63acff");
+const ConsoleTag = /*#__PURE__*/tsplus_module_1.makeTag("fncts.io.Console");
 exports.ConsoleTag = ConsoleTag;
 //# sourceMappingURL=definition.cjs.map

package/_cjs/Console/definition.cjs.map

@@ -1 +1 @@
-{"version":3,"file":"definition.cjs","mappings":";;;;;;;;;;;;;AAAA;;;;AAIM,MAAgBA,OAAhB,CAAuB;AAM7B;;;;;;AAGO,MAAMC,UAAU,gBAAGC,+DAAnB","names":["Console","ConsoleTag","tsplus_module_1"],"sourceRoot":"","sources":["../../_src/Console/definition.ts"],"sourcesContent":[null]}
+{"version":3,"file":"definition.cjs","mappings":";;;;;;;;;;;;;AAAA;;;;AAIM,MAAgBA,OAAhB,CAAuB;AAM7B;;;;;;AAGO,MAAMC,UAAU,gBAAGC,wBAAa,kBAAb,CAAnB","names":["Console","ConsoleTag","tsplus_module_1"],"sourceRoot":"","sources":["../../_src/Console/definition.ts"],"sourcesContent":[null]}

package/_cjs/Fiber/FiberContext.cjs

@@ -179,12 +179,12 @@ class FiberContext {
     this.interruptExit = new InterruptExit(v => {
       if (this.unsafeIsInterruptible) {
         this.interruptStatus.pop();
-        return tsplus_module_11.succeedNow(v, fileName_1 + ":492:27");
+        return tsplus_module_11.succeedNow(v, fileName_1 + ":498:27");
       } else {
         return tsplus_module_11.succeed(() => {
           this.interruptStatus.pop();
           return v;
-        }, fileName_1 + ":494:24");
+        }, fileName_1 + ":500:24");
       }
     });
     this.unsafeSetRef(tsplus_module_10.currentSupervisor, this.runtimeConfig.supervisor);
@@ -204,7 +204,7 @@ class FiberContext {
 
   get inheritRefs() {
     return tsplus_module_11.defer(() => {
-      const childFiberRefLocals = this.fiberRefLocals.get;
+      const childFiberRefLocals = this.fiberRefLocals;
 
       if (tsplus_module_12.isEmpty(childFiberRefLocals)) {
         return tsplus_module_11.unit;
@@ -242,18 +242,22 @@ class FiberContext {
     return tsplus_module_11.flatMap_(tsplus_module_19.environment(fileName_1 + ":136:33"), r => tsplus_module_11.flatMap_(tsplus_module_21.make(fileName_1 + ":137:30"), p => tsplus_module_11.flatMap_(this.evalOn(tsplus_module_20.fulfill_(tsplus_module_19.provideEnvironment_(effect, r, fileName_1 + ":138:46"), p, fileName_1 + ":138:57"), tsplus_module_20.fulfill_(tsplus_module_19.provideEnvironment_(orElse, r, fileName_1 + ":138:87"), p, fileName_1 + ":138:98")), () => tsplus_module_18.wait(p, fileName_1 + ":139:17"), fileName_1 + ":138:8"), fileName_1 + ":137:18"), fileName_1 + ":136:18");
   }
 
+  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 + ":145:78"));
+      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 + ":148:38"));
+        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 + ":150:42"));
+        return tsplus_module_22.right(tsplus_module_11.succeedNow(result, fileName_1 + ":154:42"));
       }
-    }, this.fiberId, fileName_1 + ":144:29");
+    }, this.fiberId, fileName_1 + ":148:29");
   }
 
   run() {
@@ -265,19 +269,19 @@ class FiberContext {
   }
 
   get status() {
-    return tsplus_module_11.succeedNow(this.state.status, fileName_1 + ":164:25");
+    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 + ":168:22");
+    return tsplus_module_11.succeed(() => this.unsafeCaptureTrace(tsplus_module_24.empty()), fileName_1 + ":172:22");
   }
 
   interruptAs(fiberId) {
-    return this.unsafeInterruptAs(fiberId);
+    return tsplus_module_11.apSecond_(this.interruptAsFork(fiberId), this.await, fileName_1 + ":176:50");
   }
 
   evalOn(effect, orElse) {
-    return tsplus_module_11.defer(() => this.unsafeEvalOn(effect, orElse), fileName_1 + ":176:20");
+    return tsplus_module_11.defer(() => this.unsafeEvalOn(effect, orElse), fileName_1 + ":180:20");
   }
 
   get location() {
@@ -310,7 +314,7 @@ class FiberContext {
 
               if (message !== null) {
                 const oldIO = current;
-                current = tsplus_module_11.flatMap_(message, () => oldIO, fileName_1 + ":213:55");
+                current = tsplus_module_11.flatMap_(message, () => oldIO, fileName_1 + ":217:55");
               } else if (opCount === maxOpCount) {
                 this.unsafeRunLater(current);
                 current = null;
@@ -471,7 +475,7 @@ class FiberContext {
                             if (this.unsafeShouldInterrupt) {
                               if (this.unsafeExitAsync(epoch)) {
                                 this.unsafeSetInterrupting(true);
-                                current = tsplus_module_11.flatMap_(r.left, () => tsplus_module_11.failCauseNow(this.unsafeClearSuppressedCause(), fileName_1 + ":336:67"), fileName_1 + ":336:45");
+                                current = tsplus_module_11.flatMap_(r.left, () => tsplus_module_11.failCauseNow(this.unsafeClearSuppressedCause(), fileName_1 + ":340:67"), fileName_1 + ":340:45");
                               } else {
                                 current = null;
                               }
@@ -587,9 +591,11 @@ class FiberContext {
                   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 + ":431:42");
+            current = tsplus_module_11.haltNow(e, fileName_1 + ":437:42");
           }
         }
       }
@@ -607,15 +613,15 @@ class FiberContext {
   }
 
   unsafeGetRef(ref) {
-    return tsplus_module_33.getOrElse_(tsplus_module_33.map_(tsplus_module_12.get_(this.fiberRefLocals.get, ref), _ => _.head[1]), () => tsplus_module_32.initial(ref));
+    return tsplus_module_33.getOrElse_(tsplus_module_33.map_(tsplus_module_12.get_(this.fiberRefLocals, ref), _ => _.head[1]), () => tsplus_module_32.initial(ref));
   }
 
   unsafeGetRefs(fiberRefLocals) {
-    return tsplus_module_12.map_(fiberRefLocals.get, stack => stack.head[1]);
+    return tsplus_module_12.map_(fiberRefLocals, stack => stack.head[1]);
   }
 
   unsafeSetRef(ref, value) {
-    const oldState = this.fiberRefLocals.get;
+    const oldState = this.fiberRefLocals;
     const oldStack = tsplus_module_33.getOrElse_(tsplus_module_12.get_(oldState, ref), () => tsplus_module_24.empty());
     let newStack;
 
@@ -628,11 +634,11 @@ class FiberContext {
     }
 
     const newState = tsplus_module_12.set_(oldState, ref, newStack);
-    this.fiberRefLocals.set(newState);
+    this.fiberRefLocals = newState;
   }
 
   unsafeDeleteRef(ref) {
-    this.fiberRefLocals.set(tsplus_module_12.remove_(this.fiberRefLocals.get, ref));
+    this.fiberRefLocals = tsplus_module_12.remove_(this.fiberRefLocals, ref);
   }
 
   unsafePoll() {
@@ -653,7 +659,7 @@ class FiberContext {
     this.stack.push(new Finalizer(finalizer, v => {
       this.unsafeDisableInterruption();
       this.unsafeRestoreInterruptStatus();
-      return tsplus_module_11.map_(finalizer, () => v, fileName_1 + ":506:29");
+      return tsplus_module_11.map_(finalizer, () => v, fileName_1 + ":512:29");
     }));
   }
 
@@ -715,11 +721,11 @@ class FiberContext {
             this.stack.push(new TracedCont(cause => tsplus_module_11.matchCauseIO_(frame.finalizer, finalizerCause => {
               this.interruptStatus.pop();
               this.unsafeAddSuppressedCause(finalizerCause);
-              return tsplus_module_11.failCauseNow(cause, fileName_1 + ":570:43");
+              return tsplus_module_11.failCauseNow(cause, fileName_1 + ":576:43");
             }, () => {
               this.interruptStatus.pop();
-              return tsplus_module_11.failCauseNow(cause, fileName_1 + ":574:43");
-            }, fileName_1 + ":566:45"), frame.trace));
+              return tsplus_module_11.failCauseNow(cause, fileName_1 + ":580:43");
+            }, fileName_1 + ":572:45"), frame.trace));
             unwinding = false;
             break;
           }
@@ -781,26 +787,24 @@ class FiberContext {
     }
   }
 
-  unsafeInterruptAs(fiberId) {
+  interruptAsFork(fiberId) {
     const interruptedCause = tsplus_module_27.interrupt(fiberId);
-    return tsplus_module_11.defer(() => {
+    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 + ":644:52");
+        const interrupt = tsplus_module_11.failCauseNow(interruptedCause, fileName_1 + ":650: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_(asyncCanceller, () => interrupt, fileName_1 + ":648:60"));
+        this.unsafeRunLater(tsplus_module_11.flatMap_(asyncCanceller, () => interrupt, fileName_1 + ":654:60"));
       } 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;
       }
-
-      return this.await;
-    }, fileName_1 + ":635:20");
+    }, fileName_1 + ":641:14");
   }
 
   unsafeTryDone(exit, trace) {
@@ -818,7 +822,7 @@ class FiberContext {
             const mailbox = this.state.mailbox;
             this.state.mailbox = null;
             this.unsafeSetInterrupting(true);
-            return tsplus_module_11.flatMap_(mailbox, () => tsplus_module_11.fromExit(() => exit, fileName_1 + ":670:60"), fileName_1 + ":670:42");
+            return tsplus_module_11.flatMap_(mailbox, () => tsplus_module_11.fromExit(() => exit, fileName_1 + ":675:60"), fileName_1 + ":675:42");
           } 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.
@@ -841,12 +845,12 @@ class FiberContext {
             let interruptChildren = tsplus_module_11.unit;
 
             this._children.forEach(child => {
-              interruptChildren = tsplus_module_11.flatMap_(interruptChildren, () => child.interruptAs(this.fiberId), fileName_1 + ":702:58");
+              interruptChildren = tsplus_module_11.flatMap_(interruptChildren, () => child.interruptAs(this.fiberId), fileName_1 + ":707:58");
             });
 
             this._children.clear();
 
-            return tsplus_module_11.flatMap_(interruptChildren, () => tsplus_module_11.fromExit(() => exit, fileName_1 + ":706:70"), fileName_1 + ":706:52");
+            return tsplus_module_11.flatMap_(interruptChildren, () => tsplus_module_11.fromExit(() => exit, fileName_1 + ":711:70"), fileName_1 + ":711:52");
           }
         }
     }
@@ -921,19 +925,10 @@ class FiberContext {
 
   unsafeFork(io, forkScope = tsplus_module_1.nothing(), trace) {
     const childId = tsplus_module_30.unsafeMake(tsplus_module_39.parse(trace));
-    const childFiberRefLocals = tsplus_module_12.mapWithIndex_(this.fiberRefLocals.get, (fiberRef, stack) => {
-      const oldValue = stack.head[1];
-      const newValue = tsplus_module_32.patch(fiberRef)(tsplus_module_32.fork(fiberRef))(oldValue);
-
-      if (oldValue === newValue) {
-        return stack;
-      } else {
-        return tsplus_module_24.cons([childId, newValue], stack);
-      }
-    });
+    const childFiberRefLocals = tsplus_module_13.forkAs(this.fiberRefs, childId).fiberRefLocals;
     const parentScope = tsplus_module_33.getOrElse_(tsplus_module_33.orElse_(forkScope, () => this.unsafeGetRef(tsplus_module_10.forkScopeOverride)), () => this.scope);
     const grandChildren = new Set();
-    const childContext = new FiberContext(childId, this.runtimeConfig, tsplus_module_9.single(this.unsafeIsInterruptible), new _AtomicReference.AtomicReference(childFiberRefLocals), grandChildren);
+    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);
@@ -942,7 +937,7 @@ class FiberContext {
       });
     }
 
-    const childIO = !parentScope.unsafeAdd(childContext) ? tsplus_module_31.interruptAs(parentScope.fiberId, fileName_1 + ":835:74") : io;
+    const childIO = !parentScope.unsafeAdd(childContext) ? tsplus_module_31.interruptAs(parentScope.fiberId, fileName_1 + ":832:74") : io;
     childContext.nextIO = childIO;
     this.unsafeGetRef(tsplus_module_10.currentScheduler).scheduleTask(() => childContext.runUntil(this.runtimeConfig.yieldOpCount));
     return childContext;
@@ -998,7 +993,7 @@ class FiberContext {
           this.unsafeCompleteRace(right, left, race.rightWins, raceIndicator, cb);
         }
       }
-    }, tsplus_module_3.combine_(left.fiberId, right.fiberId), fileName_1 + ":884:20");
+    }, tsplus_module_3.combine_(left.fiberId, right.fiberId), fileName_1 + ":881:20");
   }
 
   unsafeCompleteRace(winner, loser, cont, ab, cb) {
@@ -1021,11 +1016,11 @@ class FiberContext {
 
   unsafeEvalOn(effect, orElse) {
     if (this.state._tag === "Executing") {
-      const newMailbox = this.state.mailbox == null ? effect : tsplus_module_11.flatMap_(this.state.mailbox, () => effect, fileName_1 + ":928:92");
+      const newMailbox = this.state.mailbox == null ? effect : tsplus_module_11.flatMap_(this.state.mailbox, () => effect, fileName_1 + ":925:92");
       this.state.mailbox = newMailbox;
       return tsplus_module_11.unit;
     } else {
-      return tsplus_module_11.asUnit(orElse, fileName_1 + ":932:20");
+      return tsplus_module_11.asUnit(orElse, fileName_1 + ":929:20");
     }
   }
 
@@ -1042,14 +1037,14 @@ class FiberContext {
   unsafeAddChild(child) {
     this.unsafeEvalOn(tsplus_module_11.succeed(() => {
       this._children.add(child);
-    }, fileName_1 + ":948:17"), tsplus_module_11.unit);
+    }, fileName_1 + ":945: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.get, spans, annotations);
+    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) {
@@ -1069,12 +1064,20 @@ class FiberContext {
 
       contextMap = map;
     } else {
-      contextMap = this.fiberRefLocals.get;
+      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);
   }