Home | History | Annotate | Download | only in contrib

Lines Matching refs:currtest

111 	my($currgroup, $currtest, $lastrun);
183 						undef $currtest;
190 					undef $currtest;
206 				$currtest = {};
220 			undef $currtest;
223 			# If the currtest already has a name, that means we've already seen
225 			# haven't seen results for currtest yet, that means currtest just
228 			undef $currtest if $currtest->{name};
280 				$currtest = $testindex{$test};
281 				if(ispass($currtest->{result})) {
282 					$currtest->{result} = $result;
283 					$currtest->{detail} = "$phase phase";
284 					$currtest->{detail} .= "; $failwhy" if $failwhy;
289 				$currtest ||= $testindex{$test} || {};
291 				$currtest->{name} = basename($test);
293 					$currtest->{fullname} = ($currgroup->{name} || dirname($test)) . "/$currtest->{name}";
296 				$currtest->{name} =~ s/^\s*\Q$grpname\E\s*//;
297 				$currtest->{name} =~ s/^: // if $is_gdb;
305 				if(!$currtest->{name}) {
306 					$currtest->{name} = $grpname;
311 				$currtest->{result} = $result;
313 					$currtest->{detail} = "$phase phase; $failwhy" if $phase;
315 					$currtest->{detail} = "$phase phase";
317 					$currtest->{detail} = $failwhy;
321 				push @{$currgroup->{test}}, $currtest;
322 				$testindex{$test} = $currtest;
347 			undef $currtest;
356 				$currtest->{result} = "TIMEDOUT";
370 			if($currtest) {
371 			$currtest->{diagnostics} ||= [];
372 				$dobj = $currtest->{diagnostics};