module Ci:sig
..end
val mk : ?loc:Location.t ->
?attrs:Ast_402.Parsetree.attributes ->
?docs:Ast_402.Docstrings.docs ->
?text:Ast_402.Docstrings.text ->
?virt:Ast_402.Asttypes.virtual_flag ->
?params:(Ast_402.Parsetree.core_type * Ast_402.Asttypes.variance) list ->
string Ast_402.Asttypes.loc -> 'a -> 'a Ast_402.Parsetree.class_infos