1 /******************************************************************************
2 * Copyright (c) 2000-2016 Ericsson Telecom AB
3 * All rights reserved. This program and the accompanying materials
4 * are made available under the terms of the Eclipse Public License v1.0
5 * which accompanies this distribution, and is available at
6 * http://www.eclipse.org/legal/epl-v10.html
9 * Adrien Kirjak – initial implementation
12 ** @purpose 1:16.1.2, Ensure that predefined decvalue_unichar function works properly
13 ** @verdict pass accept, ttcn3verdict:pass
15 ***************************************************/
17 /* The following requirements are tested:
19 * this test focuses on the predefined functions decvalue_unichar (utf-32)*/
23 module Sem_160102_predefined_functions_074 {
25 type component GeneralComp {
29 testcase TC_Sem_160102_predefined_functions_074 () runs on GeneralComp {
33 var universal charstring v_enc := encvalue_unichar(123,"UTF-32"); //encode UTF-32
37 var integer v_test_dec;
38 var integer v_res:= decvalue_unichar(v_enc,v_test_dec,"UTF-32"); //decode (UTF-32)
41 setverdict(pass, "Decoded ", v_enc , " with result ", v_res);
43 setverdict(fail, "Unexpected decoding result: Decoded ", v_enc , " with result ", v_res);
50 execute(TC_Sem_160102_predefined_functions_074());