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