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:B.1.1, Ensure that the IUT correctly handles template matching of specific values
13 ** @verdict pass accept, ttcn3verdict:pass
14 ***************************************************/
16 module Sem_B0101_matching_specific_value_005 {
18 type enumerated EnumeratedType {e_black, e_white};
20 type record RecordType {
32 type record length (1..2) of integer IntegerList;
34 type set length (1..2) of integer IntegerUList;
36 type union UnionType {
42 type record MessageType {
47 EnumeratedType field5,
55 type port loopbackPort message {
57 } with {extension "internal"}
59 type component GeneralComp {
60 port loopbackPort messagePort
63 testcase TC_Sem_B0101_matching_specific_value_005() runs on GeneralComp {
65 var MessageType v_testMessage;
67 template MessageType mw_matchingTemplate:=
70 field2 := "test string",
72 field4 := {1,2,3,5}, //mismatching value
74 field6 := {a:=1,b:=2,c:=true},
75 field7 := {a:=1,b:=2,c:=true},
83 field2 := "test string",
87 field6 := {a:=1,b:=2,c:=true},
88 field7 := {a:=1,b:=2,c:=true},
94 connect(self:messagePort, self:messagePort);
96 messagePort.send(v_testMessage);
99 [] messagePort.receive(mw_matchingTemplate) {
102 [] messagePort.receive {
109 execute(TC_Sem_B0101_matching_specific_value_005());