sergiotarxz
/
LPSCBuilder
1
0
Fork 1
Code Issues Pull Requests Releases Wiki Activity

changing the module name.

This commit is contained in:
sergiotarxz 2022-11-30 17:59:58 +01:00
parent 886a2b8b19
commit f56a78841f
1 changed files with 56 additions and 55 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
lib/LPSC/Builder/TestRunner.pm
View File

@ -1,4 +1,4 @@
package Owl::TestRunner v0.0.1; package LPSC::Builder::TestRunner;
use v5.30.0; use v5.30.0;
@ -16,8 +16,6 @@ use Capture::Tiny qw/tee_merged/;
use Term::ANSIColor qw/color/; use Term::ANSIColor qw/color/;
my $db_file = path($0)->parent->child('test.db'); my $db_file = path($0)->parent->child('test.db');
my %test_files_success_status;
tie %test_files_success_status, 'DB_File', $db_file;
my @errors; my @errors;
@ -46,7 +44,6 @@ my $ERROR_CODE_SOME_TEST_FAILED = 500;
} }
} }
sub _options { sub _options {
my $self = shift; my $self = shift;
if ( !defined $self->{options} ) { if ( !defined $self->{options} ) {
@ -86,6 +83,8 @@ sub run {
my ($merged) = tee_merged { my ($merged) = tee_merged {
$return_code = system $test_file; $return_code = system $test_file;
}; };
my %test_files_success_status;
tie %test_files_success_status, 'DB_File', $db_file;
$test_files_success_status{$test_file} = !$return_code; $test_files_success_status{$test_file} = !$return_code;
if ($return_code) { if ($return_code) {
push @errors, error() . "File $test_file\n" . $merged; push @errors, error() . "File $test_file\n" . $merged;
@ -123,6 +122,8 @@ sub _test_already_succeded {
my $self = shift; my $self = shift;
my $test = shift; my $test = shift;
my %test_files_success_status;
tie %test_files_success_status, 'DB_File', $db_file;
return $test_files_success_status{$test}; return $test_files_success_status{$test};
} }