diff options
Diffstat (limited to 't/03-pipeline.t')
-rw-r--r-- | t/03-pipeline.t | 32 |
1 files changed, 25 insertions, 7 deletions
diff --git a/t/03-pipeline.t b/t/03-pipeline.t index 0095596..85b769c 100644 --- a/t/03-pipeline.t +++ b/t/03-pipeline.t @@ -21,15 +21,33 @@ WebCoso::Driver->run(); my @resources=WebCoso::Config->get_all_resources(); -my @calls1=WebCoso::Step::Step1->get_calls(); -is(scalar @calls1,1,"1 chiamata a Step1"); +my @calls1=WebCoso::Pipeline::Test->_steps()->[0]->get_calls(); +is(scalar @calls1,2,"2 chiamata a Step1"); is($calls1[0]->{resource}, $resources[0], - 'risorsa giusta passata a Step1'); - -my @calls2=WebCoso::Step::Step2->get_calls(); -is(scalar @calls2,1,"1 chiamata a Step2"); + 'risorsa giusta passata a Step1(1)'); +is($calls1[1]->{resource}, + $resources[0], + 'risorsa giusta passata a Step1(2)'); +is($calls1[0]->{stage}, + 'meta', + 'stage1==meta (step1)'); +is($calls1[1]->{stage}, + 'gen', + 'stage2==gen (step1)'); + +my @calls2=WebCoso::Pipeline::Test->_steps()->[1]->get_calls(); +is(scalar @calls2,2,"2 chiamata a Step2"); is($calls2[0]->{resource}, $calls1[0]->{out_res}, - 'risorsa giusta passata a Step2'); + 'risorsa giusta passata a Step2(1)'); +is($calls2[1]->{resource}, + $calls1[1]->{out_res}, + 'risorsa giusta passata a Step2(2)'); +is($calls2[0]->{stage}, + 'meta', + 'stage1==meta (step2)'); +is($calls2[1]->{stage}, + 'gen', + 'stage2==gen (step2)'); |