TAO/tests/IDL_Test/included.idl

   1
   2 //=============================================================================
   3 /**
   4  *  @file    included.idl
   5  *
   6  *  This file contains examples of IDL code that has
   7  *  caused problems in the past for the TAO IDL
   8  *  compiler. This test is to make sure the problems
   9  *  stay fixed.
  10  *
  11  *
  12  *  @author Jeff Parsons <parsons@cs.wustl.edu> and TAO users.
  13  */
  14 //=============================================================================
  15
  16 #ifndef IDL_TEST_INCLUDED_IDL
  17 #define IDL_TEST_INCLUDED_IDL
  18
  19 // Included in IDL file 'including.idl'.
  20 module Aok
  21 {
  22   typedef sequence<double> Seq1Type;
  23   typedef long Me;
  24 };
  25
  26 enum Agog
  27 {
  28   Agog1,
  29   Agog2,
  30   Agog3
  31 };
  32
  33 // This valuetype is used in a sequence in the including file,
  34 // and tests that Value_VarOut_T.h is included early enough.
  35 module VT_Def
  36 {
  37   valuetype VT {};
  38 };
  39
  40 // A valuetype in valuetype.idl inherits from this one.
  41 // In the original bug, the name for this valuetype's
  42 // anonymous sequence member was not created in the derived
  43 // valuetype's AST, so when the arglist for the derived
  44 // valuetype's constructor w/arglist was generated, the member
  45 // below was named 'sequence', which of course didn't compile.
  46 valuetype IncludedBase
  47 {
  48   public sequence<long> DeprecatedMember;
  49 };
  50
  51 // References to MyStructA in including.idl get the
  52 // forward declaration from lookup, and we were
  53 // getting empty typename generation in various places,
  54 // before overriding the visit methods for forward
  55 // declared structs and unions in the relevant visitors.
  56 module A
  57 {
  58   struct MyStructA;
  59   typedef sequence<MyStructA> MySeqA;
  60
  61   struct MyStructA
  62   {
  63    string str;
  64    MySeqA recursive_member;
  65   };
  66 };
  67
  68 // A different enum with the same enum values is
  69 // defined in a derived interface in the same scope
  70 // in another IDL file that includes this one. The
  71 // construction is legal and should be accepted.
  72 module RootModule
  73 {
  74   module SUBMODULE1
  75   {
  76     interface ParentIF
  77     {
  78       enum Mode
  79       {
  80         NORMAL,
  81         FAULTY,
  82         UNKNOWN
  83       };
  84     };
  85   };
  86 };
  87
  88 interface AAA
  89 {
  90   typedef long my_long_type;
  91 };
  92
  93 #endif /* IDL_TEST_INCLUDED_IDL */