Robustness of autom4te

[Akim Demaille]

Index: ChangeLog
from  Akim Demaille  <address@hidden>

        * bin/autom4te.in (load_configuration): Reject #args out of any
        language.

Index: bin/autom4te.in
===================================================================
RCS file: /cvsroot/autoconf/autoconf/bin/autom4te.in,v
retrieving revision 1.76
diff -u -u -r1.76 autom4te.in
--- bin/autom4te.in 30 Oct 2002 09:00:23 -0000 1.76
+++ bin/autom4te.in 31 Oct 2002 08:36:36 -0000
@@ -465,15 +465,20 @@
       my $type = shift @words;
       if ($type eq 'begin-language:')
        {
+         error "$file:$.: end-language missing for: $lang"
+           if defined $lang;
          $lang = lc $words[0];
        }
       elsif ($type eq 'end-language:')
        {
          error "$file:$.: end-language mismatch: $lang"
            if $lang ne lc $words[0];
+         $lang = undef;
        }
       elsif ($type eq 'args:')
        {
+         error "$file:$.: no current language"
+           unless defined $lang;
          push @{$language{$lang}}, @words;
        }
       else