BTS_Tests: introduce TC_meas_res_speech_tch{f,h}

The new test cases are similar to TC_meas_res_sign_tch{f,h}, with
the only difference that TCH channels are activated in speech mode.

Change-Id: I8455e3749ab72a463c00dd0ed28b69ef6f389aa1
Related: OS#4799
diff --git a/bts/BTS_Tests.ttcn b/bts/BTS_Tests.ttcn
index f010c1b..6fc396d 100644
--- a/bts/BTS_Tests.ttcn
+++ b/bts/BTS_Tests.ttcn
@@ -2975,6 +2975,35 @@
 	Misc_Helpers.f_shutdown(__BFILE__, __LINE__);
 }
 
+testcase TC_meas_res_speech_tchf() runs on test_CT {
+	var template RSL_IE_ChannelMode ch_mode;
+	var ConnHdlr vc_conn;
+	var ConnHdlrPars pars;
+	f_init();
+	ch_mode := ts_RSL_ChanMode(RSL_CHRT_TCH_F, RSL_CMOD_SP_GSM1);
+	for (var integer tn := 1; tn <= 1; tn := tn + 1) {
+		pars := valueof(t_Pars(t_RslChanNr_Bm(tn), ch_mode));
+		vc_conn := f_start_handler(refers(f_TC_meas_res_periodic), pars,
+					   pcu_comp := false, trxc_comp := true);
+		vc_conn.done;
+	}
+	Misc_Helpers.f_shutdown(__BFILE__, __LINE__);
+}
+testcase TC_meas_res_speech_tchh() runs on test_CT {
+	var template RSL_IE_ChannelMode ch_mode;
+	var ConnHdlr vc_conn;
+	var ConnHdlrPars pars;
+	f_init();
+	ch_mode := ts_RSL_ChanMode(RSL_CHRT_TCH_H, RSL_CMOD_SP_GSM1);
+	for (var integer ss := 0; ss <= 1; ss := ss + 1) {
+		pars := valueof(t_Pars(t_RslChanNr_Lm(5, ss), ch_mode));
+		vc_conn := f_start_handler(refers(f_TC_meas_res_periodic), pars,
+					   pcu_comp := false, trxc_comp := true);
+		vc_conn.done;
+	}
+	Misc_Helpers.f_shutdown(__BFILE__, __LINE__);
+}
+
 testcase TC_meas_res_sign_tchf() runs on test_CT {
 	var ConnHdlr vc_conn;
 	var ConnHdlrPars pars;
@@ -7001,6 +7030,8 @@
 	execute( TC_rach_load_idle_thresh0() );
 	execute( TC_rach_load_idle_below_thresh() );
 	execute( TC_rach_load_count() );
+	execute( TC_meas_res_speech_tchf() );
+	execute( TC_meas_res_speech_tchh() );
 	execute( TC_meas_res_sign_tchf() );
 	execute( TC_meas_res_sign_tchh() );
 	execute( TC_meas_res_sign_sdcch4() );