This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
feature.pl: Remove unused var
authorFather Chrysostomos <sprout@cpan.org>
Fri, 23 Dec 2011 06:47:21 +0000 (22:47 -0800)
committerFather Chrysostomos <sprout@cpan.org>
Sat, 24 Dec 2011 17:25:19 +0000 (09:25 -0800)
regen/feature.pl

index bbaf157..5875168 100755 (executable)
@@ -194,7 +194,6 @@ read_only_bottom_close_and_rename($pm);
 ###########################################################################
 # Generate feature.h
 
-my $first_bit = sprintf "0x%08x", 1 << $HintShift;
 print $h <<EOH;
 
 #if defined(PERL_CORE) || defined (PERL_EXT)