import { Env, Resume } from '@typed/env' import { Capabilities, Effect, IteratorResultOf, Return } from '../Effect' import { Failure } from '../failures/Failure' export const runEffect = >( effect: A, ): Env, Return> => (c: Capabilities) => { const generator = effect[Symbol.iterator]() as A return runEffectGenerator(generator, generator.next(), c) } const nextResult = >(value: any, generator: A): IteratorResultOf => { if (value instanceof Failure) { return value.unpack( (e) => generator.throw(e), (a) => generator.return(a), ) } return generator.next(value) } const runEffectGenerator = >( generator: A, result: IteratorResultOf, capabilities: Capabilities, ): Resume> => { while (!result.done) { const resume = result.value(capabilities) if (resume.type === 'lazy') { return Resume.chain( (value) => runEffectGenerator(generator, nextResult(value, generator), capabilities), resume, ) } result = nextResult(resume.value, generator) } return Resume.of(result.value) }