function_test/Semantic_Analyser/xer/namedup1_SE.ttcn

   1 /******************************************************************************
   2  * Copyright (c) 2000-2014 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
   7  ******************************************************************************/
   8 module namedup1 {       //^In TTCN-3 module `namedup1'://
   9
  10 const integer A := 1; //^Previous definition with identifier `A' in higher scope unit is here//
  11
  12 function MyBehaviourA() //^In function definition//
  13 {
  14   var integer A := 1; //^error: Definition with identifier `A' is not unique in the scope hierarchy// \
  15   //^Previous definition with identifier `A' in higher scope unit is here//
  16
  17   while(A > 3) //^In while statement//
  18   {
  19   const boolean A := true; //^error: Definition with identifier `A' is not unique in the scope hierarchy//
  20
  21   }
  22 }
  23
  24 }