runtests.pl: properly print the test if it contains binary zeros

This commit is contained in:
Fabian Keil 2021-01-24 15:12:23 +01:00 committed by Daniel Stenberg
parent 6e7ce9bbfb
commit 43eef423d6
No known key found for this signature in database
GPG Key ID: 5CC908FDB71E12C2

View File

@ -3763,7 +3763,9 @@ sub singletest {
# save the new version
open(D, ">$otest");
print D @entiretest;
foreach my $bytes (@entiretest) {
print D pack('a*', $bytes) or die "Failed to print '$bytes': $!";
}
close(D);
# in case the process changed the file, reload it