RTP_Emulation: Add f_rtpem_stats_compare() to match a pair of stats

Change-Id: I1682bc16a05f096976b7e68b6115850fc152f7aa
diff --git a/library/RTP_Emulation.ttcn b/library/RTP_Emulation.ttcn
index 90a769c..0bf5cbd 100644
--- a/library/RTP_Emulation.ttcn
+++ b/library/RTP_Emulation.ttcn
@@ -188,6 +188,18 @@
 	return stats;
 }
 
+function f_rtpem_stats_compare(RtpemStats a, RtpemStats b) return boolean {
+	log("stats A: ", a);
+	log("stats B: ", b);
+
+	if (a.num_pkts_tx != b.num_pkts_rx or
+	    a.num_pkts_rx != b.num_pkts_tx or
+	    a.bytes_payload_tx != b.bytes_payload_rx or
+	    a.bytes_payload_rx != b.bytes_payload_tx) {
+		return false;
+	}
+	return true;
+}
 
 
 template PDU_RTP ts_RTP(BIT32_BO_LAST ssrc, INT7b pt, LIN2_BO_LAST seq, uint32_t ts,