runtests.pl: drop unused ST_CLEARLOCKS status

This commit is contained in:
Viktor Szakats 2025-02-26 15:29:33 +01:00
parent b12b0a7478
commit b2eb7312d3
No known key found for this signature in database
GPG Key ID: B5ABD165E2AEF201

View File

@ -160,7 +160,6 @@ my $globalabort; # flag signalling program abort
# values for $singletest_state
use constant {
ST_INIT => 0,
ST_CLEARLOCKS => 1,
ST_INITED => 2,
ST_PREPROCESS => 3,
ST_RUN => 4,
@ -1848,21 +1847,6 @@ sub singletest {
# event expected that would otherwise trigger a new call.
return singletest(@_);
} elsif($singletest_state{$runnerid} == ST_CLEARLOCKS) {
my ($rid, $logs) = runnerar($runnerid);
if(!$rid) {
logmsg "ERROR: runner $runnerid seems to have died\n";
$singletest_state{$runnerid} = ST_INIT;
return (-1, 0);
}
logmsg $logs;
my $logdir = getrunnerlogdir($runnerid);
cleardir($logdir);
$singletest_state{$runnerid} = ST_INITED;
# Recursively call the state machine again because there is no
# event expected that would otherwise trigger a new call.
return singletest(@_);
} elsif($singletest_state{$runnerid} == ST_INITED) {
###################################################################
# Restore environment variables that were modified in a previous run.