+ my @supp_files = grep {
+ -e $_ and $self->command->check_suppressions_file($_)
+ } $self->suppressions;
+ if (@supp_files > 1) {
+ my $files_list = join "\n", map " $_", @supp_files;
+ $self->report($self->report_class->new_diag(
+ "Using suppressions from:\n$files_list"
+ ));
+ } elsif (@supp_files) {
+ $self->report($self->report_class->new_diag(
+ "Using suppressions from $supp_files[0]"
+ ));
+ } elsif ($self->allow_no_supp) {
+ $self->report($self->report_class->new_diag("No suppressions used"));
+ } else {
+ $self->_croak("No compatible suppressions available");
+ }
+ @supp_args = map "--suppressions=$_", @supp_files;