epdg: Expect GSUP CancelLocationReq as consequence of DeleteBearerReq

Change-Id: Ibc37a9ef53315edab18f7b97a55cf504a40a4bf1
diff --git a/epdg/EPDG_Tests.ttcn b/epdg/EPDG_Tests.ttcn
index becf2e9..e5cdafd 100644
--- a/epdg/EPDG_Tests.ttcn
+++ b/epdg/EPDG_Tests.ttcn
@@ -504,6 +504,7 @@
 private function f_GTP2C_DeleteBearer_success() runs on EPDG_ConnHdlr {
 	var integer proc_trans_id := 3;
 	GTP2.send(ts_GTP2C_DeleteBearerReq(g_pars.teic_remote, proc_trans_id, g_pars.bearer.ebi, Access_changed_from_Non_3GPP_to_3GPP));
+	as_GSUP_CancelLocation_success();
 	as_GTP2C_DeleteBearer_success();
 }
 
@@ -585,6 +586,18 @@
 	setverdict(pass);
 }
 
+/* Expect CancelLocationReq */
+private altstep as_GSUP_CancelLocation_success() runs on EPDG_ConnHdlr {
+	var GSUP_PDU rx_gsup;
+
+	[] GSUP.receive(tr_GSUP_CL_REQ(g_pars.imsi)) -> value rx_gsup {
+		GSUP.send(ts_GSUP_CL_RES(g_pars.imsi));
+	}
+	[] GSUP.receive(GSUP_PDU:?) -> value rx_gsup {
+		Misc_Helpers.f_shutdown(__BFILE__, __LINE__, fail, log2str("Unexpected GSUP msg rx: ", rx_gsup));
+	}
+}
+
 private function f_initial_attach() runs on EPDG_ConnHdlr {
 	f_GSUP_AI_success();
 	f_GSUP_LU_success();