sig
type 'a t
type 'a node
val make : 'a -> 'a Ocsigen_pervasives.Clist.node
val create : unit -> 'a Ocsigen_pervasives.Clist.t
val insert :
'a Ocsigen_pervasives.Clist.t -> 'a Ocsigen_pervasives.Clist.node -> unit
val remove : 'a Ocsigen_pervasives.Clist.node -> unit
val value : 'a Ocsigen_pervasives.Clist.node -> 'a
val in_list : 'a Ocsigen_pervasives.Clist.node -> bool
val is_empty : 'a Ocsigen_pervasives.Clist.t -> bool
val iter : ('a -> unit) -> 'a Ocsigen_pervasives.Clist.t -> unit
val fold_left :
('a -> 'b -> 'a) -> 'a -> 'b Ocsigen_pervasives.Clist.t -> 'a
end