commit 677d812912ffa4c50f93f36151cb8487aa52dccd
parent 8922ca69f9ee3e3362751b676c21b37991788d8f
Author: Kyle Milz <kyle@0x30.net>
Date: Mon, 8 Aug 2016 20:33:43 -0600
Test: use compiler name in testsuite too
Diffstat:
1 file changed, 3 insertions(+), 2 deletions(-)
diff --git a/Test/Viewer.pm b/Test/Viewer.pm
@@ -38,11 +38,12 @@ sub accept {
my @tus;
for (1..$self->{ntus}) {
- my $file_name = read_all($sock, read_unpack($sock, 2, "S"));
+ my $comp_file_name = read_all($sock, read_unpack($sock, 2, "S"));
+ my $abs_file_name = read_all($sock, read_unpack($sock, 2, "S"));
my ($num_lines) = read_unpack($sock, 4, "L");
# Keep this in order so it's easy to fetch dynamic data.
- push @tus, [ $file_name, $num_lines ];
+ push @tus, [ $comp_file_name, $num_lines ];
}
$self->{tus} = \@tus;
}