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:9.1, Verify that a component ports can be mapped to TSI ports
13 ** @verdict pass accept, ttcn3verdict:pass
14 ***************************************************/
16 /* NOTE: figure 6(d): Ensure that component ports can be mapped to a TSI ports */
18 module Sem_0901_Communication_ports_011 {
20 type port MyPort message {
22 } with {extension "internal"}
24 type component GeneralComp
34 function checkMapped() runs on MyComp
36 if(p1.checkstate("Mapped") and p2.checkstate("Mapped")) {
37 setverdict(pass,"Mapped");
39 setverdict(fail,"Mapped");
43 testcase TC_Sem_0901_Communication_ports_011() runs on MyComp system GeneralComp {
45 map(self:p1, system:p1);
46 map(self:p2, system:p2);
52 execute(TC_Sem_0901_Communication_ports_011());