From a8125850ca24d22c0e5ba77fb8db754a46159e23 Mon Sep 17 00:00:00 2001
From: balaskoa <Jeno.Balasko@ericsson.com>
Date: Fri, 9 Oct 2020 12:15:30 +0200
Subject: [PATCH] unichar2x test split up in defaultAlternative
Signed-off-by: balaskoa <Jeno.Balasko@ericsson.com>
Change-Id: I38a3250c78c467b7b5e22b73dd3d39730e86d577
---
.../defaultAlternative.ttcn | 23 +++++++++++++++----
1 file changed, 19 insertions(+), 4 deletions(-)
diff --git a/regression_test/defaultAlternative/defaultAlternative.ttcn b/regression_test/defaultAlternative/defaultAlternative.ttcn
index 03cb5fb7e..9aa3992b0 100644
--- a/regression_test/defaultAlternative/defaultAlternative.ttcn
+++ b/regression_test/defaultAlternative/defaultAlternative.ttcn
@@ -843,21 +843,34 @@ testcase tc_predef_func_oct2char() runs on CT {
var charstring cs7 := oct2char(u8);
if (cs7 != " ") {
setverdict(fail, "cs7: ", cs7);
+ }else {
+ setverdict(pass);
}
- setverdict(pass);
}
-testcase tc_predef_func_unichar2x() runs on CT {
+testcase tc_predef_func_unichar2int() runs on CT {
var UniDefUstr u9 := "a";
var integer i8 := unichar2int(u9);
if (i8 != 97) {
setverdict(fail, "i8: ", i8);
+ } else {
+ setverdict(pass);
}
+}
+
+testcase tc_predef_func_unichar2char() runs on CT {
+ var UniDefUstr u9 := "a";
var charstring cs8 := unichar2char(u9);
if (cs8 != "a") {
setverdict(fail, "cs8: ", cs8);
+ } else {
+ setverdict(pass);
}
-
+}
+
+testcase tc_predef_func_unichar_istemplatekind() runs on CT {
+ var UniDefUstr u9 := "a";
+
var UniDefStr u10 := "AnyValue";
var template integer t := ?;
if (not istemplatekind(t, u10)) {
@@ -1133,7 +1146,9 @@ control {
execute(tc_predef_func_oct2str());
execute(tc_predef_func_oct2int());
execute(tc_predef_func_oct2char());
- execute(tc_predef_func_unichar2x());
+ execute(tc_predef_func_unichar2int());
+ execute(tc_predef_func_unichar2char());
+ execute(tc_predef_func_unichar_istemplatekind());
execute(tc_predef_func_templ());
execute(tc_encdec());
execute(tc_comp_and_port());
--
GitLab