#!/opt/bin/perl @iclist=(ic1); @ic1=("tp1","tp2","tp3","tp4","tp5"); require "common.pl"; sub tp1{ $tp=tp1; &run("-c contrib/api all"); &run("-b contrib/api all"); &verify(grep(/cc.+ctest1/,@output)); } sub tp2 { $tp=tp2; &verify(grep(/`ptest1' is up to date./,@output)); } sub tp3 { $tp=tp3; &verify(grep(/`stest1' is up to date./,@output)); } sub tp4 { $tp=tp4; &verify(!grep(/make: Fatal error/,@output)); } sub tp5 { $tp=tp5; &verify(!grep(/Build Failed/,@output)); } require "$ENV{\"TET_ROOT\"}/lib/perl/tcm.pl";