Suyu/mbedtls
1
0
Fork 0
mirror of https://git.suyu.dev/suyu/mbedtls.git synced 2025-12-21 21:36:21 +01:00
Code Issues Projects Releases Packages Wiki Activity Actions

Make some perl scripts usable with git bisect run

Browse source 
For that they need to return between 0 and 124 on error, while die returns
255, causing bisect-run to abort.
This commit is contained in:
Manuel Pégourié-Gonnard 2017-07-12 12:15:24 +02:00
parent 66a36b03c6
commit a7c4c8a46c
5 changed files with 12 additions and 6 deletions
Download patch file Download diff file Expand all files Collapse all files

3
tests/scripts/key-exchanges.pl
View file

@ -33,7 +33,8 @@ my @kexes = split( /\s+/, `sed -n -e '$sed_cmd' $config_h` );
system( "cp $config_h $config_h.bak" ) and die;
sub abort {
system( "mv $config_h.bak $config_h" ) and warn "$config_h not restored\n";
die $_[0];
warn $_[0];
exit 1;
}
for my $kex (@kexes) {