@effect-ts/system
Version:
Effect-TS is a zero dependency set of libraries to write highly productive, purely functional TypeScript at scale.
26 lines (22 loc) • 836 B
text/typescript
// ets_tracing: off
import type { Has, Tag } from "../Has/index.js"
import type { Managed } from "../Managed/managed.js"
import { use_ } from "../Managed/use.js"
import type { Effect } from "./effect.js"
import * as has from "./has.js"
import * as provide from "./provide.js"
/**
* Provides a managed to the given effect
*/
export function provideSomeManaged<R, E, A>(managed: Managed<R, E, A>) {
return <R1, E1, A1>(self: Effect<R1 & A, E1, A1>): Effect<R & R1, E | E1, A1> =>
use_(managed, (a) => provide.provide(a)(self))
}
/**
* Provides a managed to the given effect
*/
export function provideServiceManaged<A>(tag: Tag<A>) {
return <R, E>(managed: Managed<R, E, A>) =>
<R1, E1, A1>(self: Effect<R1 & Has<A>, E1, A1>): Effect<R & R1, E | E1, A1> =>
use_(managed, (a) => has.provideService(tag)(a)(self))
}