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:5.4.2, verify that parameters cannot be assigned more than once in assignment notation
13 ** @verdict pass reject
14 ***************************************************/
16 // The following requirement is tested:
17 // When using assignment notation, each formal parameter shall be assigned an actual
18 // parameter at most once.
20 module NegSem_050402_actual_parameters_105 {
22 type component GeneralComp {
25 function f_test (integer p_val1, charstring p_val2) {
26 if (match(p_val1 == 1 and p_val2 == "test") { setverdict(pass); }
27 else { setverdict(fail); }
30 testcase TC_NegSem_050402_actual_parameters_105() runs on GeneralComp {
31 f_test(p_val1 := 1, p_val2 := "test", p_val1 := 1);
35 execute(TC_NegSem_050402_actual_parameters_105());