Port functions/shell test to Solaris 10

* tests/scripts/functions/shell: Port exit-status calculation
to Solaris 10 with Perl 5.8.4.
This commit is contained in:
Paul Eggert 2019-10-08 15:28:10 -07:00 committed by Paul Smith
parent 33bda40086
commit 1cf3932a39

View file

@ -69,7 +69,12 @@ all: ; @echo $(.SHELLSTATUS)
}
waitpid($pid, 0);
# .SHELLSTATUS for a signal gives 128 + the signal number
my $ret = $? + 128;
my $ret = $?;
if ($ret > 255) {
# Solaris 10 perl 5.8.4 puts signal number + 128 into the high 8 bits.
$ret >>= 8;
}
$ret |= 128;
run_make_test('.PHONY: all
$(shell kill -2 $$$$)