summaryrefslogtreecommitdiff
path: root/TAO/tests/DynAny_Test/da_tests.idl
blob: 233fc00ea76b6fe8327e13ac6dbf39143afe62ea (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
/* -*- C++ -*- */
//
// $Id$

#include <orb.idl>

module DynAnyTests
{
  struct enclosed_struct
  {
    float f;
    short s;
  };

  struct test_struct
  {
    char c;
    CORBA::ShortSeq ss;
    enclosed_struct es;
  };

  typedef sequence<string<8> > test_seq;
  typedef sequence<short> SeqShort;
  typedef sequence<boolean> SeqBoolean;

  const unsigned long DIM = 2;
  typedef long test_array [DIM];

  enum test_enum
  {
    TE_ZEROTH,
    TE_FIRST,
    TE_SECOND,
    TE_THIRD,
    TE_FOURTH
  };

  typedef test_enum Enumerated_a;
  typedef test_enum Enumerated_b;
  typedef test_enum Enumerated_c;

  struct StructTypedefEnum {
    Enumerated_a    field_1;
    Enumerated_b    field_2;
    Enumerated_c    field_3;
  };

  union test_union switch (test_enum)
  {
    case TE_SECOND: CORBA::TypeCode tc;
    case TE_FOURTH: test_enum te;
    default: short s;
    case TE_THIRD: string str;
    case TE_ZEROTH: octet o;
  };

  typedef test_struct test_struct_alias;
  typedef test_union test_union_alias;

  union test_implicit_def switch (boolean) {
    case TRUE :
       test_enum tenum;
  } ;

  union test_union_no_active_member switch (long) {
        case 1: long    field_long;
        case 2: string  field_string;
  };

  struct test_struct_with_long_double
  {
    long double field_longdouble;
  };


};