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:6.1.2.2, Assign values to list of types restricted hexstring.
13 ** @verdict pass accept, ttcn3verdict:pass
14 ***************************************************/
15 module Sem_06010202_ListOfTypes_002 {
16 type hexstring HexStrings1 ('FE80'H, '01'H );
17 type hexstring HexStrings2 ('00'H, '7F'H, 'B8'H, 'A0'H);
18 type hexstring HexStrings_1_2 (HexStrings1, HexStrings2);
20 type component GeneralComp {}
22 testcase TC_Sem_06010202_ListOfTypes_002() runs on GeneralComp {
23 var HexStrings_1_2 v_b;
24 v_b := 'FE80'H; //FE80 value is defined by the type HexStrings1
25 v_b := '7F'H; //7F value is defined by the type HexStrings2
30 execute(TC_Sem_06010202_ListOfTypes_002());