/[autoconf]/autoconf/bin/autoscan.in
ViewVC logotype

Diff of /autoconf/bin/autoscan.in

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.84 by akim, Sat Sep 28 14:00:35 2002 UTC revision 1.85 by akim, Sat Sep 28 14:01:11 2002 UTC
# Line 164  sub init_tables () Line 164  sub init_tables ()
164            next            next
165              if /^\s*$/ || /^\s*\#/;              if /^\s*$/ || /^\s*\#/;
166    
167            # '<word>        <macro invocation>' or...            # '<kind>: <word> <macro invocation>' or...
168            # '<word>        warn: <message>'.            # '<kind>: <word> warn: <message>'.
169            if (/^(\S+)\s+(\S.*)$/)            if (/^(\S+):\s+(\S+)\s+(\S.*)$/)
170              {              {
171                my $word = $1;                my ($mkind, $word, $macro) = ($1, $2, $3);
172                my $macro = $2;                die "$mkind:$kind\n"
173                    unless "${mkind}s" eq $kind;
174                # The default macro must be explicitly listed for words                # The default macro must be explicitly listed for words
175                # which have a specific macros.  This allows to enforce                # which have a specific macros.  This allows to enforce
176                # consistency checks.                # consistency checks.
177                if (!defined $2 && exists $macro{$kind}{$word})                if (!defined $word && exists $macro{$kind}{$word})
178                  {                  {
179                    warn ("$file:$.: "                    warn ("$file:$.: "
180                          . "ignoring implicit call to the generic macro for $word\n");                          . "ignoring implicit call to the generic macro for $word\n");

Legend:
Removed from v.1.84  
changed lines
  Added in v.1.85

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26