/*****************************************************************
 ** @author   STF 451
 ** @version  0.0.1
 ** @purpose  1:21.3.2, Ensure that alive test components are allowed to start another function
 ** @verdict  pass accept, ttcn3verdict:pass
 *****************************************************************/
// Alive test component starts another function
module Sem_210302_Start_test_component_001 {

    type component GeneralComp { }
	function f() runs on GeneralComp {}
	function f2() runs on GeneralComp {}

    testcase TC_Sem_210302_Start_test_component_001() runs on GeneralComp system GeneralComp {
        var GeneralComp ptc;
		ptc:=GeneralComp.create alive;

		ptc.start(f());
		ptc.done;
		ptc.start(f2()); // allowed since ptc is alive

        setverdict(pass);
    }

    control {
        execute(TC_Sem_210302_Start_test_component_001());
    }
}