io.ml
jsonxt
1 2 3 4 5 6 7 module type IO = sig type 'a t val return : 'a -> 'a t val (>>=) : 'a t -> ('a -> 'b t) -> 'b t end
1 2 3 4 5 6 7
module type IO = sig type 'a t val return : 'a -> 'a t val (>>=) : 'a t -> ('a -> 'b t) -> 'b t end