effect 2.0.0-next.8 → 2.0.0

package/dist/esm/internal/fiber.js

@@ -0,0 +1,217 @@
+import * as Clock from "../Clock.js";
+import * as Either from "../Either.js";
+import * as Exit from "../Exit.js";
+import * as FiberId from "../FiberId.js";
+import * as FiberStatus from "../FiberStatus.js";
+import { dual, pipe } from "../Function.js";
+import * as HashSet from "../HashSet.js";
+import * as number from "../Number.js";
+import * as Option from "../Option.js";
+import * as order from "../Order.js";
+import { pipeArguments } from "../Pipeable.js";
+import { hasProperty } from "../Predicate.js";
+import * as core from "./core.js";
+import * as fiberScope from "./fiberScope.js";
+import * as runtimeFlags from "./runtimeFlags.js";
+/** @internal */
+const FiberSymbolKey = "effect/Fiber";
+/** @internal */
+export const FiberTypeId = /*#__PURE__*/Symbol.for(FiberSymbolKey);
+/** @internal */
+export const fiberVariance = {
+  /* c8 ignore next */
+  _E: _ => _,
+  /* c8 ignore next */
+  _A: _ => _
+};
+/** @internal */
+const fiberProto = {
+  [FiberTypeId]: fiberVariance,
+  pipe() {
+    return pipeArguments(this, arguments);
+  }
+};
+/** @internal */
+const RuntimeFiberSymbolKey = "effect/Fiber";
+/** @internal */
+export const RuntimeFiberTypeId = /*#__PURE__*/Symbol.for(RuntimeFiberSymbolKey);
+/** @internal */
+export const Order = /*#__PURE__*/pipe( /*#__PURE__*/order.tuple(number.Order, number.Order), /*#__PURE__*/order.mapInput(fiber => [fiber.id().startTimeMillis, fiber.id().id]));
+/** @internal */
+export const isFiber = u => hasProperty(u, FiberTypeId);
+/** @internal */
+export const isRuntimeFiber = self => RuntimeFiberTypeId in self;
+/** @internal */
+export const _await = self => self.await;
+/** @internal */
+export const children = self => self.children;
+/** @internal */
+export const done = exit => ({
+  ...fiberProto,
+  id: () => FiberId.none,
+  await: core.succeed(exit),
+  children: core.succeed([]),
+  inheritAll: core.unit,
+  poll: core.succeed(Option.some(exit)),
+  interruptAsFork: () => core.unit
+});
+/** @internal */
+export const dump = self => core.map(self.status, status => ({
+  id: self.id(),
+  status
+}));
+/** @internal */
+export const dumpAll = fibers => core.forEachSequential(fibers, dump);
+/** @internal */
+export const fail = error => done(Exit.fail(error));
+/** @internal */
+export const failCause = cause => done(Exit.failCause(cause));
+/** @internal */
+export const fromEffect = effect => core.map(core.exit(effect), done);
+/** @internal */
+export const id = self => self.id();
+/** @internal */
+export const inheritAll = self => self.inheritAll;
+/** @internal */
+export const interrupted = fiberId => done(Exit.interrupt(fiberId));
+/** @internal */
+export const interruptAll = fibers => core.flatMap(core.fiberId, fiberId => pipe(fibers, interruptAllAs(fiberId)));
+/** @internal */
+export const interruptAllAs = /*#__PURE__*/dual(2, (fibers, fiberId) => pipe(core.forEachSequentialDiscard(fibers, interruptAsFork(fiberId)), core.zipRight(pipe(fibers, core.forEachSequentialDiscard(_await)))));
+/** @internal */
+export const interruptAsFork = /*#__PURE__*/dual(2, (self, fiberId) => self.interruptAsFork(fiberId));
+/** @internal */
+export const join = self => core.zipLeft(core.flatten(self.await), self.inheritAll);
+/** @internal */
+export const map = /*#__PURE__*/dual(2, (self, f) => mapEffect(self, a => core.sync(() => f(a))));
+/** @internal */
+export const mapEffect = /*#__PURE__*/dual(2, (self, f) => ({
+  ...fiberProto,
+  id: () => self.id(),
+  await: core.flatMap(self.await, Exit.forEachEffect(f)),
+  children: self.children,
+  inheritAll: self.inheritAll,
+  poll: core.flatMap(self.poll, result => {
+    switch (result._tag) {
+      case "None":
+        {
+          return core.succeed(Option.none());
+        }
+      case "Some":
+        {
+          return pipe(Exit.forEachEffect(result.value, f), core.map(Option.some));
+        }
+    }
+  }),
+  interruptAsFork: id => self.interruptAsFork(id)
+}));
+/** @internal */
+export const mapFiber = /*#__PURE__*/dual(2, (self, f) => core.map(self.await, Exit.match({
+  onFailure: cause => failCause(cause),
+  onSuccess: a => f(a)
+})));
+/** @internal */
+export const match = /*#__PURE__*/dual(2, (self, {
+  onFiber,
+  onRuntimeFiber
+}) => {
+  if (isRuntimeFiber(self)) {
+    return onRuntimeFiber(self);
+  }
+  return onFiber(self);
+});
+/** @internal */
+export const never = {
+  ...fiberProto,
+  id: () => FiberId.none,
+  await: core.never,
+  children: /*#__PURE__*/core.succeed([]),
+  inheritAll: core.never,
+  poll: /*#__PURE__*/core.succeed( /*#__PURE__*/Option.none()),
+  interruptAsFork: () => core.never
+};
+/** @internal */
+export const orElse = /*#__PURE__*/dual(2, (self, that) => ({
+  ...fiberProto,
+  id: () => FiberId.getOrElse(self.id(), that.id()),
+  await: core.zipWith(self.await, that.await, (exit1, exit2) => Exit.isSuccess(exit1) ? exit1 : exit2),
+  children: self.children,
+  inheritAll: core.zipRight(that.inheritAll, self.inheritAll),
+  poll: core.zipWith(self.poll, that.poll, (option1, option2) => {
+    switch (option1._tag) {
+      case "None":
+        {
+          return Option.none();
+        }
+      case "Some":
+        {
+          return Exit.isSuccess(option1.value) ? option1 : option2;
+        }
+    }
+  }),
+  interruptAsFork: id => pipe(core.interruptAsFiber(self, id), core.zipRight(pipe(that, core.interruptAsFiber(id))), core.asUnit)
+}));
+/** @internal */
+export const orElseEither = /*#__PURE__*/dual(2, (self, that) => orElse(map(self, Either.left), map(that, Either.right)));
+/** @internal */
+export const poll = self => self.poll;
+// forked from https://github.com/sindresorhus/parse-ms/blob/4da2ffbdba02c6e288c08236695bdece0adca173/index.js
+// MIT License
+// Copyright (c) Sindre Sorhus <sindresorhus@gmail.com> (sindresorhus.com)
+/** @internal */
+const parseMs = milliseconds => {
+  const roundTowardsZero = milliseconds > 0 ? Math.floor : Math.ceil;
+  return {
+    days: roundTowardsZero(milliseconds / 86400000),
+    hours: roundTowardsZero(milliseconds / 3600000) % 24,
+    minutes: roundTowardsZero(milliseconds / 60000) % 60,
+    seconds: roundTowardsZero(milliseconds / 1000) % 60,
+    milliseconds: roundTowardsZero(milliseconds) % 1000,
+    microseconds: roundTowardsZero(milliseconds * 1000) % 1000,
+    nanoseconds: roundTowardsZero(milliseconds * 1e6) % 1000
+  };
+};
+/** @internal */
+const renderStatus = status => {
+  if (FiberStatus.isDone(status)) {
+    return "Done";
+  }
+  if (FiberStatus.isRunning(status)) {
+    return "Running";
+  }
+  const isInterruptible = runtimeFlags.interruptible(status.runtimeFlags) ? "interruptible" : "uninterruptible";
+  return `Suspended(${isInterruptible})`;
+};
+/** @internal */
+export const pretty = self => core.flatMap(Clock.currentTimeMillis, now => core.map(dump(self), dump => {
+  const time = now - dump.id.startTimeMillis;
+  const {
+    days,
+    hours,
+    milliseconds,
+    minutes,
+    seconds
+  } = parseMs(time);
+  const lifeMsg = (days === 0 ? "" : `${days}d`) + (days === 0 && hours === 0 ? "" : `${hours}h`) + (days === 0 && hours === 0 && minutes === 0 ? "" : `${minutes}m`) + (days === 0 && hours === 0 && minutes === 0 && seconds === 0 ? "" : `${seconds}s`) + `${milliseconds}ms`;
+  const waitMsg = FiberStatus.isSuspended(dump.status) ? (() => {
+    const ids = FiberId.ids(dump.status.blockingOn);
+    return HashSet.size(ids) > 0 ? `waiting on ` + Array.from(ids).map(id => `${id}`).join(", ") : "";
+  })() : "";
+  const statusMsg = renderStatus(dump.status);
+  return `[Fiber](#${dump.id.id}) (${lifeMsg}) ${waitMsg}\n   Status: ${statusMsg}`;
+}));
+/** @internal */
+export const unsafeRoots = () => Array.from(fiberScope.globalScope.roots);
+/** @internal */
+export const roots = /*#__PURE__*/core.sync(unsafeRoots);
+/** @internal */
+export const status = self => self.status;
+/** @internal */
+export const succeed = value => done(Exit.succeed(value));
+/** @internal */
+export const unit = /*#__PURE__*/succeed(void 0);
+/** @internal */
+export const currentFiberURI = "effect/FiberCurrent";
+/** @internal */
+export const getCurrentFiber = () => Option.fromNullable(globalThis[currentFiberURI]);
+//# sourceMappingURL=fiber.js.map

package/dist/esm/internal/fiber.js.map

@@ -0,0 +1 @@
+{"version":3,"file":"fiber.js","names":["Clock","Either","Exit","FiberId","FiberStatus","dual","pipe","HashSet","number","Option","order","pipeArguments","hasProperty","core","fiberScope","runtimeFlags","FiberSymbolKey","FiberTypeId","Symbol","for","fiberVariance","_E","_","_A","fiberProto","arguments","RuntimeFiberSymbolKey","RuntimeFiberTypeId","Order","tuple","mapInput","fiber","id","startTimeMillis","isFiber","u","isRuntimeFiber","self","_await","await","children","done","exit","none","succeed","inheritAll","unit","poll","some","interruptAsFork","dump","map","status","dumpAll","fibers","forEachSequential","fail","error","failCause","cause","fromEffect","effect","interrupted","fiberId","interrupt","interruptAll","flatMap","interruptAllAs","forEachSequentialDiscard","zipRight","join","zipLeft","flatten","f","mapEffect","a","sync","forEachEffect","result","_tag","value","mapFiber","match","onFailure","onSuccess","onFiber","onRuntimeFiber","never","orElse","that","getOrElse","zipWith","exit1","exit2","isSuccess","option1","option2","interruptAsFiber","asUnit","orElseEither","left","right","parseMs","milliseconds","roundTowardsZero","Math","floor","ceil","days","hours","minutes","seconds","microseconds","nanoseconds","renderStatus","isDone","isRunning","isInterruptible","interruptible","pretty","currentTimeMillis","now","time","lifeMsg","waitMsg","isSuspended","ids","blockingOn","size","Array","from","statusMsg","unsafeRoots","globalScope","roots","currentFiberURI","getCurrentFiber","fromNullable","globalThis"],"sources":["../../../src/internal/fiber.ts"],"sourcesContent":[null],"mappings":"AACA,OAAO,KAAKA,KAAK,MAAM,aAAa;AAEpC,OAAO,KAAKC,MAAM,MAAM,cAAc;AACtC,OAAO,KAAKC,IAAI,MAAM,YAAY;AAElC,OAAO,KAAKC,OAAO,MAAM,eAAe;AACxC,OAAO,KAAKC,WAAW,MAAM,mBAAmB;AAChD,SAASC,IAAI,EAAEC,IAAI,QAAQ,gBAAgB;AAC3C,OAAO,KAAKC,OAAO,MAAM,eAAe;AACxC,OAAO,KAAKC,MAAM,MAAM,cAAc;AACtC,OAAO,KAAKC,MAAM,MAAM,cAAc;AACtC,OAAO,KAAKC,KAAK,MAAM,aAAa;AACpC,SAASC,aAAa,QAAQ,gBAAgB;AAC9C,SAASC,WAAW,QAAQ,iBAAiB;AAC7C,OAAO,KAAKC,IAAI,MAAM,WAAW;AACjC,OAAO,KAAKC,UAAU,MAAM,iBAAiB;AAC7C,OAAO,KAAKC,YAAY,MAAM,mBAAmB;AAEjD;AACA,MAAMC,cAAc,GAAG,cAAc;AAErC;AACA,OAAO,MAAMC,WAAW,gBAAsBC,MAAM,CAACC,GAAG,CACtDH,cAAc,CACM;AAEtB;AACA,OAAO,MAAMI,aAAa,GAAG;EAC3B;EACAC,EAAE,EAAGC,CAAQ,IAAKA,CAAC;EACnB;EACAC,EAAE,EAAGD,CAAQ,IAAKA;CACnB;AAED;AACA,MAAME,UAAU,GAAG;EACjB,CAACP,WAAW,GAAGG,aAAa;EAC5Bd,IAAIA,CAAA;IACF,OAAOK,aAAa,CAAC,IAAI,EAAEc,SAAS,CAAC;EACvC;CACD;AAED;AACA,MAAMC,qBAAqB,GAAG,cAAc;AAE5C;AACA,OAAO,MAAMC,kBAAkB,gBAA6BT,MAAM,CAACC,GAAG,CACpEO,qBAAqB,CACM;AAE7B;AACA,OAAO,MAAME,KAAK,gBAAsDtB,IAAI,eAC1EI,KAAK,CAACmB,KAAK,CAACrB,MAAM,CAACoB,KAAK,EAAEpB,MAAM,CAACoB,KAAK,CAAC,eACvClB,KAAK,CAACoB,QAAQ,CAAEC,KAA2C,IACzD,CACGA,KAAK,CAACC,EAAE,EAAsB,CAACC,eAAe,EAC9CF,KAAK,CAACC,EAAE,EAAsB,CAACA,EAAE,CAC1B,CACX,CACF;AAED;AACA,OAAO,MAAME,OAAO,GAAIC,CAAU,IAAyCvB,WAAW,CAACuB,CAAC,EAAElB,WAAW,CAAC;AAEtG;AACA,OAAO,MAAMmB,cAAc,GAAUC,IAAuB,IAC1DV,kBAAkB,IAAIU,IAAI;AAE5B;AACA,OAAO,MAAMC,MAAM,GAAUD,IAAuB,IAAmDA,IAAI,CAACE,KAAK;AAEjH;AACA,OAAO,MAAMC,QAAQ,GACnBH,IAAuB,IAC8CA,IAAI,CAACG,QAAQ;AAEpF;AACA,OAAO,MAAMC,IAAI,GAAUC,IAAqB,KAAyB;EACvE,GAAGlB,UAAU;EACbQ,EAAE,EAAEA,CAAA,KAAM7B,OAAO,CAACwC,IAAI;EACtBJ,KAAK,EAAE1B,IAAI,CAAC+B,OAAO,CAACF,IAAI,CAAC;EACzBF,QAAQ,EAAE3B,IAAI,CAAC+B,OAAO,CAAC,EAAE,CAAC;EAC1BC,UAAU,EAAEhC,IAAI,CAACiC,IAAI;EACrBC,IAAI,EAAElC,IAAI,CAAC+B,OAAO,CAACnC,MAAM,CAACuC,IAAI,CAACN,IAAI,CAAC,CAAC;EACrCO,eAAe,EAAEA,CAAA,KAAMpC,IAAI,CAACiC;CAC7B,CAAC;AAEF;AACA,OAAO,MAAMI,IAAI,GAAUb,IAA8B,IACvDxB,IAAI,CAACsC,GAAG,CAACd,IAAI,CAACe,MAAM,EAAGA,MAAM,KAAM;EAAEpB,EAAE,EAAEK,IAAI,CAACL,EAAE,EAAE;EAAEoB;AAAM,CAAE,CAAC,CAAC;AAEhE;AACA,OAAO,MAAMC,OAAO,GAClBC,MAAsD,IACGzC,IAAI,CAAC0C,iBAAiB,CAACD,MAAM,EAAEJ,IAAI,CAAC;AAE/F;AACA,OAAO,MAAMM,IAAI,GAAOC,KAAQ,IAA4BhB,IAAI,CAACvC,IAAI,CAACsD,IAAI,CAACC,KAAK,CAAC,CAAC;AAElF;AACA,OAAO,MAAMC,SAAS,GAAOC,KAAqB,IAA4BlB,IAAI,CAACvC,IAAI,CAACwD,SAAS,CAACC,KAAK,CAAC,CAAC;AAEzG;AACA,OAAO,MAAMC,UAAU,GAAUC,MAAkC,IACjEhD,IAAI,CAACsC,GAAG,CAACtC,IAAI,CAAC6B,IAAI,CAACmB,MAAM,CAAC,EAAEpB,IAAI,CAAC;AAEnC;AACA,OAAO,MAAMT,EAAE,GAAUK,IAAuB,IAAsBA,IAAI,CAACL,EAAE,EAAE;AAE/E;AACA,OAAO,MAAMa,UAAU,GAAUR,IAAuB,IAAwCA,IAAI,CAACQ,UAAU;AAE/G;AACA,OAAO,MAAMiB,WAAW,GAAIC,OAAwB,IAAgCtB,IAAI,CAACvC,IAAI,CAAC8D,SAAS,CAACD,OAAO,CAAC,CAAC;AAEjH;AACA,OAAO,MAAME,YAAY,GAAIX,MAAuC,IAClEzC,IAAI,CAACqD,OAAO,CAACrD,IAAI,CAACkD,OAAO,EAAGA,OAAO,IAAKzD,IAAI,CAACgD,MAAM,EAAEa,cAAc,CAACJ,OAAO,CAAC,CAAC,CAAC;AAEhF;AACA,OAAO,MAAMI,cAAc,gBAAG9D,IAAI,CAGhC,CAAC,EAAE,CAACiD,MAAM,EAAES,OAAO,KACnBzD,IAAI,CACFO,IAAI,CAACuD,wBAAwB,CAACd,MAAM,EAAEL,eAAe,CAACc,OAAO,CAAC,CAAC,EAC/DlD,IAAI,CAACwD,QAAQ,CAAC/D,IAAI,CAACgD,MAAM,EAAEzC,IAAI,CAACuD,wBAAwB,CAAC9B,MAAM,CAAC,CAAC,CAAC,CACnE,CAAC;AAEJ;AACA,OAAO,MAAMW,eAAe,gBAAG5C,IAAI,CAGjC,CAAC,EAAE,CAACgC,IAAI,EAAE0B,OAAO,KAAK1B,IAAI,CAACY,eAAe,CAACc,OAAO,CAAC,CAAC;AAEtD;AACA,OAAO,MAAMO,IAAI,GAAUjC,IAAuB,IAChDxB,IAAI,CAAC0D,OAAO,CAAC1D,IAAI,CAAC2D,OAAO,CAACnC,IAAI,CAACE,KAAK,CAAC,EAAEF,IAAI,CAACQ,UAAU,CAAC;AAEzD;AACA,OAAO,MAAMM,GAAG,gBAAG9C,IAAI,CAGrB,CAAC,EAAE,CAACgC,IAAI,EAAEoC,CAAC,KAAKC,SAAS,CAACrC,IAAI,EAAGsC,CAAC,IAAK9D,IAAI,CAAC+D,IAAI,CAAC,MAAMH,CAAC,CAACE,CAAC,CAAC,CAAC,CAAC,CAAC;AAEhE;AACA,OAAO,MAAMD,SAAS,gBAAGrE,IAAI,CAG3B,CAAC,EAAE,CAACgC,IAAI,EAAEoC,CAAC,MAAM;EACjB,GAAGjD,UAAU;EACbQ,EAAE,EAAEA,CAAA,KAAMK,IAAI,CAACL,EAAE,EAAE;EACnBO,KAAK,EAAE1B,IAAI,CAACqD,OAAO,CAAC7B,IAAI,CAACE,KAAK,EAAErC,IAAI,CAAC2E,aAAa,CAACJ,CAAC,CAAC,CAAC;EACtDjC,QAAQ,EAAEH,IAAI,CAACG,QAAQ;EACvBK,UAAU,EAAER,IAAI,CAACQ,UAAU;EAC3BE,IAAI,EAAElC,IAAI,CAACqD,OAAO,CAAC7B,IAAI,CAACU,IAAI,EAAG+B,MAAM,IAAI;IACvC,QAAQA,MAAM,CAACC,IAAI;MACjB,KAAK,MAAM;QAAE;UACX,OAAOlE,IAAI,CAAC+B,OAAO,CAACnC,MAAM,CAACkC,IAAI,EAAE,CAAC;QACpC;MACA,KAAK,MAAM;QAAE;UACX,OAAOrC,IAAI,CACTJ,IAAI,CAAC2E,aAAa,CAACC,MAAM,CAACE,KAAK,EAAEP,CAAC,CAAC,EACnC5D,IAAI,CAACsC,GAAG,CAAC1C,MAAM,CAACuC,IAAI,CAAC,CACtB;QACH;IACF;EACF,CAAC,CAAC;EACFC,eAAe,EAAGjB,EAAE,IAAKK,IAAI,CAACY,eAAe,CAACjB,EAAE;CACjD,CAAC,CAAC;AAEH;AACA,OAAO,MAAMiD,QAAQ,gBAAG5E,IAAI,CAQ1B,CAAC,EAAE,CACHgC,IAAuB,EACvBoC,CAA+B,KAE/B5D,IAAI,CAACsC,GAAG,CACNd,IAAI,CAACE,KAAK,EACVrC,IAAI,CAACgF,KAAK,CAAC;EACTC,SAAS,EAAGxB,KAAK,IAA6BD,SAAS,CAACC,KAAK,CAAC;EAC9DyB,SAAS,EAAGT,CAAC,IAAKF,CAAC,CAACE,CAAC;CACtB,CAAC,CACH,CAAC;AAEJ;AACA,OAAO,MAAMO,KAAK,gBAAG7E,IAAI,CAcvB,CAAC,EAAE,CAACgC,IAAI,EAAE;EAAEgD,OAAO;EAAEC;AAAc,CAAE,KAAI;EACzC,IAAIlD,cAAc,CAACC,IAAI,CAAC,EAAE;IACxB,OAAOiD,cAAc,CAACjD,IAAI,CAAC;EAC7B;EACA,OAAOgD,OAAO,CAAChD,IAAI,CAAC;AACtB,CAAC,CAAC;AAEF;AACA,OAAO,MAAMkD,KAAK,GAA8B;EAC9C,GAAG/D,UAAU;EACbQ,EAAE,EAAEA,CAAA,KAAM7B,OAAO,CAACwC,IAAI;EACtBJ,KAAK,EAAE1B,IAAI,CAAC0E,KAAK;EACjB/C,QAAQ,eAAE3B,IAAI,CAAC+B,OAAO,CAAC,EAAE,CAAC;EAC1BC,UAAU,EAAEhC,IAAI,CAAC0E,KAAK;EACtBxC,IAAI,eAAElC,IAAI,CAAC+B,OAAO,eAACnC,MAAM,CAACkC,IAAI,EAAE,CAAC;EACjCM,eAAe,EAAEA,CAAA,KAAMpC,IAAI,CAAC0E;CAC7B;AAED;AACA,OAAO,MAAMC,MAAM,gBAAGnF,IAAI,CAGxB,CAAC,EAAE,CAACgC,IAAI,EAAEoD,IAAI,MAAM;EACpB,GAAGjE,UAAU;EACbQ,EAAE,EAAEA,CAAA,KAAM7B,OAAO,CAACuF,SAAS,CAACrD,IAAI,CAACL,EAAE,EAAE,EAAEyD,IAAI,CAACzD,EAAE,EAAE,CAAC;EACjDO,KAAK,EAAE1B,IAAI,CAAC8E,OAAO,CACjBtD,IAAI,CAACE,KAAK,EACVkD,IAAI,CAAClD,KAAK,EACV,CAACqD,KAAK,EAAEC,KAAK,KAAM3F,IAAI,CAAC4F,SAAS,CAACF,KAAK,CAAC,GAAGA,KAAK,GAAGC,KAAM,CAC1D;EACDrD,QAAQ,EAAEH,IAAI,CAACG,QAAQ;EACvBK,UAAU,EAAEhC,IAAI,CAACwD,QAAQ,CAACoB,IAAI,CAAC5C,UAAU,EAAER,IAAI,CAACQ,UAAU,CAAC;EAC3DE,IAAI,EAAElC,IAAI,CAAC8E,OAAO,CAChBtD,IAAI,CAACU,IAAI,EACT0C,IAAI,CAAC1C,IAAI,EACT,CAACgD,OAAO,EAAEC,OAAO,KAAI;IACnB,QAAQD,OAAO,CAAChB,IAAI;MAClB,KAAK,MAAM;QAAE;UACX,OAAOtE,MAAM,CAACkC,IAAI,EAAE;QACtB;MACA,KAAK,MAAM;QAAE;UACX,OAAOzC,IAAI,CAAC4F,SAAS,CAACC,OAAO,CAACf,KAAK,CAAC,GAAGe,OAAO,GAAGC,OAAO;QAC1D;IACF;EACF,CAAC,CACF;EACD/C,eAAe,EAAGjB,EAAE,IAClB1B,IAAI,CACFO,IAAI,CAACoF,gBAAgB,CAAC5D,IAAI,EAAEL,EAAE,CAAC,EAC/BnB,IAAI,CAACwD,QAAQ,CAAC/D,IAAI,CAACmF,IAAI,EAAE5E,IAAI,CAACoF,gBAAgB,CAACjE,EAAE,CAAC,CAAC,CAAC,EACpDnB,IAAI,CAACqF,MAAM;CAEhB,CAAC,CAAC;AAEH;AACA,OAAO,MAAMC,YAAY,gBAAG9F,IAAI,CAG9B,CAAC,EAAE,CAACgC,IAAI,EAAEoD,IAAI,KAAKD,MAAM,CAACrC,GAAG,CAACd,IAAI,EAAEpC,MAAM,CAACmG,IAAI,CAAC,EAAEjD,GAAG,CAACsC,IAAI,EAAExF,MAAM,CAACoG,KAAK,CAAC,CAAC,CAAC;AAE7E;AACA,OAAO,MAAMtD,IAAI,GAAUV,IAAuB,IAChDA,IAAI,CAACU,IAAI;AAEX;AACA;AACA;AACA;AACA,MAAMuD,OAAO,GAAIC,YAAoB,IAAI;EACvC,MAAMC,gBAAgB,GAAGD,YAAY,GAAG,CAAC,GAAGE,IAAI,CAACC,KAAK,GAAGD,IAAI,CAACE,IAAI;EAClE,OAAO;IACLC,IAAI,EAAEJ,gBAAgB,CAACD,YAAY,GAAG,QAAQ,CAAC;IAC/CM,KAAK,EAAEL,gBAAgB,CAACD,YAAY,GAAG,OAAO,CAAC,GAAG,EAAE;IACpDO,OAAO,EAAEN,gBAAgB,CAACD,YAAY,GAAG,KAAK,CAAC,GAAG,EAAE;IACpDQ,OAAO,EAAEP,gBAAgB,CAACD,YAAY,GAAG,IAAI,CAAC,GAAG,EAAE;IACnDA,YAAY,EAAEC,gBAAgB,CAACD,YAAY,CAAC,GAAG,IAAI;IACnDS,YAAY,EAAER,gBAAgB,CAACD,YAAY,GAAG,IAAI,CAAC,GAAG,IAAI;IAC1DU,WAAW,EAAET,gBAAgB,CAACD,YAAY,GAAG,GAAG,CAAC,GAAG;GACrD;AACH,CAAC;AAED;AACA,MAAMW,YAAY,GAAI9D,MAA+B,IAAY;EAC/D,IAAIhD,WAAW,CAAC+G,MAAM,CAAC/D,MAAM,CAAC,EAAE;IAC9B,OAAO,MAAM;EACf;EACA,IAAIhD,WAAW,CAACgH,SAAS,CAAChE,MAAM,CAAC,EAAE;IACjC,OAAO,SAAS;EAClB;EAEA,MAAMiE,eAAe,GAAGtG,YAAY,CAACuG,aAAa,CAAClE,MAAM,CAACrC,YAAY,CAAC,GACrE,eAAe,GACf,iBAAiB;EACnB,OAAO,aAAasG,eAAe,GAAG;AACxC,CAAC;AAED;AACA,OAAO,MAAME,MAAM,GAAUlF,IAA8B,IACzDxB,IAAI,CAACqD,OAAO,CAAClE,KAAK,CAACwH,iBAAiB,EAAGC,GAAG,IACxC5G,IAAI,CAACsC,GAAG,CAACD,IAAI,CAACb,IAAI,CAAC,EAAGa,IAAI,IAAI;EAC5B,MAAMwE,IAAI,GAAGD,GAAG,GAAGvE,IAAI,CAAClB,EAAE,CAACC,eAAe;EAC1C,MAAM;IAAE2E,IAAI;IAAEC,KAAK;IAAEN,YAAY;IAAEO,OAAO;IAAEC;EAAO,CAAE,GAAGT,OAAO,CAACoB,IAAI,CAAC;EACrE,MAAMC,OAAO,GAAG,CAACf,IAAI,KAAK,CAAC,GAAG,EAAE,GAAG,GAAGA,IAAI,GAAG,KAC1CA,IAAI,KAAK,CAAC,IAAIC,KAAK,KAAK,CAAC,GAAG,EAAE,GAAG,GAAGA,KAAK,GAAG,CAAC,IAC7CD,IAAI,KAAK,CAAC,IAAIC,KAAK,KAAK,CAAC,IAAIC,OAAO,KAAK,CAAC,GAAG,EAAE,GAAG,GAAGA,OAAO,GAAG,CAAC,IAChEF,IAAI,KAAK,CAAC,IAAIC,KAAK,KAAK,CAAC,IAAIC,OAAO,KAAK,CAAC,IAAIC,OAAO,KAAK,CAAC,GAAG,EAAE,GAAG,GAAGA,OAAO,GAAG,CAAC,GAClF,GAAGR,YAAY,IAAI;EACrB,MAAMqB,OAAO,GAAGxH,WAAW,CAACyH,WAAW,CAAC3E,IAAI,CAACE,MAAM,CAAC,GAClD,CAAC,MAAK;IACJ,MAAM0E,GAAG,GAAG3H,OAAO,CAAC2H,GAAG,CAAC5E,IAAI,CAACE,MAAM,CAAC2E,UAAU,CAAC;IAC/C,OAAOxH,OAAO,CAACyH,IAAI,CAACF,GAAG,CAAC,GAAG,CAAC,GACxB,aAAa,GAAGG,KAAK,CAACC,IAAI,CAACJ,GAAG,CAAC,CAAC3E,GAAG,CAAEnB,EAAE,IAAK,GAAGA,EAAE,EAAE,CAAC,CAACsC,IAAI,CAAC,IAAI,CAAC,GAC/D,EAAE;EACR,CAAC,EAAC,CAAE,GACJ,EAAE;EACJ,MAAM6D,SAAS,GAAGjB,YAAY,CAAChE,IAAI,CAACE,MAAM,CAAC;EAC3C,OAAO,YAAYF,IAAI,CAAClB,EAAE,CAACA,EAAE,MAAM2F,OAAO,KAAKC,OAAO,gBAAgBO,SAAS,EAAE;AACnF,CAAC,CAAC,CAAC;AAEP;AACA,OAAO,MAAMC,WAAW,GAAGA,CAAA,KAA2CH,KAAK,CAACC,IAAI,CAACpH,UAAU,CAACuH,WAAW,CAACC,KAAK,CAAC;AAE9G;AACA,OAAO,MAAMA,KAAK,gBAAqEzH,IAAI,CAAC+D,IAAI,CAACwD,WAAW,CAAC;AAE7G;AACA,OAAO,MAAMhF,MAAM,GAAUf,IAA8B,IACzDA,IAAI,CAACe,MAAM;AAEb;AACA,OAAO,MAAMR,OAAO,GAAOoC,KAAQ,IAA4BvC,IAAI,CAACvC,IAAI,CAAC0C,OAAO,CAACoC,KAAK,CAAC,CAAC;AAExF;AACA,OAAO,MAAMlC,IAAI,gBAA6BF,OAAO,CAAC,KAAK,CAAC,CAAC;AAE7D;AACA,OAAO,MAAM2F,eAAe,GAAG,qBAAqB;AAEpD;AACA,OAAO,MAAMC,eAAe,GAAGA,CAAA,KAC7B/H,MAAM,CAACgI,YAAY,CAAEC,UAAkB,CAACH,eAAe,CAAC,CAAC"}

package/dist/esm/internal/fiberId.js

@@ -0,0 +1,215 @@
+import * as Equal from "../Equal.js";
+import { dual, pipe } from "../Function.js";
+import { globalValue } from "../GlobalValue.js";
+import * as Hash from "../Hash.js";
+import * as HashSet from "../HashSet.js";
+import { format, NodeInspectSymbol, toJSON } from "../Inspectable.js";
+import * as MutableRef from "../MutableRef.js";
+import * as Option from "../Option.js";
+import { hasProperty } from "../Predicate.js";
+/** @internal */
+const FiberIdSymbolKey = "effect/FiberId";
+/** @internal */
+export const FiberIdTypeId = /*#__PURE__*/Symbol.for(FiberIdSymbolKey);
+/** @internal */
+const OP_NONE = "None";
+/** @internal */
+const OP_RUNTIME = "Runtime";
+/** @internal */
+const OP_COMPOSITE = "Composite";
+/** @internal */
+class None {
+  [FiberIdTypeId] = FiberIdTypeId;
+  _tag = OP_NONE;
+  [Hash.symbol]() {
+    return pipe(Hash.hash(FiberIdSymbolKey), Hash.combine(Hash.hash(this._tag)));
+  }
+  [Equal.symbol](that) {
+    return isFiberId(that) && that._tag === OP_NONE;
+  }
+  toString() {
+    return format(this.toJSON());
+  }
+  toJSON() {
+    return {
+      _id: "FiberId",
+      _tag: this._tag
+    };
+  }
+  [NodeInspectSymbol]() {
+    return this.toJSON();
+  }
+}
+/** @internal */
+class Runtime {
+  id;
+  startTimeMillis;
+  [FiberIdTypeId] = FiberIdTypeId;
+  _tag = OP_RUNTIME;
+  constructor(id, startTimeMillis) {
+    this.id = id;
+    this.startTimeMillis = startTimeMillis;
+  }
+  [Hash.symbol]() {
+    return pipe(Hash.hash(FiberIdSymbolKey), Hash.combine(Hash.hash(this._tag)), Hash.combine(Hash.hash(this.id)), Hash.combine(Hash.hash(this.startTimeMillis)));
+  }
+  [Equal.symbol](that) {
+    return isFiberId(that) && that._tag === OP_RUNTIME && this.id === that.id && this.startTimeMillis === that.startTimeMillis;
+  }
+  toString() {
+    return format(this.toJSON());
+  }
+  toJSON() {
+    return {
+      _id: "FiberId",
+      _tag: this._tag,
+      id: this.id,
+      startTimeMillis: this.startTimeMillis
+    };
+  }
+  [NodeInspectSymbol]() {
+    return this.toJSON();
+  }
+}
+/** @internal */
+class Composite {
+  left;
+  right;
+  [FiberIdTypeId] = FiberIdTypeId;
+  _tag = OP_COMPOSITE;
+  constructor(left, right) {
+    this.left = left;
+    this.right = right;
+  }
+  [Hash.symbol]() {
+    return pipe(Hash.hash(FiberIdSymbolKey), Hash.combine(Hash.hash(this._tag)), Hash.combine(Hash.hash(this.left)), Hash.combine(Hash.hash(this.right)));
+  }
+  [Equal.symbol](that) {
+    return isFiberId(that) && that._tag === OP_COMPOSITE && Equal.equals(this.left, that.left) && Equal.equals(this.right, that.right);
+  }
+  toString() {
+    return format(this.toJSON());
+  }
+  toJSON() {
+    return {
+      _id: "FiberId",
+      _tag: this._tag,
+      left: toJSON(this.left),
+      right: toJSON(this.right)
+    };
+  }
+  [NodeInspectSymbol]() {
+    return this.toJSON();
+  }
+}
+/** @internal */
+export const none = /*#__PURE__*/new None();
+/** @internal */
+export const runtime = (id, startTimeMillis) => {
+  return new Runtime(id, startTimeMillis);
+};
+/** @internal */
+export const composite = (left, right) => {
+  return new Composite(left, right);
+};
+/** @internal */
+export const isFiberId = self => hasProperty(self, FiberIdTypeId);
+/** @internal */
+export const isNone = self => {
+  return self._tag === OP_NONE || pipe(toSet(self), HashSet.every(id => isNone(id)));
+};
+/** @internal */
+export const isRuntime = self => {
+  return self._tag === OP_RUNTIME;
+};
+/** @internal */
+export const isComposite = self => {
+  return self._tag === OP_COMPOSITE;
+};
+/** @internal */
+export const combine = /*#__PURE__*/dual(2, (self, that) => {
+  if (self._tag === OP_NONE) {
+    return that;
+  }
+  if (that._tag === OP_NONE) {
+    return self;
+  }
+  return new Composite(self, that);
+});
+/** @internal */
+export const combineAll = fiberIds => {
+  return pipe(fiberIds, HashSet.reduce(none, (a, b) => combine(b)(a)));
+};
+/** @internal */
+export const getOrElse = /*#__PURE__*/dual(2, (self, that) => isNone(self) ? that : self);
+/** @internal */
+export const ids = self => {
+  switch (self._tag) {
+    case OP_NONE:
+      {
+        return HashSet.empty();
+      }
+    case OP_RUNTIME:
+      {
+        return HashSet.make(self.id);
+      }
+    case OP_COMPOSITE:
+      {
+        return pipe(ids(self.left), HashSet.union(ids(self.right)));
+      }
+  }
+};
+const _fiberCounter = /*#__PURE__*/globalValue( /*#__PURE__*/Symbol.for("effect/Fiber/Id/_fiberCounter"), () => MutableRef.make(0));
+/** @internal */
+export const make = (id, startTimeSeconds) => {
+  return new Runtime(id, startTimeSeconds);
+};
+/** @internal */
+export const threadName = self => {
+  const identifiers = Array.from(ids(self)).map(n => `#${n}`).join(",");
+  return identifiers;
+};
+/** @internal */
+export const toOption = self => {
+  const fiberIds = toSet(self);
+  if (HashSet.size(fiberIds) === 0) {
+    return Option.none();
+  }
+  let first = true;
+  let acc;
+  for (const fiberId of fiberIds) {
+    if (first) {
+      acc = fiberId;
+      first = false;
+    } else {
+      // @ts-expect-error
+      acc = pipe(acc, combine(fiberId));
+    }
+  }
+  // @ts-expect-error
+  return Option.some(acc);
+};
+/** @internal */
+export const toSet = self => {
+  switch (self._tag) {
+    case OP_NONE:
+      {
+        return HashSet.empty();
+      }
+    case OP_RUNTIME:
+      {
+        return HashSet.make(self);
+      }
+    case OP_COMPOSITE:
+      {
+        return pipe(toSet(self.left), HashSet.union(toSet(self.right)));
+      }
+  }
+};
+/** @internal */
+export const unsafeMake = () => {
+  const id = MutableRef.get(_fiberCounter);
+  pipe(_fiberCounter, MutableRef.set(id + 1));
+  return new Runtime(id, Date.now());
+};
+//# sourceMappingURL=fiberId.js.map

package/dist/esm/internal/fiberId.js.map

@@ -0,0 +1 @@
+{"version":3,"file":"fiberId.js","names":["Equal","dual","pipe","globalValue","Hash","HashSet","format","NodeInspectSymbol","toJSON","MutableRef","Option","hasProperty","FiberIdSymbolKey","FiberIdTypeId","Symbol","for","OP_NONE","OP_RUNTIME","OP_COMPOSITE","None","_tag","symbol","hash","combine","that","isFiberId","toString","_id","Runtime","id","startTimeMillis","constructor","Composite","left","right","equals","none","runtime","composite","self","isNone","toSet","every","isRuntime","isComposite","combineAll","fiberIds","reduce","a","b","getOrElse","ids","empty","make","union","_fiberCounter","startTimeSeconds","threadName","identifiers","Array","from","map","n","join","toOption","size","first","acc","fiberId","some","unsafeMake","get","set","Date","now"],"sources":["../../../src/internal/fiberId.ts"],"sourcesContent":[null],"mappings":"AAAA,OAAO,KAAKA,KAAK,MAAM,aAAa;AAEpC,SAASC,IAAI,EAAEC,IAAI,QAAQ,gBAAgB;AAC3C,SAASC,WAAW,QAAQ,mBAAmB;AAC/C,OAAO,KAAKC,IAAI,MAAM,YAAY;AAClC,OAAO,KAAKC,OAAO,MAAM,eAAe;AACxC,SAASC,MAAM,EAAEC,iBAAiB,EAAEC,MAAM,QAAQ,mBAAmB;AACrE,OAAO,KAAKC,UAAU,MAAM,kBAAkB;AAC9C,OAAO,KAAKC,MAAM,MAAM,cAAc;AACtC,SAASC,WAAW,QAAQ,iBAAiB;AAE7C;AACA,MAAMC,gBAAgB,GAAG,gBAAgB;AAEzC;AACA,OAAO,MAAMC,aAAa,gBAA0BC,MAAM,CAACC,GAAG,CAC5DH,gBAAgB,CACQ;AAE1B;AACA,MAAMI,OAAO,GAAG,MAAe;AAK/B;AACA,MAAMC,UAAU,GAAG,SAAkB;AAKrC;AACA,MAAMC,YAAY,GAAG,WAAoB;AAKzC;AACA,MAAMC,IAAI;EACC,CAACN,aAAa,IAA2BA,aAAa;EACtDO,IAAI,GAAGJ,OAAO;EACvB,CAACZ,IAAI,CAACiB,MAAM,IAAC;IACX,OAAOnB,IAAI,CACTE,IAAI,CAACkB,IAAI,CAACV,gBAAgB,CAAC,EAC3BR,IAAI,CAACmB,OAAO,CAACnB,IAAI,CAACkB,IAAI,CAAC,IAAI,CAACF,IAAI,CAAC,CAAC,CACnC;EACH;EACA,CAACpB,KAAK,CAACqB,MAAM,EAAEG,IAAa;IAC1B,OAAOC,SAAS,CAACD,IAAI,CAAC,IAAIA,IAAI,CAACJ,IAAI,KAAKJ,OAAO;EACjD;EACAU,QAAQA,CAAA;IACN,OAAOpB,MAAM,CAAC,IAAI,CAACE,MAAM,EAAE,CAAC;EAC9B;EACAA,MAAMA,CAAA;IACJ,OAAO;MACLmB,GAAG,EAAE,SAAS;MACdP,IAAI,EAAE,IAAI,CAACA;KACZ;EACH;EACA,CAACb,iBAAiB,IAAC;IACjB,OAAO,IAAI,CAACC,MAAM,EAAE;EACtB;;AAGF;AACA,MAAMoB,OAAO;EAIAC,EAAA;EACAC,eAAA;EAJF,CAACjB,aAAa,IAA2BA,aAAa;EACtDO,IAAI,GAAGH,UAAU;EAC1Bc,YACWF,EAAU,EACVC,eAAuB;IADvB,KAAAD,EAAE,GAAFA,EAAE;IACF,KAAAC,eAAe,GAAfA,eAAe;EACvB;EACH,CAAC1B,IAAI,CAACiB,MAAM,IAAC;IACX,OAAOnB,IAAI,CACTE,IAAI,CAACkB,IAAI,CAACV,gBAAgB,CAAC,EAC3BR,IAAI,CAACmB,OAAO,CAACnB,IAAI,CAACkB,IAAI,CAAC,IAAI,CAACF,IAAI,CAAC,CAAC,EAClChB,IAAI,CAACmB,OAAO,CAACnB,IAAI,CAACkB,IAAI,CAAC,IAAI,CAACO,EAAE,CAAC,CAAC,EAChCzB,IAAI,CAACmB,OAAO,CAACnB,IAAI,CAACkB,IAAI,CAAC,IAAI,CAACQ,eAAe,CAAC,CAAC,CAC9C;EACH;EACA,CAAC9B,KAAK,CAACqB,MAAM,EAAEG,IAAa;IAC1B,OAAOC,SAAS,CAACD,IAAI,CAAC,IACpBA,IAAI,CAACJ,IAAI,KAAKH,UAAU,IACxB,IAAI,CAACY,EAAE,KAAKL,IAAI,CAACK,EAAE,IACnB,IAAI,CAACC,eAAe,KAAKN,IAAI,CAACM,eAAe;EACjD;EACAJ,QAAQA,CAAA;IACN,OAAOpB,MAAM,CAAC,IAAI,CAACE,MAAM,EAAE,CAAC;EAC9B;EACAA,MAAMA,CAAA;IACJ,OAAO;MACLmB,GAAG,EAAE,SAAS;MACdP,IAAI,EAAE,IAAI,CAACA,IAAI;MACfS,EAAE,EAAE,IAAI,CAACA,EAAE;MACXC,eAAe,EAAE,IAAI,CAACA;KACvB;EACH;EACA,CAACvB,iBAAiB,IAAC;IACjB,OAAO,IAAI,CAACC,MAAM,EAAE;EACtB;;AAGF;AACA,MAAMwB,SAAS;EAIFC,IAAA;EACAC,KAAA;EAJF,CAACrB,aAAa,IAA2BA,aAAa;EACtDO,IAAI,GAAGF,YAAY;EAC5Ba,YACWE,IAAqB,EACrBC,KAAsB;IADtB,KAAAD,IAAI,GAAJA,IAAI;IACJ,KAAAC,KAAK,GAALA,KAAK;EACb;EACH,CAAC9B,IAAI,CAACiB,MAAM,IAAC;IACX,OAAOnB,IAAI,CACTE,IAAI,CAACkB,IAAI,CAACV,gBAAgB,CAAC,EAC3BR,IAAI,CAACmB,OAAO,CAACnB,IAAI,CAACkB,IAAI,CAAC,IAAI,CAACF,IAAI,CAAC,CAAC,EAClChB,IAAI,CAACmB,OAAO,CAACnB,IAAI,CAACkB,IAAI,CAAC,IAAI,CAACW,IAAI,CAAC,CAAC,EAClC7B,IAAI,CAACmB,OAAO,CAACnB,IAAI,CAACkB,IAAI,CAAC,IAAI,CAACY,KAAK,CAAC,CAAC,CACpC;EACH;EACA,CAAClC,KAAK,CAACqB,MAAM,EAAEG,IAAa;IAC1B,OAAOC,SAAS,CAACD,IAAI,CAAC,IACpBA,IAAI,CAACJ,IAAI,KAAKF,YAAY,IAC1BlB,KAAK,CAACmC,MAAM,CAAC,IAAI,CAACF,IAAI,EAAET,IAAI,CAACS,IAAI,CAAC,IAClCjC,KAAK,CAACmC,MAAM,CAAC,IAAI,CAACD,KAAK,EAAEV,IAAI,CAACU,KAAK,CAAC;EACxC;EACAR,QAAQA,CAAA;IACN,OAAOpB,MAAM,CAAC,IAAI,CAACE,MAAM,EAAE,CAAC;EAC9B;EACAA,MAAMA,CAAA;IACJ,OAAO;MACLmB,GAAG,EAAE,SAAS;MACdP,IAAI,EAAE,IAAI,CAACA,IAAI;MACfa,IAAI,EAAEzB,MAAM,CAAC,IAAI,CAACyB,IAAI,CAAC;MACvBC,KAAK,EAAE1B,MAAM,CAAC,IAAI,CAAC0B,KAAK;KACzB;EACH;EACA,CAAC3B,iBAAiB,IAAC;IACjB,OAAO,IAAI,CAACC,MAAM,EAAE;EACtB;;AAGF;AACA,OAAO,MAAM4B,IAAI,gBAAoB,IAAIjB,IAAI,EAAE;AAE/C;AACA,OAAO,MAAMkB,OAAO,GAAGA,CAACR,EAAU,EAAEC,eAAuB,KAAqB;EAC9E,OAAO,IAAIF,OAAO,CAACC,EAAE,EAAEC,eAAe,CAAC;AACzC,CAAC;AAED;AACA,OAAO,MAAMQ,SAAS,GAAGA,CAACL,IAAqB,EAAEC,KAAsB,KAAqB;EAC1F,OAAO,IAAIF,SAAS,CAACC,IAAI,EAAEC,KAAK,CAAC;AACnC,CAAC;AAED;AACA,OAAO,MAAMT,SAAS,GAAIc,IAAa,IAA8B5B,WAAW,CAAC4B,IAAI,EAAE1B,aAAa,CAAC;AAErG;AACA,OAAO,MAAM2B,MAAM,GAAID,IAAqB,IAA0B;EACpE,OAAOA,IAAI,CAACnB,IAAI,KAAKJ,OAAO,IAAId,IAAI,CAACuC,KAAK,CAACF,IAAI,CAAC,EAAElC,OAAO,CAACqC,KAAK,CAAEb,EAAE,IAAKW,MAAM,CAACX,EAAE,CAAC,CAAC,CAAC;AACtF,CAAC;AAED;AACA,OAAO,MAAMc,SAAS,GAAIJ,IAAqB,IAA6B;EAC1E,OAAOA,IAAI,CAACnB,IAAI,KAAKH,UAAU;AACjC,CAAC;AAED;AACA,OAAO,MAAM2B,WAAW,GAAIL,IAAqB,IAA+B;EAC9E,OAAOA,IAAI,CAACnB,IAAI,KAAKF,YAAY;AACnC,CAAC;AAED;AACA,OAAO,MAAMK,OAAO,gBAAGtB,IAAI,CAGzB,CAAC,EAAE,CAACsC,IAAI,EAAEf,IAAI,KAAI;EAClB,IAAIe,IAAI,CAACnB,IAAI,KAAKJ,OAAO,EAAE;IACzB,OAAOQ,IAAI;EACb;EACA,IAAIA,IAAI,CAACJ,IAAI,KAAKJ,OAAO,EAAE;IACzB,OAAOuB,IAAI;EACb;EACA,OAAO,IAAIP,SAAS,CAACO,IAAI,EAAEf,IAAI,CAAC;AAClC,CAAC,CAAC;AAEF;AACA,OAAO,MAAMqB,UAAU,GAAIC,QAA0C,IAAqB;EACxF,OAAO5C,IAAI,CAAC4C,QAAQ,EAAEzC,OAAO,CAAC0C,MAAM,CAACX,IAAuB,EAAE,CAACY,CAAC,EAAEC,CAAC,KAAK1B,OAAO,CAAC0B,CAAC,CAAC,CAACD,CAAC,CAAC,CAAC,CAAC;AACzF,CAAC;AAED;AACA,OAAO,MAAME,SAAS,gBAAGjD,IAAI,CAG3B,CAAC,EAAE,CAACsC,IAAI,EAAEf,IAAI,KAAKgB,MAAM,CAACD,IAAI,CAAC,GAAGf,IAAI,GAAGe,IAAI,CAAC;AAEhD;AACA,OAAO,MAAMY,GAAG,GAAIZ,IAAqB,IAA6B;EACpE,QAAQA,IAAI,CAACnB,IAAI;IACf,KAAKJ,OAAO;MAAE;QACZ,OAAOX,OAAO,CAAC+C,KAAK,EAAE;MACxB;IACA,KAAKnC,UAAU;MAAE;QACf,OAAOZ,OAAO,CAACgD,IAAI,CAACd,IAAI,CAACV,EAAE,CAAC;MAC9B;IACA,KAAKX,YAAY;MAAE;QACjB,OAAOhB,IAAI,CAACiD,GAAG,CAACZ,IAAI,CAACN,IAAI,CAAC,EAAE5B,OAAO,CAACiD,KAAK,CAACH,GAAG,CAACZ,IAAI,CAACL,KAAK,CAAC,CAAC,CAAC;MAC7D;EACF;AACF,CAAC;AAED,MAAMqB,aAAa,gBAAGpD,WAAW,eAC/BW,MAAM,CAACC,GAAG,CAAC,+BAA+B,CAAC,EAC3C,MAAMN,UAAU,CAAC4C,IAAI,CAAC,CAAC,CAAC,CACzB;AAED;AACA,OAAO,MAAMA,IAAI,GAAGA,CAACxB,EAAU,EAAE2B,gBAAwB,KAAqB;EAC5E,OAAO,IAAI5B,OAAO,CAACC,EAAE,EAAE2B,gBAAgB,CAAC;AAC1C,CAAC;AAED;AACA,OAAO,MAAMC,UAAU,GAAIlB,IAAqB,IAAY;EAC1D,MAAMmB,WAAW,GAAGC,KAAK,CAACC,IAAI,CAACT,GAAG,CAACZ,IAAI,CAAC,CAAC,CAACsB,GAAG,CAAEC,CAAC,IAAK,IAAIA,CAAC,EAAE,CAAC,CAACC,IAAI,CAAC,GAAG,CAAC;EACvE,OAAOL,WAAW;AACpB,CAAC;AAED;AACA,OAAO,MAAMM,QAAQ,GAAIzB,IAAqB,IAAoC;EAChF,MAAMO,QAAQ,GAAGL,KAAK,CAACF,IAAI,CAAC;EAC5B,IAAIlC,OAAO,CAAC4D,IAAI,CAACnB,QAAQ,CAAC,KAAK,CAAC,EAAE;IAChC,OAAOpC,MAAM,CAAC0B,IAAI,EAAE;EACtB;EACA,IAAI8B,KAAK,GAAG,IAAI;EAChB,IAAIC,GAAoB;EACxB,KAAK,MAAMC,OAAO,IAAItB,QAAQ,EAAE;IAC9B,IAAIoB,KAAK,EAAE;MACTC,GAAG,GAAGC,OAAO;MACbF,KAAK,GAAG,KAAK;IACf,CAAC,MAAM;MACL;MACAC,GAAG,GAAGjE,IAAI,CAACiE,GAAG,EAAE5C,OAAO,CAAC6C,OAAO,CAAC,CAAC;IACnC;EACF;EACA;EACA,OAAO1D,MAAM,CAAC2D,IAAI,CAACF,GAAG,CAAC;AACzB,CAAC;AAED;AACA,OAAO,MAAM1B,KAAK,GAAIF,IAAqB,IAAsC;EAC/E,QAAQA,IAAI,CAACnB,IAAI;IACf,KAAKJ,OAAO;MAAE;QACZ,OAAOX,OAAO,CAAC+C,KAAK,EAAE;MACxB;IACA,KAAKnC,UAAU;MAAE;QACf,OAAOZ,OAAO,CAACgD,IAAI,CAACd,IAAI,CAAC;MAC3B;IACA,KAAKrB,YAAY;MAAE;QACjB,OAAOhB,IAAI,CAACuC,KAAK,CAACF,IAAI,CAACN,IAAI,CAAC,EAAE5B,OAAO,CAACiD,KAAK,CAACb,KAAK,CAACF,IAAI,CAACL,KAAK,CAAC,CAAC,CAAC;MACjE;EACF;AACF,CAAC;AAED;AACA,OAAO,MAAMoC,UAAU,GAAGA,CAAA,KAAsB;EAC9C,MAAMzC,EAAE,GAAGpB,UAAU,CAAC8D,GAAG,CAAChB,aAAa,CAAC;EACxCrD,IAAI,CAACqD,aAAa,EAAE9C,UAAU,CAAC+D,GAAG,CAAC3C,EAAE,GAAG,CAAC,CAAC,CAAC;EAC3C,OAAO,IAAID,OAAO,CAACC,EAAE,EAAE4C,IAAI,CAACC,GAAG,EAAE,CAAC;AACpC,CAAC"}

package/dist/esm/internal/fiberMessage.js

@@ -0,0 +1,28 @@
+/** @internal */
+export const OP_INTERRUPT_SIGNAL = "InterruptSignal";
+/** @internal */
+export const OP_STATEFUL = "Stateful";
+/** @internal */
+export const OP_RESUME = "Resume";
+/** @internal */
+export const OP_YIELD_NOW = "YieldNow";
+/** @internal */
+export const interruptSignal = cause => ({
+  _tag: OP_INTERRUPT_SIGNAL,
+  cause
+});
+/** @internal */
+export const stateful = onFiber => ({
+  _tag: OP_STATEFUL,
+  onFiber
+});
+/** @internal */
+export const resume = effect => ({
+  _tag: OP_RESUME,
+  effect
+});
+/** @internal */
+export const yieldNow = () => ({
+  _tag: OP_YIELD_NOW
+});
+//# sourceMappingURL=fiberMessage.js.map

package/dist/esm/internal/fiberMessage.js.map

@@ -0,0 +1 @@
+{"version":3,"file":"fiberMessage.js","names":["OP_INTERRUPT_SIGNAL","OP_STATEFUL","OP_RESUME","OP_YIELD_NOW","interruptSignal","cause","_tag","stateful","onFiber","resume","effect","yieldNow"],"sources":["../../../src/internal/fiberMessage.ts"],"sourcesContent":[null],"mappings":"AAQA;AACA,OAAO,MAAMA,mBAAmB,GAAG,iBAA0B;AAK7D;AACA,OAAO,MAAMC,WAAW,GAAG,UAAmB;AAK9C;AACA,OAAO,MAAMC,SAAS,GAAG,QAAiB;AAK1C;AACA,OAAO,MAAMC,YAAY,GAAG,UAAmB;AA4B/C;AACA,OAAO,MAAMC,eAAe,GAAIC,KAAyB,KAAoB;EAC3EC,IAAI,EAAEN,mBAAmB;EACzBK;CACD,CAAC;AAEF;AACA,OAAO,MAAME,QAAQ,GACnBC,OAGS,KACS;EAClBF,IAAI,EAAEL,WAAW;EACjBO;CACD,CAAC;AAEF;AACA,OAAO,MAAMC,MAAM,GAAIC,MAAoC,KAAoB;EAC7EJ,IAAI,EAAEJ,SAAS;EACfQ;CACD,CAAC;AAEF;AACA,OAAO,MAAMC,QAAQ,GAAGA,CAAA,MAAqB;EAC3CL,IAAI,EAAEH;CACP,CAAC"}

package/dist/esm/internal/fiberRefs/patch.js

@@ -0,0 +1,107 @@
+import { equals } from "../../Equal.js";
+import { dual } from "../../Function.js";
+import * as Arr from "../../ReadonlyArray.js";
+import * as _fiberRefs from "../fiberRefs.js";
+/** @internal */
+export const OP_EMPTY = "Empty";
+/** @internal */
+export const OP_ADD = "Add";
+/** @internal */
+export const OP_REMOVE = "Remove";
+/** @internal */
+export const OP_UPDATE = "Update";
+/** @internal */
+export const OP_AND_THEN = "AndThen";
+/** @internal */
+export const empty = {
+  _tag: OP_EMPTY
+};
+/** @internal */
+export const diff = (oldValue, newValue) => {
+  const missingLocals = new Map(oldValue.locals);
+  let patch = empty;
+  for (const [fiberRef, pairs] of newValue.locals.entries()) {
+    const newValue = Arr.headNonEmpty(pairs)[1];
+    const old = missingLocals.get(fiberRef);
+    if (old !== undefined) {
+      const oldValue = Arr.headNonEmpty(old)[1];
+      if (!equals(oldValue, newValue)) {
+        patch = combine({
+          _tag: OP_UPDATE,
+          fiberRef,
+          patch: fiberRef.diff(oldValue, newValue)
+        })(patch);
+      }
+    } else {
+      patch = combine({
+        _tag: OP_ADD,
+        fiberRef,
+        value: newValue
+      })(patch);
+    }
+    missingLocals.delete(fiberRef);
+  }
+  for (const [fiberRef] of missingLocals.entries()) {
+    patch = combine({
+      _tag: OP_REMOVE,
+      fiberRef
+    })(patch);
+  }
+  return patch;
+};
+/** @internal */
+export const combine = /*#__PURE__*/dual(2, (self, that) => ({
+  _tag: OP_AND_THEN,
+  first: self,
+  second: that
+}));
+/** @internal */
+export const patch = /*#__PURE__*/dual(3, (self, fiberId, oldValue) => {
+  let fiberRefs = oldValue;
+  let patches = Arr.of(self);
+  while (Arr.isNonEmptyReadonlyArray(patches)) {
+    const head = Arr.headNonEmpty(patches);
+    const tail = Arr.tailNonEmpty(patches);
+    switch (head._tag) {
+      case OP_EMPTY:
+        {
+          patches = tail;
+          break;
+        }
+      case OP_ADD:
+        {
+          fiberRefs = _fiberRefs.updateAs(fiberRefs, {
+            fiberId,
+            fiberRef: head.fiberRef,
+            value: head.value
+          });
+          patches = tail;
+          break;
+        }
+      case OP_REMOVE:
+        {
+          fiberRefs = _fiberRefs.delete_(fiberRefs, head.fiberRef);
+          patches = tail;
+          break;
+        }
+      case OP_UPDATE:
+        {
+          const value = _fiberRefs.getOrDefault(fiberRefs, head.fiberRef);
+          fiberRefs = _fiberRefs.updateAs(fiberRefs, {
+            fiberId,
+            fiberRef: head.fiberRef,
+            value: head.fiberRef.patch(head.patch)(value)
+          });
+          patches = tail;
+          break;
+        }
+      case OP_AND_THEN:
+        {
+          patches = Arr.prepend(head.first)(Arr.prepend(head.second)(tail));
+          break;
+        }
+    }
+  }
+  return fiberRefs;
+});
+//# sourceMappingURL=patch.js.map

package/dist/esm/internal/fiberRefs/patch.js.map

@@ -0,0 +1 @@
+{"version":3,"file":"patch.js","names":["equals","dual","Arr","_fiberRefs","OP_EMPTY","OP_ADD","OP_REMOVE","OP_UPDATE","OP_AND_THEN","empty","_tag","diff","oldValue","newValue","missingLocals","Map","locals","patch","fiberRef","pairs","entries","headNonEmpty","old","get","undefined","combine","value","delete","self","that","first","second","fiberId","fiberRefs","patches","of","isNonEmptyReadonlyArray","head","tail","tailNonEmpty","updateAs","delete_","getOrDefault","prepend"],"sources":["../../../../src/internal/fiberRefs/patch.ts"],"sourcesContent":[null],"mappings":"AAAA,SAASA,MAAM,QAAQ,gBAAgB;AAIvC,SAASC,IAAI,QAAQ,mBAAmB;AACxC,OAAO,KAAKC,GAAG,MAAM,wBAAwB;AAC7C,OAAO,KAAKC,UAAU,MAAM,iBAAiB;AAE7C;AACA,OAAO,MAAMC,QAAQ,GAAG,OAAgB;AAKxC;AACA,OAAO,MAAMC,MAAM,GAAG,KAAc;AAKpC;AACA,OAAO,MAAMC,SAAS,GAAG,QAAiB;AAK1C;AACA,OAAO,MAAMC,SAAS,GAAG,QAAiB;AAK1C;AACA,OAAO,MAAMC,WAAW,GAAG,SAAkB;AAK7C;AACA,OAAO,MAAMC,KAAK,GAAmC;EACnDC,IAAI,EAAEN;CAC2B;AAEnC;AACA,OAAO,MAAMO,IAAI,GAAGA,CAClBC,QAA6B,EAC7BC,QAA6B,KACI;EACjC,MAAMC,aAAa,GAAG,IAAIC,GAAG,CAACH,QAAQ,CAACI,MAAM,CAAC;EAC9C,IAAIC,KAAK,GAAGR,KAAK;EACjB,KAAK,MAAM,CAACS,QAAQ,EAAEC,KAAK,CAAC,IAAIN,QAAQ,CAACG,MAAM,CAACI,OAAO,EAAE,EAAE;IACzD,MAAMP,QAAQ,GAAGX,GAAG,CAACmB,YAAY,CAACF,KAAK,CAAC,CAAC,CAAC,CAAC;IAC3C,MAAMG,GAAG,GAAGR,aAAa,CAACS,GAAG,CAACL,QAAQ,CAAC;IACvC,IAAII,GAAG,KAAKE,SAAS,EAAE;MACrB,MAAMZ,QAAQ,GAAGV,GAAG,CAACmB,YAAY,CAACC,GAAG,CAAC,CAAC,CAAC,CAAC;MACzC,IAAI,CAACtB,MAAM,CAACY,QAAQ,EAAEC,QAAQ,CAAC,EAAE;QAC/BI,KAAK,GAAGQ,OAAO,CAAC;UACdf,IAAI,EAAEH,SAAS;UACfW,QAAQ;UACRD,KAAK,EAAEC,QAAQ,CAACP,IAAI,CAACC,QAAQ,EAAEC,QAAQ;SACxC,CAAC,CAACI,KAAK,CAAC;MACX;IACF,CAAC,MAAM;MACLA,KAAK,GAAGQ,OAAO,CAAC;QACdf,IAAI,EAAEL,MAAM;QACZa,QAAQ;QACRQ,KAAK,EAAEb;OACR,CAAC,CAACI,KAAK,CAAC;IACX;IACAH,aAAa,CAACa,MAAM,CAACT,QAAQ,CAAC;EAChC;EACA,KAAK,MAAM,CAACA,QAAQ,CAAC,IAAIJ,aAAa,CAACM,OAAO,EAAE,EAAE;IAChDH,KAAK,GAAGQ,OAAO,CAAC;MACdf,IAAI,EAAEJ,SAAS;MACfY;KACD,CAAC,CAACD,KAAK,CAAC;EACX;EACA,OAAOA,KAAK;AACd,CAAC;AAED;AACA,OAAO,MAAMQ,OAAO,gBAAGxB,IAAI,CAGzB,CAAC,EAAE,CAAC2B,IAAI,EAAEC,IAAI,MAAM;EACpBnB,IAAI,EAAEF,WAAW;EACjBsB,KAAK,EAAEF,IAAI;EACXG,MAAM,EAAEF;CACT,CAAC,CAAC;AAEH;AACA,OAAO,MAAMZ,KAAK,gBAAGhB,IAAI,CAUvB,CAAC,EAAE,CAAC2B,IAAI,EAAEI,OAAO,EAAEpB,QAAQ,KAAI;EAC/B,IAAIqB,SAAS,GAAwBrB,QAAQ;EAC7C,IAAIsB,OAAO,GAAiDhC,GAAG,CAACiC,EAAE,CAACP,IAAI,CAAC;EACxE,OAAO1B,GAAG,CAACkC,uBAAuB,CAACF,OAAO,CAAC,EAAE;IAC3C,MAAMG,IAAI,GAAGnC,GAAG,CAACmB,YAAY,CAACa,OAAO,CAAC;IACtC,MAAMI,IAAI,GAAGpC,GAAG,CAACqC,YAAY,CAACL,OAAO,CAAC;IACtC,QAAQG,IAAI,CAAC3B,IAAI;MACf,KAAKN,QAAQ;QAAE;UACb8B,OAAO,GAAGI,IAAI;UACd;QACF;MACA,KAAKjC,MAAM;QAAE;UACX4B,SAAS,GAAG9B,UAAU,CAACqC,QAAQ,CAACP,SAAS,EAAE;YACzCD,OAAO;YACPd,QAAQ,EAAEmB,IAAI,CAACnB,QAAQ;YACvBQ,KAAK,EAAEW,IAAI,CAACX;WACb,CAAC;UACFQ,OAAO,GAAGI,IAAI;UACd;QACF;MACA,KAAKhC,SAAS;QAAE;UACd2B,SAAS,GAAG9B,UAAU,CAACsC,OAAO,CAACR,SAAS,EAAEI,IAAI,CAACnB,QAAQ,CAAC;UACxDgB,OAAO,GAAGI,IAAI;UACd;QACF;MACA,KAAK/B,SAAS;QAAE;UACd,MAAMmB,KAAK,GAAGvB,UAAU,CAACuC,YAAY,CAACT,SAAS,EAAEI,IAAI,CAACnB,QAAQ,CAAC;UAC/De,SAAS,GAAG9B,UAAU,CAACqC,QAAQ,CAACP,SAAS,EAAE;YACzCD,OAAO;YACPd,QAAQ,EAAEmB,IAAI,CAACnB,QAAQ;YACvBQ,KAAK,EAAEW,IAAI,CAACnB,QAAQ,CAACD,KAAK,CAACoB,IAAI,CAACpB,KAAK,CAAC,CAACS,KAAK;WAC7C,CAAC;UACFQ,OAAO,GAAGI,IAAI;UACd;QACF;MACA,KAAK9B,WAAW;QAAE;UAChB0B,OAAO,GAAGhC,GAAG,CAACyC,OAAO,CAACN,IAAI,CAACP,KAAK,CAAC,CAAC5B,GAAG,CAACyC,OAAO,CAACN,IAAI,CAACN,MAAM,CAAC,CAACO,IAAI,CAAC,CAAC;UACjE;QACF;IACF;EACF;EACA,OAAOL,SAAS;AAClB,CAAC,CAAC"}