mirror/curl
2
0
Fork 0
mirror of https://github.com/curl/curl.git synced 2025-01-24 14:15:18 +08:00
Code Issues Packages Projects Releases Wiki Activity

test1707: output diff more for debugging differences in CI outputs

Browse Source
This commit is contained in:
Daniel Stenberg 2024-08-16 00:19:00 +02:00
parent 0066d169e8
commit 3932964793
No known key found for this signature in database
GPG Key ID: 5CC908FDB71E12C2
1 changed files with 16 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

18
tests/test1707.pl
View File

@ -112,8 +112,22 @@ else {
$txtout[$i] =~ s/[\r\n]//g;
if($curlout[$i] ne $txtout[$i]) {
printf "Line %d\n", $i;
printf "-h : %s\n", $curlout[$i];
printf "file : %s\n", $txtout[$i];
printf "-h : %s (%d bytes)\n", $curlout[$i],
length($curlout[$i]);
printf "file : %s (%d bytes)\n", $txtout[$i],
length($txtout[$i]);
if(length($curlout[$i]) == length($txtout[$i])) {
my $l = length($curlout[$i]);
for my $c (0 .. $l) {
my $o = substr($curlout[$i], $c, 1);
my $t = substr($txtout[$i], $c, 1);
if($o ne $t) {
print "-h col %d: %02x\n", $c, ord($o);
print "file col %d: %02x\n", $c, ord($t);
}
}
}
$error++;
}
}