Sync with 5.4.1
[deliverable/titan.core.git] / regression_test / compileonly / openTypeNames / Open_type_use.ttcn
index 75f69379eee9451050a941eaf435531f98160c35..4761fc8c4caf52aff8fb3a10066cd1a36a4c4de5 100644 (file)
@@ -28,6 +28,11 @@ const MyMessage c_message_id3_lower := {
   content := { iNTEGER := 42 }\r
 }\r
 \r
+const MyMessage c_message_id4_lower := {\r
+  id := 4,\r
+  content := { nULL := NULL }\r
+}\r
+\r
 // Constants (uppercase first letter)\r
 const MyMessage c_message_id1_upper := {\r
   id := 1,\r
@@ -44,6 +49,11 @@ const MyMessage c_message_id3_upper := {
   content := { INTEGER := 42 }\r
 }\r
 \r
+const MyMessage c_message_id4_upper := {\r
+  id := 4,\r
+  content := { NULL := NULL }\r
+}\r
+\r
 // Templates (lowercase first letter)\r
 template MyMessage t_message_id1_lower := {\r
   id := 1,\r
@@ -60,6 +70,11 @@ template MyMessage t_message_id3_lower := {
   content := { iNTEGER := 42 }\r
 }\r
 \r
+template MyMessage t_message_id4_lower := {\r
+  id := 4,\r
+  content := { nULL := NULL }\r
+}\r
+\r
 // Templates (uppercase first letter)\r
 template MyMessage t_message_id1_upper := {\r
   id := 1,\r
@@ -76,14 +91,21 @@ template MyMessage t_message_id3_upper := {
   content := { INTEGER := 42 }\r
 }\r
 \r
+template MyMessage t_message_id4_upper := {\r
+  id := 4,\r
+  content := { NULL := NULL }\r
+}\r
+\r
 // Value list template (contains both lowercase and uppercase examples)\r
 template MyMessage t_message_value_list := (\r
   { id := 1, content := { mySeq := { field1 := 42, field2 := omit }} },\r
   { id := 2, content := { myEnum := first} },\r
   { id := 3, content := { iNTEGER := 42 } },\r
+  { id := 4, content := { nULL := NULL } },\r
   { id := 1, content := { MySeq := { field1 := -42, field2 := omit }} },\r
   { id := 2, content := { MyEnum := second} },\r
-  { id := 3, content := { INTEGER := -42 } }\r
+  { id := 3, content := { INTEGER := -42 } },\r
+  { id := 4, content := { NULL := NULL } }\r
 );\r
 \r
 // Dummy function to declare variables in\r
@@ -103,6 +125,11 @@ function f_dummy() {
     id := 3,\r
     content := { iNTEGER := 42 }\r
   }\r
+  \r
+  var MyMessage v_message_id4_lower := {\r
+    id := 4,\r
+    content := { nULL := NULL }\r
+  }\r
 \r
   // Variables (uppercase first letter)\r
   var MyMessage v_message_id1_upper := {\r
@@ -119,6 +146,11 @@ function f_dummy() {
     id := 3,\r
     content := { INTEGER := 42 }\r
   }\r
+  \r
+  var MyMessage v_message_id4_upper := {\r
+    id := 4,\r
+    content := { NULL := NULL }\r
+  }\r
 \r
   // Template variables (lowercase first letter)\r
   var template MyMessage vt_message_id1_lower := {\r
@@ -135,6 +167,11 @@ function f_dummy() {
     id := 3,\r
     content := { iNTEGER := 42 }\r
   }\r
+  \r
+  var template MyMessage vt_message_id4_lower := {\r
+    id := 4,\r
+    content := { nULL := NULL }\r
+  }\r
 \r
   // Template variables (uppercase first letter)\r
   var template MyMessage vt_message_id1_upper := {\r
@@ -152,14 +189,21 @@ function f_dummy() {
     content := { INTEGER := 42 }\r
   }\r
   \r
+  var template MyMessage vt_message_id4_upper := {\r
+    id := 4,\r
+    content := { NULL := NULL }\r
+  }\r
+  \r
   // Value list template variable (contains both lowercase and uppercase examples)\r
   var template MyMessage vt_message_value_list := (\r
     { id := 1, content := { mySeq := { field1 := 42, field2 := omit }} },\r
     { id := 2, content := { myEnum := first} },\r
     { id := 3, content := { iNTEGER := 42 } },\r
+    { id := 4, content := { nULL := NULL } },\r
     { id := 1, content := { MySeq := { field1 := -42, field2 := omit }} },\r
     { id := 2, content := { MyEnum := second} },\r
-    { id := 3, content := { INTEGER := -42 } }\r
+    { id := 3, content := { INTEGER := -42 } },\r
+    { id := 4, content := { NULL := NULL } }\r
   );\r
   \r
   // Referencing fields of open types (contains both lowercase and uppercase examples)\r
@@ -169,18 +213,24 @@ function f_dummy() {
   v_message_id2_upper.content.MyEnum := second;\r
   v_message_id3_lower.content.iNTEGER := 15;\r
   v_message_id3_upper.content.INTEGER := 15;\r
+  v_message_id4_lower.content.nULL := NULL;\r
+  v_message_id4_upper.content.NULL := NULL;\r
   vt_message_id1_lower.content.mySeq := { field1 := 41, field2 := omit };\r
   vt_message_id1_upper.content.MySeq := { field1 := 41, field2 := omit };\r
   vt_message_id2_lower.content.myEnum := second;\r
   vt_message_id2_upper.content.MyEnum := second;\r
   vt_message_id3_lower.content.iNTEGER := 15;\r
   vt_message_id3_upper.content.INTEGER := 15;\r
+  vt_message_id4_lower.content.nULL := NULL;\r
+  vt_message_id4_upper.content.NULL := NULL;\r
   if (c_message_id1_lower.content.mySeq == { field1 := 41, field2 := omit } and\r
       c_message_id1_upper.content.MySeq == { field1 := 41, field2 := omit } and\r
       c_message_id2_lower.content.myEnum == second and\r
       c_message_id2_upper.content.MyEnum == second and\r
       c_message_id3_lower.content.iNTEGER == 15 and\r
-      c_message_id3_upper.content.INTEGER == 15) {\r
+      c_message_id3_upper.content.INTEGER == 15 and\r
+      c_message_id4_lower.content.nULL == NULL and // NULL != NULL !?\r
+      c_message_id4_upper.content.NULL == NULL) {\r
     log("a");\r
   }\r
   if (v_message_id1_lower.content.mySeq == { field1 := 41, field2 := omit } and\r
@@ -188,7 +238,9 @@ function f_dummy() {
       v_message_id2_lower.content.myEnum == second and\r
       v_message_id2_upper.content.MyEnum == second and\r
       v_message_id3_lower.content.iNTEGER == 15 and\r
-      v_message_id3_upper.content.INTEGER == 15) {\r
+      v_message_id3_upper.content.INTEGER == 15 and\r
+      v_message_id4_lower.content.nULL == NULL and\r
+      v_message_id4_upper.content.NULL == NULL) {\r
     log("b");\r
   }\r
   if (match({ field1 := 41, field2 := omit }, t_message_id1_lower.content.mySeq) and\r
@@ -196,7 +248,9 @@ function f_dummy() {
       match(second, t_message_id2_lower.content.myEnum) and\r
       match(second, t_message_id2_lower.content.MyEnum) and\r
       match(15, t_message_id3_lower.content.iNTEGER) and\r
-      match(15, t_message_id3_lower.content.INTEGER)) {\r
+      match(15, t_message_id3_lower.content.INTEGER) and\r
+      match(NULL, t_message_id4_lower.content.nULL) and\r
+      match(NULL, t_message_id4_lower.content.NULL)) {\r
     log("c");\r
   }\r
   if (match({ field1 := 41, field2 := omit }, vt_message_id1_upper.content.mySeq) and\r
@@ -204,7 +258,9 @@ function f_dummy() {
       match(second, vt_message_id2_upper.content.myEnum) and\r
       match(second, vt_message_id2_upper.content.MyEnum) and\r
       match(15, vt_message_id3_upper.content.iNTEGER) and\r
-      match(15, vt_message_id3_upper.content.INTEGER)) {\r
+      match(15, vt_message_id3_upper.content.INTEGER) and\r
+      match(NULL, vt_message_id4_upper.content.nULL) and\r
+      match(NULL, vt_message_id4_upper.content.NULL)) {\r
     log("d");\r
   }\r
 }\r
This page took 0.025326 seconds and 5 git commands to generate.