fixed self-ref check to no longer display errors for omit values (bug 498430)
authorBotond Baranyi <botond.baranyi@ericsson.com>
Mon, 25 Jul 2016 13:06:19 +0000 (15:06 +0200)
committerBotond Baranyi <botond.baranyi@ericsson.com>
Mon, 25 Jul 2016 13:06:19 +0000 (15:06 +0200)
Change-Id: I4a6a3160459761773aeb67aef2dcc1d499eaffd1
Signed-off-by: Botond Baranyi <botond.baranyi@ericsson.com>
compiler2/Value.cc
regression_test/boolOper/TboolOper.ttcn

index e6cf738b27d5264e879c4869842a69aa9c9f5f7b..9a0c0c0a4f2828f3b63718928400dc8d0174dfcc 100644 (file)
@@ -10107,7 +10107,7 @@ error:
       }
     }
     return gov->chk_this_value(v, lhs, Type::EXPECTED_DYNAMIC_VALUE,
-      INCOMPLETE_NOT_ALLOWED, OMIT_NOT_ALLOWED, NO_SUB_CHK, NOT_IMPLICIT_OMIT,
+      INCOMPLETE_NOT_ALLOWED, OMIT_ALLOWED, NO_SUB_CHK, NOT_IMPLICIT_OMIT,
       is_str_elem);
   }
 
index 61e2f50644321529ce8f53b74c8a05eb6f362d6f..515ffd2482149601986904f3d9980d91a93dccdc 100644 (file)
@@ -366,6 +366,18 @@ testcase boolShortCircuit() runs on boolOper_comptype {
   setverdict(pass);
 }
 
+type record MyRecord {
+  integer a optional
+}
+
+// comparing an optional record field to 'omit' in a boolean variable assignment (bug 498430)
+testcase boolCompEqOmit() runs on boolOper_comptype {
+  var MyRecord myRecord := { a := omit };
+  var boolean b := myRecord.a == omit;
+  if (b == true) { setverdict(pass); }
+  else { setverdict(fail); }
+}
+
 control {
   const boolean cl_1:=true;
   var boolean vl_1;
@@ -381,6 +393,7 @@ control {
   execute(boolSubtypes());
   execute(boolIsvalue());
   execute(boolShortCircuit());
+  execute(boolCompEqOmit());
 }
 
 }
This page took 0.029349 seconds and 5 git commands to generate.