RSL_Types: L3_INFO has TL16V type, not TLV (i.e. 16bit length)
diff --git a/library/RSL_Types.ttcn b/library/RSL_Types.ttcn
index 2b80fb2..1e3f22d 100644
--- a/library/RSL_Types.ttcn
+++ b/library/RSL_Types.ttcn
@@ -229,6 +229,16 @@
payload := pl
}
+ type record RSL_L16V {
+ uint16_t len,
+ octetstring payload
+ } with { variant (len) "LENGTHTO(payload)" }
+
+ template RSL_L16V ts_RSL_L16V(template octetstring pl) := {
+ len := 0,
+ payload := pl
+ }
+
type record RSL_IE_V {
uint8_t val
}
@@ -414,7 +424,7 @@
type union RSL_IE_Body {
RslChannelNr chan_nr,
RslLinkId link_id,
- RSL_LV l3_info,
+ RSL_L16V l3_info,
RSL_LV rlm_cause,
uint8_t release_mode,
RSL_IE_ActivationType act_type,
@@ -505,7 +515,7 @@
ies :={
t_RSL_IE(RSL_IE_Body:{chan_nr := chan_nr}),
t_RSL_IE(RSL_IE_Body:{link_id := link_id}),
- t_RSL_IE(RSL_IE_Body:{l3_info := ts_RSL_LV(l3_info)})
+ t_RSL_IE(RSL_IE_Body:{l3_info := ts_RSL_L16V(l3_info)})
}
}
@@ -516,7 +526,7 @@
ies :={
t_RSL_IE(RSL_IE_Body:{chan_nr := chan_nr}),
t_RSL_IE(RSL_IE_Body:{link_id := link_id}),
- t_RSL_IE(RSL_IE_Body:{l3_info := ts_RSL_LV(l3_info)})
+ t_RSL_IE(RSL_IE_Body:{l3_info := ts_RSL_L16V(l3_info)})
}
}
@@ -538,7 +548,7 @@
ies := {
t_RSL_IE(RSL_IE_Body:{chan_nr := chan_nr}),
t_RSL_IE(RSL_IE_Body:{link_id := link_id}),
- t_RSL_IE(RSL_IE_Body:{l3_info := ts_RSL_LV(l3_info)})
+ t_RSL_IE(RSL_IE_Body:{l3_info := ts_RSL_L16V(l3_info)})
}
}