Subject: | [PATCH] getListOfCFiles() does not work on AIX |
getListOfCFiles has a hard-coded list of supported platforms. When a
platform is not recognized (such as AIX) it doesn't returns any files.
Also getListOfCFiles is implemented using external commands ('dir' on
Windows, 'find' on Linux...). getListOfCFiles should instead be
implemented in pure Perl using either File::Glob or File::Find.
Here is a naive implementation (that does not support recursive dir):
sub C::Analyzer::getListOfCFiles()
{
my ($folder, $opt) = @_;
return [ glob "$$folder/*.c" ];
}
--
Olivier Mengué - http://o.mengue.free.fr/