aboutsummaryrefslogtreecommitdiff
path: root/t/03-pipeline.t
diff options
context:
space:
mode:
Diffstat (limited to 't/03-pipeline.t')
-rw-r--r--t/03-pipeline.t32
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)');