The Perl Toolchain Summit 2025 Needs You: You can help 🙏 Learn more

# $Id: verilog_simulation_md5.pm,v 1.4 2009/02/09 22:07:39 pfeiffer Exp $
use strict;
our @ISA = qw(Mpp::Signature::c_compilation_md5);
=head1 NAME
Mpp::Signature::verilog_simulation_md5 -- a signature class that ignores changes to whitespace and comments
=head1 DESCRIPTION
Very similar to Mpp::Signature::c_compilation_md5, except that it recognizes
different filenames.
=cut
our $verilog_simulation_md5 = bless \@ISA; # Make the singleton object.
sub recognizes_file {
my $finfo = $_[1];
return $finfo->{NAME} =~ /\.v$/;
}
1;