TAO/tests/Bug_2844_Regression/Test.idl

   1
   2 #include "tao/OctetSeq.pidl"
   3 #include "tao/StringSeq.pidl"
   4
   5 /// Put the interfaces in a module, to avoid global namespace pollution
   6 module Test
   7 {
   8   exception Recursive_Type_In_Any_Test_Failed {};
   9   exception Demarshaling_From_Any_Failed {};
  10
  11   struct NestedRecursiveStruct5;
  12   typedef sequence<NestedRecursiveStruct5> NestedRecursiveStructSeq5;
  13   struct NestedRecursiveStruct5
  14   {
  15     long i;
  16     union MyUnion5 switch (short)
  17     {
  18       case 0:
  19         struct InnerStruct5
  20         {
  21           union Intern5 switch (short)
  22           {
  23             case 0:
  24               NestedRecursiveStructSeq5 recursive_structs5;
  25           } intbb5;
  26         } ins65;
  27       default:
  28         long i;
  29     } in5;
  30   };
  31
  32   /// Simple test interface.
  33   interface Hello
  34   {
  35     /// Return the any provided as the "in" argument.
  36     any get_any (in any the_any);
  37
  38     /// Shutdown the server ORB.
  39     oneway void shutdown ();
  40   };
  41 };