Skip to content

Commit 0fb3391

Browse files
x86: tools: Remove unused perl code variables
Merged version of a PR by mknos: #91 Signed-off-by: Maciej Wieczor-Retman <[email protected]>
1 parent 62f5f69 commit 0fb3391

File tree

3 files changed

+0
-4
lines changed

3 files changed

+0
-4
lines changed

tools/mkdep.pl

Lines changed: 0 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -224,8 +224,6 @@ ($)
224224
}
225225
unlink($external);
226226
} else {
227-
my $e;
228-
229227
foreach my $dfile ($external, sort(keys(%deps)) ) {
230228
my $ofile;
231229
my @deps;

x86/insns.pl

Lines changed: 0 additions & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -80,7 +80,6 @@ ($$$@)
8080

8181
sub startseq($$) {
8282
my ($codestr,$flags) = @_;
83-
my $word;
8483
my @codes = ();
8584
my $c = $codestr;
8685
my($c0, $c1, $i);

x86/regs.pl

Lines changed: 0 additions & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -24,7 +24,6 @@ ($)
2424

2525
sub process_line($) {
2626
my($line) = @_;
27-
my @v;
2827

2928
if ( $line !~ /^\s*(\S+)\s*(\S+)\s*(\S+)\s*([0-9]+)\s*(?:\&\s*(0x[0-9a-f]+|[0-9]+))?/i ) {
3029
die "regs.dat:$nline: invalid input\n";

0 commit comments

Comments
 (0)