Displaying 1 result from an estimated 1 matches for "xentagend".
2013 May 23
2
[PATCH 1/2] gcov: Add script to split coverage informations.
...Mass Ave, Cambridge, MA 02139, USA.
+
+use strict;
+use File::Path qw(mkpath);
+
+# some magic constants
+my $magic = 0x67636461;
+my $ctrBase = 0x01a10000;
+
+my $xenMagic = 0x58544346; # file header
+my $xenTagFunc = 0x58544366; # functions tag
+my $xenTagCount0 = 0x58544330; # counter 0 tag
+my $xenTagEnd = 0x5854432e; # end file
+
+# open input file
+if ($ARGV[0]) {
+ my $fn = $ARGV[0];
+ open(IN, ''<'', $fn) or die "opening file \"$fn\"";
+} else {
+ open(IN, ''<&STDIN'') or die "redirecting input";
+}
+
+my $pos = 0;
+
+sub g...