—

              
# $Id: verilog_synthesis_md5.pm,v 1.4 2009/02/09 22:07:39 pfeiffer Exp $
use strict;
package Mpp::Signature::verilog_synthesis_md5;
use Mpp::Signature::c_compilation_md5;
our @ISA = qw(Mpp::Signature::c_compilation_md5);
HideShow 11 lines of Pod
=head1 NAME
Mpp::Signature::verilog_synthesis_md5 -- a signature class that ignores changes to whitespace and comments
=head1 DESCRIPTION
Similar to Mpp::Signature::c_compilation_md5, except that it recognizes
different filenames and does not ignore comments containing "synopsys".
=cut
our $verilog_synthesis_md5 = bless \@ISA;       # Make the singleton object.
sub build_info_key { 'V_MD5_SUM' }
sub important_comment_keywords {
  return qw/synopsys/;
}
sub recognizes_file {
  my $finfo = $_[1];
  return $finfo->{NAME} =~ /\.v$/;
}
1;