aboutsummaryrefslogblamecommitdiffstats
path: root/lib/ic/test/ic_pragma_SUITE_data/uggly.idl
blob: 8ed3ac57ec13eb9880c22bf55be19beafd9e5495 (plain) (tree)











































































































































































































                                                                         
// %CopyrightBegin%
// 
// Copyright Ericsson AB 1998-2010. All Rights Reserved.
// 
// The contents of this file are subject to the Erlang Public License,
// Version 1.1, (the "License"); you may not use this file except in
// compliance with the License. You should have received a copy of the
// Erlang Public License along with this software. If not, it can be
// retrieved online at http://www.erlang.org/.
// 
// Software distributed under the License is distributed on an "AS IS"
// basis, WITHOUT WARRANTY OF ANY KIND, either express or implied. See
// the License for the specific language governing rights and limitations
// under the License.
// 
// %CopyrightEnd%
// Really uggly pragmas


struct S {

#pragma ID TDL1 "LOCAL:SomeLocalId:1"
#pragma ID TDL1 "LOCAL:SomeLocalId:2"

long a

#pragma ID TDL1 "LOCAL:SomeLocalId:3"
#pragma ID TDL1 "LOCAL:SomeLocalId:4"

;

#pragma ID TDL1 "LOCAL:SomeLocalId:5"
#pragma ID TDL1 "LOCAL:SomeLocalId:6"

long b

#pragma ID TDL1 "LOCAL:SomeLocalId:7"
#pragma ID TDL1 "LOCAL:SomeLocalId:8"

;


#pragma ID TDL1 "LOCAL:SomeLocalId:9"
#pragma ID TDL1 "LOCAL:SomeLocalId:10"

};


typedef long TDL1;


exception Exc1{

#pragma version Exc1 2.2
#pragma ID TDL2 "LOCAL:SomeLocalId:11"

};


typedef long TDL2;


exception Exc2 {

#pragma version Exc2 2.2
#pragma ID TDL3 "LOCAL:SomeLocalId:11"
  
  long a
    
#pragma ID TDL3 "LOCAL:SomeLocalId:12"
#pragma ID TDL3 "LOCAL:SomeLocalId:13"
    
    ;
  
#pragma ID TDL3 "LOCAL:SomeLocalId:14"
#pragma ID TDL3 "LOCAL:SomeLocalId:15"
  
  long b 

#pragma ID TDL3 "LOCAL:SomeLocalId:16"

    ;
  
#pragma ID TDL3 "LOCAL:SomeLocalId:17"
  
  
};

typedef long TDL3;

enum E { 
#pragma ID E "LOCAL:SomeLocalId:18"
  a
#pragma ID E "LOCAL:SomeLocalId:19"
  , 
#pragma ID E "LOCAL:SomeLocalId:20"
  b
#pragma ID E "LOCAL:SomeLocalId:21"
, 
#pragma ID E "LOCAL:SomeLocalId:22"
  c 
#pragma ID E "LOCAL:SomeLocalId:23"
};



union U switch (long) {

#pragma ID TDL4 "LOCAL:SomeLocalId:24"

 case 1:

#pragma ID TDL4 "LOCAL:SomeLocalId:25"

   long a

#pragma ID TDL4 "LOCAL:SomeLocalId:26"

;

#pragma ID TDL4 "LOCAL:SomeLocalId:27"

 case 2: 
   
#pragma ID TDL4 "LOCAL:SomeLocalId:28"

 case 3:

#pragma ID TDL4 "LOCAL:SomeLocalId:29"

long b

#pragma ID TDL4 "LOCAL:SomeLocalId:30"

;

#pragma ID TDL4 "LOCAL:SomeLocalId:31"

 default : 

#pragma ID TDL4 "LOCAL:SomeLocalId:32"

long c

#pragma ID TDL4 "LOCAL:SomeLocalId:33"

;

#pragma ID TDL4 "LOCAL:SomeLocalId:34"

};
 

typedef long TDL4;



module M {

  interface I {

    void fun1(
	     
#pragma version fun1 3.0
#pragma ID TDL5 "LOCAL:SomeLocalId:35" 
	     
	     in short b

#pragma ID TDL5 "LOCAL:SomeLocalId:36"
#pragma ID TDL5 "LOCAL:SomeLocalId:37" 

	     ,

#pragma ID TDL5 "LOCAL:SomeLocalId:38"
#pragma ID TDL5 "LOCAL:SomeLocalId:39" 

	     out short c

#pragma ID TDL5 "LOCAL:SomeLocalId:40" 
#pragma ID TDL5 "LOCAL:SomeLocalId:41" 

	      );


    typedef long TDL5;


    void fun2(

#pragma ID TDL6 "LOCAL:SomeLocalId:42"
#pragma ID TDL6 "LOCAL:SomeLocalId:43" 

	      );

    typedef long TDL6;
 
 };

  
  
};