-=cut
-
-sub report_class {
- my ($self, $sess) = @_;
-
- if ($sess->do_suppressions) {
- $self->report_class_suppressions($sess);
- } else {
- $self->report_class_analysis($sess);
- }
-}
-
-=head2 C<report_class_suppressions $session>
-
-Returns the class in which suppression reports generated by this tool will be blessed.