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:22.2.1, Ensure that the IUT correctly handles message sending operations
13 ** @verdict pass reject
14 ***************************************************/
16 module NegSem_220201_SendOperation_001 {
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"}
60 type component GeneralComp {
61 port loopbackPort messagePort
64 testcase TC_NegSem_220201_SendOperation_001() runs on GeneralComp {
66 var MessageType v_testMessage;
68 template MessageType mw_matchingTemplate:=
71 field2 := "test string",
75 field6 := {a:=1,b:=2,c:=true},
76 field7 := {a:=1,b:=2,c:=true},
82 template MessageType mw_sendingTemplate:=
85 field2 := "test string",
89 field6 := {a:=*,b:=2,c:=true},
90 field7 := {a:=1,b:=*,c:=true},
96 connect(self:messagePort, self:messagePort);
98 messagePort.send(mw_sendingTemplate); //can only send specific values
101 [] messagePort.receive(mw_matchingTemplate) {
104 [] messagePort.receive {
111 execute(TC_NegSem_220201_SendOperation_001());