sig val mk : Ast_404.Parsetree.core_type -> Ast_404.Parsetree.class_type_field list -> Ast_404.Parsetree.class_signature end