OpenE2K/qemu-e2k
13
4
Fork 0
Code Issues 4 Pull Requests Projects 2 Releases Activity

scripts/cleanup-trace-events: Emit files in alphabetical order

Browse Source 
Signed-off-by: Markus Armbruster <armbru@redhat.com>
Message-id: 20200806141334.3646302-3-armbru@redhat.com
Signed-off-by: Stefan Hajnoczi <stefanha@redhat.com>
This commit is contained in:
Markus Armbruster 2020-08-06 16:13:32 +02:00 committed by Stefan Hajnoczi
parent 164e7dd73c
commit f7dc89c35d
1 changed files with 8 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

13
scripts/cleanup-trace-events.pl
View File

@ -15,12 +15,15 @@ use warnings;
use strict;
use File::Basename;
my $buf = '';
my @files = ();
my $events = '';
my %seen = ();
sub out {
print $buf;
$buf = '';
print sort @files;
print $events;
@files = ();
$events = '';
%seen = ();
}
@ -42,7 +45,7 @@ while (<IN>) {
chomp $fname;
next if $seen{$fname} || $fname eq 'trace-events';
$seen{$fname} = 1;
$buf = "# $fname\n" . $buf;
push @files, "# $fname\n";
}
unless (close GREP) {
die "close git grep: $!"
@ -55,7 +58,7 @@ while (<IN>) {
} elsif (!/^#|^$/) {
warn "unintelligible line";
}
$buf .= $_;
$events .= $_;
}
out;