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:10, Constant used within invoke function with return
13 ** @verdict pass accept, ttcn3verdict:pass
14 ***************************************************/
15 module Sem_10_Constants_004 {
17 type component GeneralComp {
20 function f_Sem_10_Constants_004(integer p_int) runs on GeneralComp return integer{
21 const integer c_i := 2;
32 testcase TC_Sem_10_Constants_004() runs on GeneralComp {
33 const integer c_int := 2;
34 if (f_Sem_10_Constants_004(0)==c_int)
44 execute(TC_Sem_10_Constants_004());