brass-runtime 1.14.0 → 1.15.0

package/dist/chunk-R3R2FVLG.cjs

@@ -0,0 +1,131 @@
+"use strict";Object.defineProperty(exports, "__esModule", {value: true});
+
+var _chunkTGIFUAK4cjs = require('./chunk-TGIFUAK4.cjs');
+
+// src/core/stream/structuredConcurrency.ts
+function race(left, right, parentScope) {
+  return _chunkTGIFUAK4cjs.asyncEffect.call(void 0, (env, cb) => {
+    const scope = parentScope.subScope();
+    let done = false;
+    const onResult = (exit) => {
+      if (done) return;
+      done = true;
+      scope.close(exit);
+      cb(exit);
+    };
+    const fiberLeft = scope.fork(left);
+    const fiberRight = scope.fork(right);
+    fiberLeft.join(onResult);
+    fiberRight.join(onResult);
+  });
+}
+function zipPar(left, right, parentScope) {
+  return _chunkTGIFUAK4cjs.asyncEffect.call(void 0, (env, cb) => {
+    const scope = parentScope.subScope();
+    let leftExit = null;
+    let rightExit = null;
+    let done = false;
+    const checkDone = () => {
+      if (!leftExit || !rightExit || done) return;
+      done = true;
+      if (leftExit._tag === "Success" && rightExit._tag === "Success") {
+        scope.close({ _tag: "Success", value: void 0 });
+        cb({
+          _tag: "Success",
+          value: [leftExit.value, rightExit.value]
+        });
+        return;
+      }
+      let cause;
+      if (leftExit._tag === "Failure") {
+        cause = leftExit.cause;
+      } else if (rightExit._tag === "Failure") {
+        cause = rightExit.cause;
+      } else {
+        throw new Error("zipPar: unreachable state (no Failure exit)");
+      }
+      const errExit = {
+        _tag: "Failure",
+        cause
+      };
+      scope.close(errExit);
+      cb(errExit);
+    };
+    const f1 = scope.fork(left);
+    const f2 = scope.fork(right);
+    f1.join((exit) => {
+      leftExit = exit;
+      checkDone();
+    });
+    f2.join((exit) => {
+      rightExit = exit;
+      checkDone();
+    });
+  });
+}
+function collectAllPar(effects, parentScope) {
+  return _chunkTGIFUAK4cjs.asyncEffect.call(void 0, (env, cb) => {
+    const scope = parentScope.subScope();
+    const results = new Array(effects.length);
+    let completed = 0;
+    let done = false;
+    effects.forEach((eff, i) => {
+      const f = scope.fork(eff);
+      f.join((exit) => {
+        if (done) return;
+        if (exit._tag === "Failure") {
+          done = true;
+          const errExit = {
+            _tag: "Failure",
+            cause: exit.cause
+          };
+          scope.close(errExit);
+          cb(errExit);
+          return;
+        }
+        results[i] = exit.value;
+        completed++;
+        if (completed === effects.length) {
+          done = true;
+          const successExit = {
+            _tag: "Success",
+            value: results
+          };
+          scope.close({ _tag: "Success", value: void 0 });
+          cb(successExit);
+        }
+      });
+    });
+  });
+}
+function raceWith(left, right, parentScope, onLeft, onRight) {
+  return _chunkTGIFUAK4cjs.asyncEffect.call(void 0, (env, cb) => {
+    const scope = parentScope.subScope();
+    let done = false;
+    const fiberLeft = scope.fork(left);
+    const fiberRight = scope.fork(right);
+    const finish = (next) => {
+      scope.fork(next).join((exitNext) => {
+        scope.close(exitNext);
+        cb(exitNext);
+      });
+    };
+    fiberLeft.join((exitL) => {
+      if (done) return;
+      done = true;
+      finish(onLeft(exitL, fiberRight, scope));
+    });
+    fiberRight.join((exitR) => {
+      if (done) return;
+      done = true;
+      finish(onRight(exitR, fiberLeft, scope));
+    });
+  });
+}
+
+
+
+
+
+
+exports.race = race; exports.zipPar = zipPar; exports.collectAllPar = collectAllPar; exports.raceWith = raceWith;

package/dist/chunk-STVLQ3XD.cjs

@@ -0,0 +1,489 @@
+"use strict";Object.defineProperty(exports, "__esModule", {value: true}); function _nullishCoalesce(lhs, rhsFn) { if (lhs != null) { return lhs; } else { return rhsFn(); } } function _optionalChain(ops) { let lastAccessLHS = undefined; let value = ops[0]; let i = 1; while (i < ops.length) { const op = ops[i]; const fn = ops[i + 1]; i += 2; if ((op === 'optionalAccess' || op === 'optionalCall') && value == null) { return undefined; } if (op === 'access' || op === 'optionalAccess') { lastAccessLHS = value; value = fn(value); } else if (op === 'call' || op === 'optionalCall') { value = fn((...args) => value.call(lastAccessLHS, ...args)); lastAccessLHS = undefined; } } return value; }
+
+var _chunkR3R2FVLGcjs = require('./chunk-R3R2FVLG.cjs');
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+var _chunkTGIFUAK4cjs = require('./chunk-TGIFUAK4.cjs');
+
+// src/core/stream/stream.ts
+var widenOpt = (opt) => opt._tag === "None" ? _chunkTGIFUAK4cjs.none : _chunkTGIFUAK4cjs.some.call(void 0, opt.value);
+var fromPull = (pull) => ({
+  _tag: "FromPull",
+  pull
+});
+var unwrapScoped = (acquire, release) => ({
+  _tag: "Scoped",
+  acquire,
+  release
+});
+var managedStream = (acquire) => ({
+  _tag: "Managed",
+  acquire
+});
+var mergeStream = (left, right, flip = true) => ({
+  _tag: "Merge",
+  left,
+  right,
+  flip
+});
+var EMPTY_STREAM = { _tag: "Empty" };
+var emptyStream = () => EMPTY_STREAM;
+var emitStream = (value) => ({
+  _tag: "Emit",
+  value
+});
+var concatStream = (left, right) => ({
+  _tag: "Concat",
+  left,
+  right
+});
+var flattenStream = (stream) => ({
+  _tag: "Flatten",
+  stream
+});
+function streamToRaceWithHandler(winnerSide, leftStream, rightStream, flip, id) {
+  return (exit, otherFiber, scope) => {
+    if (exit._tag === "Failure") {
+    }
+    if (exit._tag === "Success") {
+    }
+    if (exit._tag === "Success") {
+      const [a, tailWin] = exit.value;
+      otherFiber.interrupt();
+      const next = winnerSide === "L" ? fromPull(makeMergePull(tailWin, rightStream, !flip, id)) : fromPull(makeMergePull(leftStream, tailWin, !flip, id));
+      return _chunkTGIFUAK4cjs.asyncSucceed.call(void 0, [a, next]);
+    }
+    if (exit.cause._tag === "Interrupt") {
+      return _chunkTGIFUAK4cjs.asyncEffect.call(void 0, (_env, cb) => {
+        cb(_chunkTGIFUAK4cjs.Exit.failCause(_chunkTGIFUAK4cjs.Cause.interrupt()));
+      });
+    }
+    const opt = exit.cause.error;
+    if (opt._tag === "None") {
+      return winnerSide === "L" ? uncons(rightStream) : uncons(leftStream);
+    }
+    return _chunkTGIFUAK4cjs.asyncFail.call(void 0, opt);
+  };
+}
+function makeMergePull(onLeft, onRight, flip, mergePullId) {
+  const id = ++mergePullId;
+  const onLeftHandler = streamToRaceWithHandler("L", onLeft, onRight, flip, id);
+  const onRightHandler = streamToRaceWithHandler("R", onLeft, onRight, flip, id);
+  return _chunkTGIFUAK4cjs.asyncEffect.call(void 0, (_env, cb) => {
+    const runtime = _chunkTGIFUAK4cjs.unsafeGetCurrentRuntime.call(void 0, );
+    const scope = new (0, _chunkTGIFUAK4cjs.Scope)(runtime);
+    const handler = _chunkR3R2FVLGcjs.raceWith.call(void 0, 
+      uncons(onLeft),
+      uncons(onRight),
+      scope,
+      onLeftHandler,
+      onRightHandler
+    );
+    scope.fork(handler).join((ex) => {
+      scope.close(ex);
+      cb(ex);
+    });
+  });
+}
+function merge(left, right) {
+  return fromPull(makeMergePull(left, right, true, 0));
+}
+function uncons(self) {
+  switch (self._tag) {
+    case "Empty":
+      return _chunkTGIFUAK4cjs.fail.call(void 0, _chunkTGIFUAK4cjs.none);
+    case "FromArray": {
+      const arr = self.values;
+      if (arr.length === 0) return _chunkTGIFUAK4cjs.fail.call(void 0, _chunkTGIFUAK4cjs.none);
+      const tail = arr.length === 1 ? EMPTY_STREAM : { _tag: "FromArray", values: arr.slice(1) };
+      return _chunkTGIFUAK4cjs.succeed.call(void 0, [arr[0], tail]);
+    }
+    case "Emit":
+      return _chunkTGIFUAK4cjs.map.call(void 0, 
+        _chunkTGIFUAK4cjs.mapError.call(void 0, self.value, (e) => _chunkTGIFUAK4cjs.some.call(void 0, e)),
+        (a) => [a, EMPTY_STREAM]
+      );
+    case "FromPull":
+      return self.pull;
+    case "Concat":
+      return _chunkTGIFUAK4cjs.orElseOptional.call(void 0, 
+        _chunkTGIFUAK4cjs.map.call(void 0, 
+          uncons(self.left),
+          ([a, tail]) => [a, concatStream(tail, self.right)]
+        ),
+        () => uncons(self.right)
+      );
+    case "Flatten":
+      return _chunkTGIFUAK4cjs.flatMap.call(void 0, 
+        uncons(self.stream),
+        ([head, tail]) => _chunkTGIFUAK4cjs.orElseOptional.call(void 0, 
+          _chunkTGIFUAK4cjs.map.call(void 0, 
+            uncons(head),
+            ([a, as]) => [
+              a,
+              concatStream(as, flattenStream(tail))
+            ]
+          ),
+          () => uncons(flattenStream(tail))
+        )
+      );
+    case "Merge":
+      return makeMergePull(self.left, self.right, self.flip, 0);
+    case "Scoped":
+      return _chunkTGIFUAK4cjs.asyncEffect.call(void 0, (env, cb) => {
+        const runtime = _chunkTGIFUAK4cjs.unsafeGetCurrentRuntime.call(void 0, );
+        const scope = new (0, _chunkTGIFUAK4cjs.Scope)(runtime);
+        const fiber = _chunkTGIFUAK4cjs.getCurrentFiber.call(void 0, );
+        _optionalChain([fiber, 'optionalAccess', _2 => _2.addFinalizer, 'call', _3 => _3((exit) => {
+          try {
+            scope.close(exit);
+          } catch (e3) {
+          }
+        })]);
+        const closeWith = (exit) => {
+          if (exit._tag === "Failure") {
+            const err = exit.cause.error;
+            if (err && typeof err === "object" && err._tag === "None") {
+              scope.close({ _tag: "Success", value: void 0 });
+              return;
+            }
+          }
+          scope.close(exit);
+        };
+        const wrap = (s) => fromPull(
+          _chunkTGIFUAK4cjs.asyncEffect.call(void 0, (env2, cb2) => {
+            const pull = uncons(s);
+            _chunkTGIFUAK4cjs.unsafeRunFoldWithEnv.call(void 0, 
+              pull,
+              env2,
+              (cause) => {
+                const ex = _chunkTGIFUAK4cjs.Exit.failCause(cause);
+                closeWith(ex);
+                cb2(ex);
+              },
+              ([a, tail]) => {
+                cb2(_chunkTGIFUAK4cjs.Exit.succeed([a, wrap(tail)]));
+              }
+            );
+          })
+        );
+        scope.fork(self.acquire).join((ex) => {
+          if (ex._tag === "Failure") {
+            closeWith(ex);
+            cb({ _tag: "Failure", cause: { _tag: "Fail", error: _chunkTGIFUAK4cjs.some.call(void 0, ex.cause.error) } });
+            return;
+          }
+          scope.addFinalizer((exit) => self.release(exit));
+          const inner = ex.value;
+          _chunkTGIFUAK4cjs.unsafeGetCurrentRuntime.call(void 0, ).fork(uncons(wrap(inner))).join(cb);
+        });
+      });
+    case "Managed":
+      return _chunkTGIFUAK4cjs.asyncEffect.call(void 0, (env, cb) => {
+        const runtime = _chunkTGIFUAK4cjs.unsafeGetCurrentRuntime.call(void 0, );
+        const scope = new (0, _chunkTGIFUAK4cjs.Scope)(runtime);
+        _optionalChain([_chunkTGIFUAK4cjs.getCurrentFiber.call(void 0, ), 'optionalAccess', _4 => _4.addFinalizer, 'call', _5 => _5((exit) => {
+          try {
+            scope.close(exit);
+          } catch (e4) {
+          }
+        })]);
+        const closeWith = (exit) => {
+          if (exit._tag === "Failure") {
+            const err = exit.cause.error;
+            if (err && typeof err === "object" && err._tag === "None") {
+              scope.close({ _tag: "Success", value: void 0 });
+              return;
+            }
+          }
+          scope.close(exit);
+        };
+        scope.fork(self.acquire).join((ex) => {
+          if (ex._tag === "Failure") {
+            scope.close(ex);
+            cb({ _tag: "Failure", cause: { _tag: "Fail", error: _chunkTGIFUAK4cjs.some.call(void 0, ex.cause.error) } });
+            return;
+          }
+          const { stream: inner, release } = ex.value;
+          scope.addFinalizer((exit) => release(exit));
+          const wrap = (s) => fromPull(
+            _chunkTGIFUAK4cjs.asyncEffect.call(void 0, (env2, cb2) => {
+              _chunkTGIFUAK4cjs.unsafeRunFoldWithEnv.call(void 0, 
+                uncons(s),
+                env2,
+                (cause) => {
+                  const ex2 = _chunkTGIFUAK4cjs.Exit.failCause(cause);
+                  closeWith(ex2);
+                  cb2(ex2);
+                },
+                ([a, tail]) => {
+                  cb2(_chunkTGIFUAK4cjs.Exit.succeed([a, wrap(tail)]));
+                }
+              );
+            })
+          );
+          _chunkTGIFUAK4cjs.unsafeGetCurrentRuntime.call(void 0, ).fork(uncons(wrap(inner))).join(cb);
+        });
+      });
+  }
+}
+function assertNever(x, msg) {
+  throw new Error(_nullishCoalesce(msg, () => ( `Unexpected value: ${String(x)}`)));
+}
+function mapStream(self, f) {
+  switch (self._tag) {
+    case "Empty":
+      return emptyStream();
+    case "FromArray":
+      return { _tag: "FromArray", values: self.values.map(f) };
+    case "Emit":
+      return emitStream(_chunkTGIFUAK4cjs.map.call(void 0, self.value, f));
+    case "FromPull":
+      return fromPull(
+        _chunkTGIFUAK4cjs.map.call(void 0, self.pull, ([a, tail]) => [f(a), mapStream(tail, f)])
+      );
+    case "Concat":
+      return concatStream(mapStream(self.left, f), mapStream(self.right, f));
+    case "Flatten": {
+      const mappedOuter = mapStream(
+        self.stream,
+        (inner) => mapStream(inner, f)
+      );
+      return flattenStream(mappedOuter);
+    }
+    case "Merge":
+      return mergeStream(
+        mapStream(self.left, f),
+        mapStream(self.right, f),
+        self.flip
+      );
+    case "Scoped":
+      return unwrapScoped(
+        _chunkTGIFUAK4cjs.map.call(void 0, self.acquire, (s) => mapStream(s, f)),
+        self.release
+      );
+    case "Managed":
+      return managedStream(
+        _chunkTGIFUAK4cjs.map.call(void 0, self.acquire, ({ stream, release }) => ({
+          stream: mapStream(stream, f),
+          release
+        }))
+      );
+    default:
+      return assertNever(self);
+  }
+}
+function rangeStream(start, end) {
+  const go = (i) => fromPull(
+    i > end ? _chunkTGIFUAK4cjs.asyncFail.call(void 0, _chunkTGIFUAK4cjs.none) : _chunkTGIFUAK4cjs.asyncSucceed.call(void 0, [i, go(i + 1)])
+  );
+  return go(start);
+}
+function zip(left, right) {
+  const pull = _chunkTGIFUAK4cjs.asyncFold.call(void 0, 
+    _chunkTGIFUAK4cjs.asyncMapError.call(void 0, uncons(left), (opt) => widenOpt(opt)),
+    // si left termina o falla, el zip termina/falla igual
+    (opt) => _chunkTGIFUAK4cjs.asyncFail.call(void 0, opt),
+    ([a, tailL]) => _chunkTGIFUAK4cjs.asyncFold.call(void 0, 
+      _chunkTGIFUAK4cjs.asyncMapError.call(void 0, uncons(right), (opt) => widenOpt(opt)),
+      (opt) => _chunkTGIFUAK4cjs.asyncFail.call(void 0, opt),
+      ([b, tailR]) => _chunkTGIFUAK4cjs.asyncSucceed.call(void 0, [
+        [a, b],
+        zip(tailL, tailR)
+      ])
+    )
+  );
+  return fromPull(pull);
+}
+function foreachStream(stream, f) {
+  const loop = (cur) => _chunkTGIFUAK4cjs.asyncFold.call(void 0, 
+    // uncons: Option<E> -> Option<E|E2>
+    _chunkTGIFUAK4cjs.asyncMapError.call(void 0, uncons(cur), (opt) => widenOpt(opt)),
+    (opt) => {
+      if (opt._tag === "None") return _chunkTGIFUAK4cjs.asyncSucceed.call(void 0, void 0);
+      return _chunkTGIFUAK4cjs.asyncFail.call(void 0, opt);
+    },
+    ([a, tail]) => _chunkTGIFUAK4cjs.asyncFlatMap.call(void 0, 
+      // f(a): E2 -> Option<E|E2>
+      _chunkTGIFUAK4cjs.asyncMapError.call(void 0, f(a), (e2) => _chunkTGIFUAK4cjs.some.call(void 0, e2)),
+      () => loop(tail)
+    )
+  );
+  return _chunkTGIFUAK4cjs.asyncFold.call(void 0, 
+    loop(stream),
+    (opt) => {
+      if (opt._tag === "None") return _chunkTGIFUAK4cjs.asyncSucceed.call(void 0, void 0);
+      return _chunkTGIFUAK4cjs.asyncFail.call(void 0, opt.value);
+    },
+    () => _chunkTGIFUAK4cjs.asyncSucceed.call(void 0, void 0)
+  );
+}
+function fromArray(values) {
+  if (values.length === 0) return emptyStream();
+  return { _tag: "FromArray", values };
+}
+function collectStream(stream) {
+  const syncResult = drainStreamSyncFull(stream);
+  if (syncResult !== null) {
+    return _chunkTGIFUAK4cjs.asyncSucceed.call(void 0, syncResult);
+  }
+  const loop = (cur, acc) => _chunkTGIFUAK4cjs.asyncFold.call(void 0, 
+    uncons(cur),
+    (opt) => {
+      if (opt._tag === "None") return _chunkTGIFUAK4cjs.succeed.call(void 0, acc);
+      return _chunkTGIFUAK4cjs.fail.call(void 0, opt);
+    },
+    ([a, tail]) => {
+      acc.push(a);
+      return loop(tail, acc);
+    }
+  );
+  return _chunkTGIFUAK4cjs.mapError.call(void 0, loop(stream, []), (opt) => {
+    if (opt._tag === "Some") return opt.value;
+    throw new Error("unreachable: stream end handled as success");
+  });
+}
+function drainStreamSyncFull(stream) {
+  const result = [];
+  let cur = stream;
+  while (true) {
+    switch (cur._tag) {
+      case "Empty":
+        return result;
+      case "FromArray": {
+        const arr = cur.values;
+        for (let i = 0; i < arr.length; i++) {
+          result.push(arr[i]);
+        }
+        return result;
+      }
+      case "Emit": {
+        const zio = cur.value;
+        if (zio._tag === "Succeed") {
+          result.push(zio.value);
+          return result;
+        }
+        return null;
+      }
+      case "Concat": {
+        const leftItems = drainStreamSyncFull(cur.left);
+        if (leftItems === null) return null;
+        for (let i = 0; i < leftItems.length; i++) {
+          result.push(leftItems[i]);
+        }
+        cur = cur.right;
+        break;
+      }
+      default:
+        return null;
+    }
+  }
+}
+function readerStream(reader, normalizeError, signal) {
+  const pull = _chunkTGIFUAK4cjs.asyncEffect.call(void 0, (_, cb) => {
+    let done = false;
+    const cleanup = () => _optionalChain([signal, 'optionalAccess', _6 => _6.removeEventListener, 'call', _7 => _7("abort", abort)]);
+    const finish = (exit) => {
+      if (done) return;
+      done = true;
+      cleanup();
+      cb(exit);
+    };
+    const abort = () => {
+      try {
+        reader.cancel();
+      } catch (e5) {
+      }
+      const error = typeof DOMException === "function" ? new DOMException("aborted", "AbortError") : new Error("aborted");
+      finish({ _tag: "Failure", cause: { _tag: "Fail", error: _chunkTGIFUAK4cjs.some.call(void 0, normalizeError(error)) } });
+    };
+    if (_optionalChain([signal, 'optionalAccess', _8 => _8.aborted])) {
+      abort();
+      return;
+    }
+    _optionalChain([signal, 'optionalAccess', _9 => _9.addEventListener, 'call', _10 => _10("abort", abort, { once: true })]);
+    reader.read().then(({ done: done2, value }) => {
+      if (done2) {
+        finish({ _tag: "Failure", cause: { _tag: "Fail", error: _chunkTGIFUAK4cjs.none } });
+        return;
+      }
+      finish({
+        _tag: "Success",
+        value: [value, fromPull(pull)]
+      });
+    }).catch((e) => {
+      finish({ _tag: "Failure", cause: { _tag: "Fail", error: _chunkTGIFUAK4cjs.some.call(void 0, normalizeError(e)) } });
+    });
+    return () => {
+      cleanup();
+      try {
+        reader.cancel();
+      } catch (e6) {
+      }
+    };
+  });
+  return fromPull(pull);
+}
+function streamFromReadableStream(body, normalizeError, options = {}) {
+  if (!body) return emptyStream();
+  let reader;
+  return unwrapScoped(
+    // acquire: produce un ZStream
+    _chunkTGIFUAK4cjs.sync.call(void 0, () => {
+      reader = body.getReader();
+      return readerStream(reader, normalizeError, options.signal);
+    }),
+    // release: se corre en fin / error / interrupción
+    () => _chunkTGIFUAK4cjs.asyncSync.call(void 0, () => {
+      try {
+        _optionalChain([reader, 'optionalAccess', _11 => _11.cancel, 'call', _12 => _12()]);
+      } catch (e7) {
+      } finally {
+        _optionalChain([options, 'access', _13 => _13.onRelease, 'optionalCall', _14 => _14()]);
+      }
+    })
+  );
+}
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+exports.widenOpt = widenOpt; exports.fromPull = fromPull; exports.unwrapScoped = unwrapScoped; exports.managedStream = managedStream; exports.mergeStream = mergeStream; exports.emptyStream = emptyStream; exports.emitStream = emitStream; exports.concatStream = concatStream; exports.flattenStream = flattenStream; exports.merge = merge; exports.uncons = uncons; exports.assertNever = assertNever; exports.mapStream = mapStream; exports.rangeStream = rangeStream; exports.zip = zip; exports.foreachStream = foreachStream; exports.fromArray = fromArray; exports.collectStream = collectStream; exports.streamFromReadableStream = streamFromReadableStream;