aclocal 2.53 uninitialized value warnings

[Nicolas Joly]

Hi,

I just installed autoconf 2.53 on my Tru64 unix v5.1a workstation. I
often use aclocal to create `configure.ac' framework on many projects;
but this time it gave me some warnings :

address@hidden [~/tmp]> mkdir project
address@hidden [~/tmp]> cd project
address@hidden [tmp/project]> touch dummy.c
address@hidden [tmp/project]> autoscan
Use of uninitialized value in concatenation (.) or string at 
/local/bin/autoscan line 195.

This small problem is located in scan_file() function :

[...]
   360    if (/\.[chlym](\.in)?$/)
   361      {
   362        used 'programs', 'cc';
   363        scan_c_file ($_);
   364      }
   365    elsif (/\.(cc|cpp|cxx|CC|C|hh|hpp|hxx|HH|H|yy|ypp|ll|lpp)(\.in)?$/)
[...]

The used() function is called with the 2 mandatory arguments.

   189  # used($KIND, $WORD, [$WHERE])
   190  # ----------------------------
   191  # $WORD is used as a $KIND.
   192  sub used ($$;$)
   193  {
   194    my ($kind, $word, $where) = @_;
   195    $where ||= "$File::Find::name:$.";
   196    push (@{$used{$kind}{$word}}, $where);
   197  }

In that case `$where' variable is made by the concatenation of the
file name and the current line number in the file.

But the current file is not already opened (and will be by
`scan_c_file()' function later) resulting in an undefined value for
`$.' that perl warns about.

NB: This problem occurs with c++ files too, a few lines later.

-- 
Nicolas Joly

Biological Software and Databanks.
Pasteur Institute, Paris.