sig val mk : Ast_406.Parsetree.pattern -> Ast_406.Parsetree.class_field list -> Ast_406.Parsetree.class_structure end