L1CTL_Types: Add support for L1CTL_DATA_TBF_{REQ,CONF}

Those two L1CTL primitives are extensions of L1CTL for GPRS operation
diff --git a/library/L1CTL_PortType.ttcn b/library/L1CTL_PortType.ttcn
index 7a9ee3e..84593cf 100644
--- a/library/L1CTL_PortType.ttcn
+++ b/library/L1CTL_PortType.ttcn
@@ -63,6 +63,18 @@
 		return rr.payload.imm_ass;
 	}
 
+	function f_L1CTL_TBF_CFG(L1CTL_PT pt, boolean is_uplink, TfiUsfArr tfi_usf) {
+		timer T := 2.0;
+		T.start;
+		pt.send(t_L1CTL_TBF_CFG_REQ(is_uplink, tfi_usf));
+		alt {
+			[] pt.receive(t_L1CTL_TBF_CFG_CONF(is_uplink)) {}
+			[] pt.receive { repeat };
+			[] T.timeout { setverdict(fail, "Timeout waiting for TBF-CFG.conf") };
+		}
+		T.stop;
+	}
+
 	/* Send DM_EST_REQ from parameters derived from IMM ASS */
 	function f_L1CTL_DM_EST_REQ_IA(L1CTL_PT pt, ImmediateAssignment imm_ass) {
 		pt.send(t_L1CTL_DM_EST_REQ({ false, imm_ass.chan_desc.arfcn }, imm_ass.chan_desc.chan_nr, imm_ass.chan_desc.tsc));