This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
feature.pl: Remove unused var
[perl5.git] / 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)