@effect-ts/system/_src/Effect/eventually.ts

Effect-TS is a zero dependency set of libraries to write highly productive, purely functional TypeScript at scale.

// ets_tracing: off

import { yieldNow } from "./core.js"
import type { Effect } from "./effect.js"
import { orElse_ } from "./orElse.js"
import { zipRight_ } from "./zips.js"

/**
 * Returns an effect that ignores errors and runs repeatedly until it eventually succeeds.
 */
export function eventually<R, E, A>(
  fa: Effect<R, E, A>,
  __trace?: string
): Effect<R, never, A> {
  return orElse_(fa, () => zipRight_(yieldNow, eventually(fa)), __trace)
}