@fncts/io 0.0.13 → 0.0.16

package/_mjs/IO/api.mjs

@@ -164,8 +164,8 @@ function apSecond_1(self, fb, __tsplusTrace) {
  */
 
 
-function as_1(self, b) {
-  return map_1(self, () => b(), fileName_1 + ":135:18");
+function as_1(self, b, __tsplusTrace) {
+  return map_1(self, () => b(), __tsplusTrace);
 }
 /**
  * Maps the success value of this effect to an optional value.
@@ -190,8 +190,8 @@ export function asJustError(ma, __tsplusTrace) {
  * @tsplus getter fncts.io.IO asUnit
  */
 
-function asUnit_1(self) {
-  return as_1(self, () => undefined);
+function asUnit_1(self, __tsplusTrace) {
+  return as_1(self, () => undefined, __tsplusTrace);
 }
 /**
  * Returns an IO whose failure and success channels have been mapped by
@@ -266,8 +266,8 @@ export function catchJust_(ma, f, __tsplusTrace) {
  * @tsplus fluent fncts.io.IO catchJustCause
  */
 
-export function catchJustCause_(ma, f) {
-  return matchCauseIO_1(ma, cause => tsplus_module_7.getOrElse_(f(cause), () => failCauseNow_1(cause, fileName_1 + ":275:71")), succeedNow_1, fileName_1 + ":275:25");
+export function catchJustCause_(ma, f, __tsplusTrace) {
+  return matchCauseIO_1(ma, cause => tsplus_module_7.getOrElse_(f(cause), () => failCauseNow_1(cause, __tsplusTrace)), succeedNow_1, __tsplusTrace);
 }
 /**
  * Recovers from some or all of the defects with provided partial function.
@@ -281,7 +281,7 @@ export function catchJustCause_(ma, f) {
  */
 
 export function catchJustDefect_(ma, f, __tsplusTrace) {
-  return catchAll_1(unrefineWith_1(ma, f, failNow_1, __tsplusTrace), identity, __tsplusTrace);
+  return catchAll_1(unrefineWith_1(ma, f, failNow_1, __tsplusTrace), a => a, __tsplusTrace);
 }
 /**
  * Recovers from the specified error
@@ -322,8 +322,8 @@ function flatMap_1(ma, f, __tsplusTrace) {
  */
 
 
-export function flatMapError_(ma, f) {
-  return swapWith_1(ma, effect => flatMap_1(effect, f, fileName_1 + ":343:48"));
+export function flatMapError_(ma, f, __tsplusTrace) {
+  return swapWith_1(ma, effect => flatMap_1(effect, f, __tsplusTrace), __tsplusTrace);
 }
 /**
  * Checks the interrupt status, and produces the IO returned by the
@@ -354,8 +354,8 @@ function collectIO_1(ma, f, pf, __tsplusTrace) {
  */
 
 
-export function condIO_(b, onTrue, onFalse) {
-  return b ? onTrue : flatMap_1(onFalse, failNow_1, fileName_1 + ":387:38");
+export function condIO_(b, onTrue, onFalse, __tsplusTrace) {
+  return b ? onTrue : flatMap_1(onFalse, failNow_1, __tsplusTrace);
 }
 /**
  * Returns a lazily constructed effect, whose construction may itself require
@@ -406,14 +406,14 @@ export function deferTry(io, __tsplusTrace) {
  * @tsplus static IOOps deferTryWith
  */
 
-export function deferTryWith(io) {
+export function deferTryWith(io, __tsplusTrace) {
   return deferWith_1((runtimeConfig, id) => {
     try {
       return io(runtimeConfig, id);
     } catch (u) {
       throw new IOError(tsplus_module_8.fail(u));
     }
-  }, fileName_1 + ":442:22");
+  }, __tsplusTrace);
 }
 /**
  * Returns a lazily constructed effect, whose construction may itself require effects,
@@ -424,14 +424,14 @@ export function deferTryWith(io) {
  * @tsplus static IOOps deferTryCatch
  */
 
-export function deferTryCatch(io, onThrow) {
+export function deferTryCatch(io, onThrow, __tsplusTrace) {
   return defer_1(() => {
     try {
       return io();
     } catch (u) {
       throw new IOError(tsplus_module_8.fail(onThrow(u)));
     }
-  }, fileName_1 + ":460:18");
+  }, __tsplusTrace);
 }
 /**
  * Returns a lazily constructed effect, whose construction may itself require effects,
@@ -442,20 +442,20 @@ export function deferTryCatch(io, onThrow) {
  * @tsplus static IOOps deferTryCatchWith
  */
 
-export function deferTryCatchWith(io, onThrow) {
+export function deferTryCatchWith(io, onThrow, __tsplusTrace) {
   return deferWith_1((runtimeConfig, id) => {
     try {
       return io(runtimeConfig, id);
     } catch (u) {
       throw new IOError(tsplus_module_8.fail(onThrow(u)));
     }
-  }, fileName_1 + ":481:22");
+  }, __tsplusTrace);
 }
 /**
  * @tsplus static fncts.io.IOOps descriptor
  */
 
-export const descriptor = /*#__PURE__*/descriptorWith_1(succeedNow_1, fileName_1 + ":493:41");
+export const descriptor = /*#__PURE__*/descriptorWith_1(succeedNow_1, fileName_1 + ":509:41");
 /**
  * Constructs an IO based on information about the current fiber, such as
  * its identity.
@@ -548,7 +548,7 @@ function failCause_1(cause, __tsplusTrace) {
  */
 
 
-export const fiberId = /*#__PURE__*/descriptorWith_1(d => succeedNow_1(d.id, fileName_1 + ":583:89"), fileName_1 + ":583:68");
+export const fiberId = /*#__PURE__*/descriptorWith_1(d => succeedNow_1(d.id, fileName_1 + ":599:89"), fileName_1 + ":599:68");
 /**
  * Filters the collection using the specified effectual predicate.
  *
@@ -562,7 +562,7 @@ function filter_1(as, f, __tsplusTrace) {
     }
 
     return builder;
-  })), b => b.result(), __tsplusTrace);
+  }, __tsplusTrace)), b => b.result(), __tsplusTrace);
 }
 /**
  * @tsplus static fncts.io.IOOps filterMap
@@ -583,7 +583,7 @@ function filterMapWithIndex_1(as, f, __tsplusTrace) {
       if (tsplus_module_12.isJust(b)) {
         bs.push(b.value);
       }
-    }, __tsplusTrace)), () => tsplus_module_11.from(bs));
+    }, __tsplusTrace), __tsplusTrace), () => tsplus_module_11.from(bs), __tsplusTrace);
   }, __tsplusTrace);
 }
 /**
@@ -602,8 +602,8 @@ function filterOrElse_1(fa, predicate, or, __tsplusTrace) {
   return flatMap_1(fa, a => predicate(a) ? succeedNow_1(a, __tsplusTrace) : defer_1(() => or(a), __tsplusTrace), __tsplusTrace);
 }
 
-export function filterOrFail_(fa, predicate, failWith) {
-  return filterOrElse_1(fa, predicate, a => failNow_1(failWith(a), fileName_1 + ":701:56"), fileName_1 + ":701:23");
+export function filterOrFail_(fa, predicate, failWith, __tsplusTrace) {
+  return filterOrElse_1(fa, predicate, a => failNow_1(failWith(a), __tsplusTrace), __tsplusTrace);
 }
 /**
  * Returns an `IO` that yields the value of the first
@@ -612,8 +612,8 @@ export function filterOrFail_(fa, predicate, failWith) {
  * @tsplus static fncts.io.IOOps firstSuccess
  */
 
-export function firstSuccess(mas) {
-  return mas.reduce((b, a) => orElse_1(b, () => a, fileName_1 + ":711:39"));
+export function firstSuccess(mas, __tsplusTrace) {
+  return mas.reduce((b, a) => orElse_1(b, () => a, __tsplusTrace));
 }
 export function filterOrHalt_(fa, predicate, haltWith, __tsplusTrace) {
   return filterOrElse_1(fa, predicate, a => haltNow_1(haltWith(a), __tsplusTrace), __tsplusTrace);
@@ -622,8 +622,8 @@ export function filterOrHalt_(fa, predicate, haltWith, __tsplusTrace) {
  * @tsplus getter fncts.io.IO flatten
  */
 
-export function flatten(self) {
-  return flatMap_1(self, identity, fileName_1 + ":744:22");
+export function flatten(self, __tsplusTrace) {
+  return flatMap_1(self, identity, __tsplusTrace);
 }
 /**
  * Folds an `Iterable<A>` using an effectful function f, working sequentially from left to right.
@@ -644,12 +644,12 @@ function foldLeft_1(as, b, f, __tsplusTrace) {
 export function foldMap_(as, f,
 /** @tsplus auto */
 M) {
-  return foldLeft_1(as, M.nat, (m, a) => map_1(a, a => M.combine(m, f(a)), fileName_1 + ":771:48"), fileName_1 + ":771:21");
+  return foldLeft_1(as, M.nat, (m, a) => map_1(a, a => M.combine(m, f(a)), fileName_1 + ":788:48"), fileName_1 + ":788:21");
 }
 
-function foldRightLoop(iterator, b, f) {
+function foldRightLoop(iterator, b, f, __tsplusTrace) {
   const next = iterator.next();
-  return next.done ? b : f(next.value, foldRightLoop(iterator, b, f));
+  return next.done ? b : f(next.value, foldRightLoop(iterator, b, f, __tsplusTrace));
 }
 /**
  * Performs a right-associative fold of an `Iterable<A>`
@@ -658,13 +658,13 @@ function foldRightLoop(iterator, b, f) {
  */
 
 
-export function foldRight_(as, b, f) {
-  return foldRightLoop(as[Symbol.iterator](), b, f);
+export function foldRight_(as, b, f, __tsplusTrace) {
+  return foldRightLoop(as[Symbol.iterator](), b, f, __tsplusTrace);
 }
 
-function foreachWithIndexDiscardLoop(iterator, f, i = 0) {
+function foreachWithIndexDiscardLoop(iterator, f, i = 0, __tsplusTrace) {
   const next = iterator.next();
-  return next.done ? unit_1 : flatMap_1(f(i, next.value), () => foreachWithIndexDiscardLoop(iterator, f, i + 1), fileName_1 + ":802:56");
+  return next.done ? unit_1 : flatMap_1(f(i, next.value), () => foreachWithIndexDiscardLoop(iterator, f, i + 1, __tsplusTrace), __tsplusTrace);
 }
 /**
  * Applies the function `f` to each element of the `Iterable<A>` and
@@ -683,7 +683,7 @@ function foreach_1(as, f, __tsplusTrace) {
     return as_1(foreachWithIndexDiscard_1(as, (_, a) => flatMap_1(f(a), b => {
       acc.push(b);
       return unit_1;
-    }, __tsplusTrace)), () => tsplus_module_11.from(acc));
+    }, __tsplusTrace), __tsplusTrace), () => tsplus_module_11.from(acc), __tsplusTrace);
   }, __tsplusTrace);
 }
 /**
@@ -697,21 +697,21 @@ function foreach_1(as, f, __tsplusTrace) {
  */
 
 
-export function foreachWithIndex_(as, f) {
+export function foreachWithIndex_(as, f, __tsplusTrace) {
   return defer_1(() => {
     const acc = [];
     return as_1(foreachWithIndexDiscard_1(as, (i, a) => flatMap_1(f(i, a), b => {
       acc.push(b);
       return unit_1;
-    }, fileName_1 + ":843:22")), () => tsplus_module_11.from(acc));
-  }, fileName_1 + ":840:18");
+    }, __tsplusTrace), __tsplusTrace), () => tsplus_module_11.from(acc), __tsplusTrace);
+  }, __tsplusTrace);
 }
 /**
  * @tsplus static fncts.io.IOOps foreachWithIndexDiscard
  */
 
-function foreachWithIndexDiscard_1(as, f) {
-  return defer_1(() => foreachWithIndexDiscardLoop(as[Symbol.iterator](), f), fileName_1 + ":858:18");
+function foreachWithIndexDiscard_1(as, f, __tsplusTrace) {
+  return defer_1(() => foreachWithIndexDiscardLoop(as[Symbol.iterator](), f), __tsplusTrace);
 }
 /**
  * Applies the function `f` to each element of the `Iterable<A>` and runs
@@ -721,8 +721,8 @@ function foreachWithIndexDiscard_1(as, f) {
  */
 
 
-function foreachDiscard_1(as, f) {
-  return defer_1(() => foreachWithIndexDiscardLoop(as[Symbol.iterator](), (_, a) => f(a)), fileName_1 + ":868:18");
+function foreachDiscard_1(as, f, __tsplusTrace) {
+  return defer_1(() => foreachWithIndexDiscardLoop(as[Symbol.iterator](), (_, a) => f(a)), __tsplusTrace);
 }
 /**
  * Repeats this effect forever (until the first failure).
@@ -731,8 +731,8 @@ function foreachDiscard_1(as, f) {
  */
 
 
-function forever_1(ma) {
-  return flatMap_1(apSecond_1(ma, yieldNow_1, fileName_1 + ":877:21"), () => forever_1(ma), fileName_1 + ":877:42");
+function forever_1(ma, __tsplusTrace) {
+  return flatMap_1(apSecond_1(ma, yieldNow_1, __tsplusTrace), () => forever_1(ma, __tsplusTrace), __tsplusTrace);
 }
 /**
  * Returns an IO that forks this IO into its own separate fiber,
@@ -865,8 +865,8 @@ export function fromPromiseHalt(promise, __tsplusTrace) {
  * @tsplus getter fncts.io.IO get
  */
 
-export function get(ma) {
-  return matchCauseIO_1(ma, cause => failCauseNow_1(tsplus_module_5.map_(cause, tsplus_module_2.just), fileName_1 + ":1018:31"), ma => tsplus_module_4.match_(ma, () => failNow_1(tsplus_module_2.nothing(), fileName_1 + ":1019:38"), succeedNow_1), fileName_1 + ":1017:25");
+export function get(ma, __tsplusTrace) {
+  return matchCauseIO_1(ma, cause => failCauseNow_1(tsplus_module_5.map_(cause, tsplus_module_2.just), __tsplusTrace), ma => tsplus_module_4.match_(ma, () => failNow_1(tsplus_module_2.nothing(), __tsplusTrace), succeedNow_1), __tsplusTrace);
 }
 /**
  * Extracts the optional value, or returns the given 'orElse'.
@@ -874,8 +874,8 @@ export function get(ma) {
  * @tsplus fluent fncts.io.IO getOrElse
  */
 
-export function getOrElse_(ma, orElse) {
-  return map_1(ma, ma => tsplus_module_7.getOrElse_(ma, orElse), fileName_1 + ":1029:16");
+export function getOrElse_(ma, orElse, __tsplusTrace) {
+  return map_1(ma, ma => tsplus_module_7.getOrElse_(ma, orElse), __tsplusTrace);
 }
 /**
  * Extracts the optional value, or executes the effect 'orElse'.
@@ -883,8 +883,8 @@ export function getOrElse_(ma, orElse) {
  * @tsplus fluent fncts.io.IO getOrElseIO
  */
 
-export function getOrElseIO_(ma, orElse) {
-  return flatMap_1(ma, mab => tsplus_module_7.getOrElse_(tsplus_module_7.map_(mab, succeedNow_1), orElse), fileName_1 + ":1041:48");
+export function getOrElseIO_(ma, orElse, __tsplusTrace) {
+  return flatMap_1(ma, mab => tsplus_module_7.getOrElse_(tsplus_module_7.map_(mab, succeedNow_1), orElse), __tsplusTrace);
 }
 /**
  * Lifts a Maybe into an IO. If the option is `Nothing`, fail with `onNothing`.
@@ -892,8 +892,8 @@ export function getOrElseIO_(ma, orElse) {
  * @tsplus static fncts.io.IOOps getOrFailWith
  */
 
-function getOrFailWith_1(maybe, onNothing) {
-  return defer_1(() => tsplus_module_4.match_(maybe, () => fail_1(onNothing, fileName_1 + ":1050:44"), succeedNow_1), fileName_1 + ":1050:18");
+function getOrFailWith_1(maybe, onNothing, __tsplusTrace) {
+  return defer_1(() => tsplus_module_4.match_(maybe, () => fail_1(onNothing, __tsplusTrace), succeedNow_1), __tsplusTrace);
 }
 /**
  * Lifts a Maybe into a IO, if the Maybe is `Nothing` it fails with Unit.
@@ -902,8 +902,8 @@ function getOrFailWith_1(maybe, onNothing) {
  */
 
 
-export function getOrFailUnit(option) {
-  return getOrFailWith_1(option, () => undefined);
+export function getOrFailUnit(option, __tsplusTrace) {
+  return getOrFailWith_1(option, () => undefined, __tsplusTrace);
 }
 /**
  * Creates an `IO` that halts with the specified lazily-evaluated defect.
@@ -932,8 +932,8 @@ function haltNow_1(e, __tsplusTrace) {
  */
 
 
-function ifIO_1(self, onFalse, onTrue) {
-  return flatMap_1(self, b => b ? onTrue() : onFalse(), fileName_1 + ":1092:22");
+function ifIO_1(self, onFalse, onTrue, __tsplusTrace) {
+  return flatMap_1(self, b => b ? onTrue() : onFalse(), __tsplusTrace);
 }
 /**
  * @tsplus static fncts.io.IOOps if
@@ -941,14 +941,14 @@ function ifIO_1(self, onFalse, onTrue) {
 
 
 export function if_(b, onTrue, onFalse, __tsplusTrace) {
-  return ifIO_1(succeedNow_1(b, __tsplusTrace), onTrue, onFalse);
+  return ifIO_1(succeedNow_1(b, __tsplusTrace), onTrue, onFalse, __tsplusTrace);
 }
 /**
  * @tsplus getter fncts.io.IO ignore
  */
 
-export function ignore(fa) {
-  return match_1(fa, () => undefined, () => undefined, fileName_1 + ":1111:18");
+export function ignore(fa, __tsplusTrace) {
+  return match_1(fa, () => undefined, () => undefined, __tsplusTrace);
 }
 /**
  * Folds a `IO` to a boolean describing whether or not it is a failure
@@ -956,8 +956,8 @@ export function ignore(fa) {
  * @tsplus getter fncts.io.IO isFailure
  */
 
-export function isFailure(ma) {
-  return match_1(ma, () => true, () => false, fileName_1 + ":1123:18");
+export function isFailure(ma, __tsplusTrace) {
+  return match_1(ma, () => true, () => false, __tsplusTrace);
 }
 /**
  * Folds a `IO` to a boolean describing whether or not it is a success
@@ -965,8 +965,8 @@ export function isFailure(ma) {
  * @tsplus getter fncts.io.IO isSuccess
  */
 
-export function isSuccess(ma) {
-  return match_1(ma, () => false, () => true, fileName_1 + ":1135:18");
+export function isSuccess(ma, __tsplusTrace) {
+  return match_1(ma, () => false, () => true, __tsplusTrace);
 }
 /**
  * Iterates with the specified effectual function. The moral equivalent of:
@@ -994,8 +994,8 @@ function iterate_1(initial, cont, body, __tsplusTrace) {
  */
 
 
-export function left(a) {
-  return flatMap_1(succeed_1(a, fileName_1 + ":1170:20"), a => succeedNow_1(tsplus_module_3.left(a), fileName_1 + ":1170:52"), fileName_1 + ":1170:31");
+export function left(a, __tsplusTrace) {
+  return flatMap_1(succeed_1(a, __tsplusTrace), a => succeedNow_1(tsplus_module_3.left(a), __tsplusTrace), __tsplusTrace);
 }
 /**
  * @tsplus static fncts.io.IOOps log
@@ -1049,7 +1049,7 @@ function loop_1(initial, cont, inc, body, __tsplusTrace) {
 
 export function loopUnit_(initial, cont, inc, body, __tsplusTrace) {
   if (cont(initial)) {
-    return asUnit_1(flatMap_1(body(initial), () => loop_1(inc(initial), cont, inc, body, __tsplusTrace), __tsplusTrace));
+    return asUnit_1(flatMap_1(body(initial), () => loop_1(inc(initial), cont, inc, body, __tsplusTrace), __tsplusTrace), __tsplusTrace);
   } else {
     return unit_1;
   }
@@ -1166,7 +1166,7 @@ export function merge(io, __tsplusTrace) {
  */
 
 export function mergeAll_(fas, b, f, __tsplusTrace) {
-  return tsplus_module_10.foldLeft_(fas, succeed_1(() => b, __tsplusTrace), (b, a) => zipWith_1(b, a, f));
+  return tsplus_module_10.foldLeft_(fas, succeed_1(() => b, __tsplusTrace), (b, a) => zipWith_1(b, a, f, __tsplusTrace));
 }
 /**
  * Returns a `IO` that will never produce anything. The moral equivalent of
@@ -1180,16 +1180,16 @@ export const never = /*#__PURE__*/defer_1(() => asyncInterrupt_1(() => {
   }, 60000);
   return tsplus_module_3.left(succeed_1(() => {
     clearInterval(interval);
-  }, fileName_1 + ":1409:17"));
-}), fileName_1 + ":1403:39");
+  }, fileName_1 + ":1444:17"));
+}), fileName_1 + ":1438:39");
 /**
  * Converts an option on errors into an option on values.
  *
  * @tsplus getter fncts.io.IO optional
  */
 
-export function optional(ma) {
-  return matchIO_1(ma, me => tsplus_module_4.match_(me, () => succeedNow_1(tsplus_module_2.nothing(), fileName_1 + ":1423:41"), failNow_1), a => succeedNow_1(tsplus_module_2.just(a), fileName_1 + ":1424:25"), fileName_1 + ":1422:20");
+export function optional(ma, __tsplusTrace) {
+  return matchIO_1(ma, me => tsplus_module_4.match_(me, () => succeedNow_1(tsplus_module_2.nothing(), __tsplusTrace), failNow_1), a => succeedNow_1(tsplus_module_2.just(a), __tsplusTrace), __tsplusTrace);
 }
 /**
  * Returns the logical disjunction of the `Boolean` value returned by this
@@ -1222,8 +1222,8 @@ export function orElseEither_(self, that, __tsplusTrace) {
  * @tsplus fluent fncts.io.IO orElseFail
  */
 
-export function orElseFail_(ma, e) {
-  return orElse_1(ma, () => fail_1(e, fileName_1 + ":1470:27"), fileName_1 + ":1470:19");
+export function orElseFail_(ma, e, __tsplusTrace) {
+  return orElse_1(ma, () => fail_1(e, __tsplusTrace), __tsplusTrace);
 }
 /**
  * @tsplus fluent fncts.io.IO orElseMaybe
@@ -1250,8 +1250,8 @@ export function orHalt(ma, __tsplusTrace) {
  * @tsplus getter fncts.io.IO orHaltKeep
  */
 
-export function orHaltKeep(ma) {
-  return matchCauseIO_1(ma, cause => failCauseNow_1(tsplus_module_5.flatMap_(cause, tsplus_module_5.halt), fileName_1 + ":1502:52"), succeedNow_1, fileName_1 + ":1502:25");
+export function orHaltKeep(ma, __tsplusTrace) {
+  return matchCauseIO_1(ma, cause => failCauseNow_1(tsplus_module_5.flatMap_(cause, tsplus_module_5.halt), __tsplusTrace), succeedNow_1, __tsplusTrace);
 }
 /**
  * @tsplus fluent fncts.io.IO orHaltWith
@@ -1267,16 +1267,16 @@ function orHaltWith_1(ma, f, __tsplusTrace) {
  */
 
 
-export function parallelErrors(io) {
+export function parallelErrors(io, __tsplusTrace) {
   return matchCauseIO_1(io, cause => {
     const f = tsplus_module_5.failures(cause);
 
     if (tsplus_module_17.length(f) === 0) {
-      return failCauseNow_1(cause, fileName_1 + ":1521:29");
+      return failCauseNow_1(cause, __tsplusTrace);
     } else {
-      return failNow_1(f, fileName_1 + ":1523:24");
+      return failNow_1(f, __tsplusTrace);
     }
-  }, succeedNow_1, fileName_1 + ":1518:25");
+  }, succeedNow_1, __tsplusTrace);
 }
 /**
  * Feeds elements of type `A` to a function `f` that returns an IO.
@@ -1295,7 +1295,7 @@ export function partition_(as, f, __tsplusTrace) {
  */
 
 export function refineOrHalt_(fa, pf, __tsplusTrace) {
-  return refineOrHaltWith_1(fa, pf, identity);
+  return refineOrHaltWith_1(fa, pf, identity, __tsplusTrace);
 }
 /**
  * Keeps some of the errors, and terminates the fiber with the rest, using
@@ -1304,8 +1304,8 @@ export function refineOrHalt_(fa, pf, __tsplusTrace) {
  * @tsplus fluent fncts.io.IO refineOrHaltWith
  */
 
-function refineOrHaltWith_1(fa, pf, f) {
-  return catchAll_1(fa, e => tsplus_module_4.match_(pf(e), () => haltNow_1(f(e), fileName_1 + ":1566:57"), failNow_1), fileName_1 + ":1566:21");
+function refineOrHaltWith_1(fa, pf, f, __tsplusTrace) {
+  return catchAll_1(fa, e => tsplus_module_4.match_(pf(e), () => haltNow_1(f(e), __tsplusTrace), failNow_1), __tsplusTrace);
 }
 /**
  * Fail with the returned value if the partial function `pf` matches, otherwise
@@ -1365,8 +1365,8 @@ function repeatUntilIO_1(ma, f, __tsplusTrace) {
  */
 
 
-export function repeatWhile_(ma, f) {
-  return repeatWhileIO_1(ma, a => succeedNow_1(f(a), fileName_1 + ":1640:47"), fileName_1 + ":1640:26");
+export function repeatWhile_(ma, f, __tsplusTrace) {
+  return repeatWhileIO_1(ma, a => succeedNow_1(f(a), __tsplusTrace), __tsplusTrace);
 }
 /**
  * Repeats this effect while its error satisfies the specified effectful predicate.
@@ -1408,8 +1408,8 @@ export function result(ma, __tsplusTrace) {
  * @trace call
  */
 
-export function resurrect(io) {
-  return unrefineWith_1(io, tsplus_module_2.just, identity, fileName_1 + ":1689:25");
+export function resurrect(io, __tsplusTrace) {
+  return unrefineWith_1(io, tsplus_module_2.just, identity, __tsplusTrace);
 }
 /**
  * Retries this effect until its error satisfies the specified predicate.
@@ -1455,7 +1455,7 @@ function retryWhileIO_1(fa, f, __tsplusTrace) {
  */
 
 
-export const runtimeConfig = /*#__PURE__*/deferWith_1(runtimeConfig => succeedNow_1(runtimeConfig, fileName_1 + ":1741:95"), fileName_1 + ":1741:62");
+export const runtimeConfig = /*#__PURE__*/deferWith_1(runtimeConfig => succeedNow_1(runtimeConfig, fileName_1 + ":1777:95"), fileName_1 + ":1777:62");
 /**
  * Exposes the full cause of failure of this effect.
  *
@@ -1471,7 +1471,7 @@ function sandbox_1(fa, __tsplusTrace) {
 
 
 export function sandboxWith_(ma, f, __tsplusTrace) {
-  return unsandbox_1(f(sandbox_1(ma, __tsplusTrace)));
+  return unsandbox_1(f(sandbox_1(ma, __tsplusTrace)), __tsplusTrace);
 }
 /**
  * Sets the runtime configuration to the specified value.
@@ -1485,15 +1485,15 @@ export function setRuntimeConfig(runtimeConfig, __tsplusTrace) {
  * @tsplus static fncts.io.IOOps sequenceIterable
  */
 
-export function sequenceIterable(as) {
-  return foreach_1(as, identity, fileName_1 + ":1775:20");
+export function sequenceIterable(as, __tsplusTrace) {
+  return foreach_1(as, identity, __tsplusTrace);
 }
 /**
  * @tsplus static fncts.io.IOOps sequenceIterableDiscard
  */
 
 export function sequenceIterableDiscard(as, __tsplusTrace) {
-  return foreachDiscard_1(as, identity);
+  return foreachDiscard_1(as, identity, __tsplusTrace);
 }
 /**
  * Creates a `IO` that has succeeded with a pure value
@@ -1539,7 +1539,7 @@ function summarized_1(ma, summary, f, __tsplusTrace) {
     const value = yield* _(ma, __tsplusTrace);
     const end = yield* _(summary, __tsplusTrace);
     return tuple(f(start, end), value);
-  });
+  }, __tsplusTrace);
 }
 /**
  * Swaps the positions of a Bifunctor's arguments
@@ -1548,8 +1548,8 @@ function summarized_1(ma, summary, f, __tsplusTrace) {
  */
 
 
-function swap_1(pab) {
-  return matchIO_1(pab, succeedNow_1, failNow_1, fileName_1 + ":1844:21");
+function swap_1(pab, __tsplusTrace) {
+  return matchIO_1(pab, succeedNow_1, failNow_1, __tsplusTrace);
 }
 /**
  * Swaps the error/value parameters, applies the function `f` and flips the parameters back
@@ -1558,8 +1558,8 @@ function swap_1(pab) {
  */
 
 
-function swapWith_1(fa, f) {
-  return swap_1(f(swap_1(fa)));
+function swapWith_1(fa, f, __tsplusTrace) {
+  return swap_1(f(swap_1(fa, __tsplusTrace)), __tsplusTrace);
 }
 /**
  * A more powerful variation of `timed` that allows specifying the clock.
@@ -1649,7 +1649,7 @@ function tryOrElse_1(ma, that, onSuccess, __tsplusTrace) {
  */
 
 
-const unit_1 = /*#__PURE__*/succeedNow_1(undefined, fileName_1 + ":1964:45");
+const unit_1 = /*#__PURE__*/succeedNow_1(undefined, fileName_1 + ":2004:45");
 export const unit = unit_1;
 /**
  * Converts an option on errors into an option on values.
@@ -1657,8 +1657,8 @@ export const unit = unit_1;
  * @tsplus getter fncts.io.IO unjust
  */
 
-export function unjust(self) {
-  return matchIO_1(self, e => tsplus_module_4.match_(e, () => succeedNow_1(tsplus_module_2.nothing(), fileName_1 + ":1973:39"), failNow_1), a => succeedNow_1(tsplus_module_2.just(a), fileName_1 + ":1974:25"), fileName_1 + ":1972:22");
+export function unjust(self, __tsplusTrace) {
+  return matchIO_1(self, e => tsplus_module_4.match_(e, () => succeedNow_1(tsplus_module_2.nothing(), __tsplusTrace), failNow_1), a => succeedNow_1(tsplus_module_2.just(a), __tsplusTrace), __tsplusTrace);
 }
 /**
  * Takes some fiber failures and converts them into errors, using the
@@ -1677,8 +1677,8 @@ function unrefineWith_1(fa, pf, f, __tsplusTrace) {
  */
 
 
-function unsandbox_1(ma) {
-  return mapErrorCause_1(ma, cause => tsplus_module_5.flatten(cause), fileName_1 + ":2001:26");
+function unsandbox_1(ma, __tsplusTrace) {
+  return mapErrorCause_1(ma, cause => tsplus_module_5.flatten(cause), __tsplusTrace);
 }
 /**
  * Updates the `FiberRef` values for the fiber running this effect using the
@@ -1701,7 +1701,7 @@ export const via = pipe;
  */
 
 export function when_(ma, b, __tsplusTrace) {
-  return whenIO_1(ma, succeed_1(b, __tsplusTrace));
+  return whenIO_1(ma, succeed_1(b, __tsplusTrace), __tsplusTrace);
 }
 /**
  * The moral equivalent of `if (p) exp` when `p` has side-effects
@@ -1709,8 +1709,8 @@ export function when_(ma, b, __tsplusTrace) {
  * @tsplus fluent fncts.io.IO whenIO
  */
 
-function whenIO_1(ma, mb) {
-  return flatMap_1(mb, b => b ? asUnit_1(ma) : unit_1, fileName_1 + ":2035:20");
+function whenIO_1(ma, mb, __tsplusTrace) {
+  return flatMap_1(mb, b => b ? asUnit_1(ma, __tsplusTrace) : unit_1, __tsplusTrace);
 }
 /**
  * Returns an effect that yields to the runtime system, starting on a fresh
@@ -1727,15 +1727,15 @@ export const yieldNow = yieldNow_1;
  * @tsplus fluent fncts.io.IO zip
  */
 
-export function zip_(self, that) {
-  return zipWith_1(self, that, tuple);
+export function zip_(self, that, __tsplusTrace) {
+  return zipWith_1(self, that, tuple, __tsplusTrace);
 }
 /**
  * @tsplus fluent fncts.io.IO zipWith
  */
 
-function zipWith_1(self, that, f) {
-  return flatMap_1(self, a => map_1(that, b => f(a, b), fileName_1 + ":2062:38"), fileName_1 + ":2062:22");
+function zipWith_1(self, that, f, __tsplusTrace) {
+  return flatMap_1(self, a => map_1(that, b => f(a, b), __tsplusTrace), __tsplusTrace);
 }
 
 export class GenIO {
@@ -1782,14 +1782,14 @@ const adapter = (_, __tsplusTrace) => {
  */
 
 
-function gen_1(f) {
+function gen_1(f, __tsplusTrace) {
   return defer_1(() => {
     const iterator = f(adapter);
     const state = iterator.next();
 
     const run = state => {
       if (state.done) {
-        return succeed_1(() => state.value, fileName_1 + ":2117:26");
+        return succeed_1(() => state.value, __tsplusTrace);
       }
 
       const f = val => {
@@ -1797,10 +1797,10 @@ function gen_1(f) {
         return run(next);
       };
 
-      return flatMap_1(state.value.effect, f, fileName_1 + ":2123:40");
+      return flatMap_1(state.value.effect, f, __tsplusTrace);
     };
 
     return run(state);
-  }, fileName_1 + ":2111:18");
+  }, __tsplusTrace);
 }
 //# sourceMappingURL=api.mjs.map