Module Concrete.Comprehension
type t
= private
{
target : Expression.t;
iter : Expression.t;
ifs : Expression.t list;
is_async : bool;
}
include Ppx_sexp_conv_lib.Sexpable.S with type Comprehension.t := t
val compare : t -> t -> int
val hash_fold_t : Ppx_hash_lib.Std.Hash.state -> t -> Ppx_hash_lib.Std.Hash.state
val hash : t -> Ppx_hash_lib.Std.Hash.hash_value
val make_t : target:Expression.t -> iter:Expression.t -> ?ifs:Expression.t list -> is_async:bool -> unit -> t