From 2fbd43d6fd5277a234d5b0caf231af246d1c0ac8 Mon Sep 17 00:00:00 2001 From: Stefano Lattarini Date: Thu, 7 Jun 2012 19:13:39 +0200 Subject: [PATCH] cleanup: remove unused '&count_files_for_language' subroutine * automake.in (count_files_for_language): Remove. Its only remaining caller (saw_sources_p) has stopped calling it in the previous commit. Signed-off-by: Stefano Lattarini --- automake.in | 38 -------------------------------------- 1 file changed, 38 deletions(-) diff --git a/automake.in b/automake.in index af9fb5b09..8c02016d7 100644 --- a/automake.in +++ b/automake.in @@ -6038,44 +6038,6 @@ sub saw_extension } } -# Return the number of files seen for a given language. Knows about -# special cases we care about. FIXME: this is hideous. We need -# something that involves real language objects. For instance yacc -# and yaccxx could both derive from a common yacc class which would -# know about the strange ylwrap requirement. (Or better yet we could -# just not support legacy yacc!) -sub count_files_for_language -{ - my ($name) = @_; - - my @names; - if ($name eq 'yacc' || $name eq 'yaccxx') - { - @names = ('yacc', 'yaccxx'); - } - elsif ($name eq 'lex' || $name eq 'lexxx') - { - @names = ('lex', 'lexxx'); - } - else - { - @names = ($name); - } - - my $r = 0; - foreach $name (@names) - { - my $lang = $languages{$name}; - foreach my $ext (@{$lang->extensions}) - { - $r += $extension_seen{$ext} - if defined $extension_seen{$ext}; - } - } - - return $r -} - # Called to ask whether source files (not headers) have been seen. sub saw_sources_p { -- 2.47.2