Ci (ppxlib.Ppxlib_ast.Ast

val mk : 
  ?loc:Astlib.Location.t ->
  ?attrs:Astlib.Ast_500.Parsetree.attribute list ->
  ?virt:Astlib.Ast_500.Asttypes.virtual_flag ->
  ?params:
    (Astlib.Ast_500.Parsetree.core_type
     * (Astlib.Ast_500.Asttypes.variance * Astlib.Ast_500.Asttypes.injectivity))
      list ->
  string Astlib.Location.loc ->
  'a ->
  'a Astlib.Ast_500.Parsetree.class_infos