blob: c1e45742deab6a37bc1864ced4e63188d88a3f5d (
plain) (
blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
|
export interface EffectAtom<T = unknown> { output: T }
export type Effect = EffectAtom[]
export interface Kind1<Inp = unknown, Out = unknown> {
input: Inp
return: Out
}
export interface Program<Effs extends Effect, ExitCode extends number = 0> {
effects: Effs,
exitCode: ExitCode,
}
export interface Bind<Eff extends EffectAtom, Fn extends Kind1> extends EffectAtom {
input: Eff
chainTo: Fn
}
export interface Seq<Effs extends EffectAtom[]> extends EffectAtom {
effects: Effs
}
|