blob: 6d22f7001a1e1dd3d3816b25b5eafac1a8b2487b (
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
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
|
// $Id$
// ============================================================================
//
// = LIBRARY
// TAO/tests/IDL_Test
//
// = FILENAME
// reopened_modules.idl
//
// = DESCRIPTION
// This file contains examples of IDL code that has
// caused problems in the past for the TAO IDL
// compiler. This test is to make sure the problems
// stay fixed.
//
// = AUTHORS
// Jeff Parsons <parsons@cs.wustl.edu> and TAO users.
//
// ============================================================================
// These examples test the lookup abilities of the
// TAO IDL compiler, which must backtrack to find all
// the possibly reopened scopes.
module A
{
module B
{
interface x1 {};
};
};
module A
{
module C
{
interface x2
{
// 'A::B::' should be implicit
void op1 (in x1 obj);
// 'A::' should be implicit
void op2 (in B::x1 obj);
// Just for reference
void op3 (in A::B::x1 obj);
};
};
};
// Each occurrence of Party and Person should be
// recognized as being in the same scope as the
// previous occurrence(s).
module dot
{
interface Party;
interface Person
{
attribute Party someParty;
};
};
module dot
{
interface Person;
interface Party
{
attribute Person somePerson;
};
};
// Should be no problem in lookup of all the
// arguments in Operation.
module Outside
{
module Reopened
{
typedef short Tricky;
};
typedef long Tricky;
module Reopened
{
typedef float Newdef;
};
};
interface OpHolder
{
void Operation (in ::Outside::Tricky p1,
out ::Outside::Reopened::Tricky p2,
inout ::Outside::Reopened::Newdef p3);
};
// This particular combination used to cause IDL compiler
// to go into an infinite loop looking for return type to
// getInfo(). Partial solution got rid of infinite loop,
// but erroneously returned ::com from lookup.
module com {};
module com
{
module mr
{
typedef short info;
};
};
module com
{
interface IFace
{
com::mr::info getInfo ();
};
};
|