This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Cap the exit code of the bisecting script
authorVincent Pit <perl@profvince.com>
Fri, 23 Oct 2009 20:34:04 +0000 (22:34 +0200)
committerVincent Pit <perl@profvince.com>
Fri, 23 Oct 2009 20:34:04 +0000 (22:34 +0200)
Segfaults cause $? to be set to 139 on my machine, which stops the bisect
process.

pod/perlrepository.pod

index 2924b39..a72be28 100644 (file)
@@ -565,6 +565,7 @@ testcase:
   [ -x ./perl ] || exit 125
   ./perl -Ilib ~/testcase.pl
   ret=$?
+  [ $ret -gt 127 ] && ret=127
   git clean -dxf
   exit $ret