r2corba 1.4.1-x86-mingw32 → 1.5.1-x86-mingw32
Sign up to get free protection for your applications and to get access to all the features.
- checksums.yaml +7 -7
- data/CHANGES +173 -159
- data/LICENSE +59 -59
- data/README +62 -62
- data/THANKS +54 -52
- data/bin/r2corba +1 -1
- data/bin/ridlc +1 -1
- data/bin/rins +1 -1
- data/lib/corba.rb +16 -16
- data/lib/corba/cbase/IORMap.rb +33 -33
- data/lib/corba/cbase/ORB.rb +237 -231
- data/lib/corba/cbase/Request.rb +133 -133
- data/lib/corba/cbase/Streams.rb +129 -129
- data/lib/corba/cbase/Stub.rb +19 -19
- data/lib/corba/cbase/Typecode.rb +441 -441
- data/lib/corba/cbase/Values.rb +129 -129
- data/lib/corba/cbase/exception.rb +66 -66
- data/lib/corba/cbase/poa.rb +23 -23
- data/lib/corba/cbase/policies.rb +77 -77
- data/lib/corba/cbase/post_require.rb +13 -13
- data/lib/corba/cbase/require.rb +28 -28
- data/lib/corba/cmds/base.rb +85 -85
- data/lib/corba/cmds/test.rb +30 -30
- data/lib/corba/common/Any.rb +91 -91
- data/lib/corba/common/IDL.rb +104 -104
- data/lib/corba/common/ORB.rb +368 -368
- data/lib/corba/common/Object.rb +208 -208
- data/lib/corba/common/Request.rb +19 -19
- data/lib/corba/common/Servant.rb +108 -108
- data/lib/corba/common/Struct.rb +21 -21
- data/lib/corba/common/Stub.rb +79 -79
- data/lib/corba/common/Typecode.rb +1121 -1121
- data/lib/corba/common/Union.rb +55 -55
- data/lib/corba/common/Values.rb +91 -91
- data/lib/corba/common/const.rb +22 -22
- data/lib/corba/common/exception.rb +68 -68
- data/lib/corba/common/require.rb +27 -27
- data/lib/corba/common/version.rb +22 -22
- data/lib/corba/idl/IDL.rb +21 -21
- data/lib/corba/idl/IORTable.pidl +62 -62
- data/lib/corba/idl/TAO_Ext.pidl +46 -46
- data/lib/corba/idl/require.rb +20 -20
- data/lib/corba/jbase/Any.rb +273 -273
- data/lib/corba/jbase/IORMap.rb +35 -35
- data/lib/corba/jbase/ORB.rb +112 -99
- data/lib/corba/jbase/Object.rb +99 -98
- data/lib/corba/jbase/Request.rb +225 -225
- data/lib/corba/jbase/Servant.rb +247 -246
- data/lib/corba/jbase/ServerRequest.rb +127 -127
- data/lib/corba/jbase/Streams.rb +670 -670
- data/lib/corba/jbase/Stub.rb +38 -38
- data/lib/corba/jbase/Typecode.rb +520 -520
- data/lib/corba/jbase/Values.rb +173 -173
- data/lib/corba/jbase/exception.rb +106 -106
- data/lib/corba/jbase/poa.rb +228 -228
- data/lib/corba/jbase/policies.rb +299 -299
- data/lib/corba/jbase/post_require.rb +14 -14
- data/lib/corba/jbase/require.rb +89 -86
- data/lib/corba/naming.rb +14 -14
- data/lib/corba/naming_service.rb +15 -15
- data/lib/corba/poa.rb +15 -15
- data/lib/corba/policies.rb +18 -18
- data/lib/corba/require.rb +17 -17
- data/lib/corba/svcs/ins/cos_naming.rb +426 -426
- data/lib/corba/svcs/ins/ins.rb +526 -526
- data/lib/corba/svcs/ins/naming_service.rb +119 -119
- data/lib/ridlbe/ruby/config.rb +336 -336
- data/lib/ridlbe/ruby/orb.pidlc +0 -0
- data/lib/ridlbe/ruby/require.rb +16 -16
- data/lib/ridlbe/ruby/walker.rb +1582 -1582
- data/mkrf_conf_bingem.rb +151 -101
- data/rakelib/bin.rake +80 -80
- data/rakelib/bin.rb +145 -145
- data/rakelib/build.rake +87 -87
- data/rakelib/config.rake +51 -51
- data/rakelib/config.rb +543 -449
- data/rakelib/ext.rake +242 -242
- data/rakelib/ext.rb +316 -308
- data/rakelib/ext_r2tao.rb +235 -232
- data/rakelib/gem.rake +235 -211
- data/rakelib/gem.rb +145 -145
- data/rakelib/package.rake +26 -26
- data/rakelib/test.rake +23 -23
- data/test/BiDirectional/Test.idl +34 -34
- data/test/BiDirectional/client.rb +131 -131
- data/test/BiDirectional/run_test.rb +68 -68
- data/test/BiDirectional/server.ior +1 -1
- data/test/BiDirectional/server.rb +169 -169
- data/test/CORBA_Services/Naming/BindingIterator/Test.idl +27 -27
- data/test/CORBA_Services/Naming/BindingIterator/client.rb +121 -121
- data/test/CORBA_Services/Naming/BindingIterator/ins.ior +1 -1
- data/test/CORBA_Services/Naming/BindingIterator/run_test.rb +82 -82
- data/test/CORBA_Services/Naming/BindingIterator/server.rb +109 -109
- data/test/CORBA_Services/Naming/Corbaname/Test.idl +27 -27
- data/test/CORBA_Services/Naming/Corbaname/client.rb +85 -85
- data/test/CORBA_Services/Naming/Corbaname/ins.ior +1 -1
- data/test/CORBA_Services/Naming/Corbaname/run_test.rb +88 -88
- data/test/CORBA_Services/Naming/Corbaname/server.rb +135 -135
- data/test/CORBA_Services/Naming/Simple/Test.idl +27 -27
- data/test/CORBA_Services/Naming/Simple/client.rb +84 -84
- data/test/CORBA_Services/Naming/Simple/ins.ior +1 -1
- data/test/CORBA_Services/Naming/Simple/run_test.rb +82 -82
- data/test/CORBA_Services/Naming/Simple/server.rb +109 -109
- data/test/Collocation/Diamond.idl +39 -39
- data/test/Collocation/run_test.rb +52 -52
- data/test/Collocation/test.rb +195 -195
- data/test/Connect_Timeout/Test.idl +27 -27
- data/test/Connect_Timeout/client.rb +111 -111
- data/test/Connect_Timeout/run_test.rb +52 -52
- data/test/DII/Test.idl +27 -27
- data/test/DII/client.rb +115 -115
- data/test/DII/run_test.rb +69 -69
- data/test/DII/server.ior +1 -1
- data/test/DII/server.rb +95 -95
- data/test/DSI/Test.idl +27 -27
- data/test/DSI/client.rb +66 -66
- data/test/DSI/run_test.rb +69 -69
- data/test/DSI/server.ior +1 -1
- data/test/DSI/server.rb +106 -106
- data/test/Exceptions/Test.idl +48 -48
- data/test/Exceptions/client.rb +117 -117
- data/test/Exceptions/run_test.rb +69 -69
- data/test/Exceptions/server.ior +1 -1
- data/test/Exceptions/server.rb +131 -131
- data/test/Hello/Test.idl +27 -27
- data/test/Hello/client.rb +78 -78
- data/test/Hello/run_test.rb +71 -71
- data/test/Hello/server.rb +95 -95
- data/test/IDL_Test/Test.idl +113 -113
- data/test/IDL_Test/Test_inc.idl +17 -17
- data/test/IDL_Test/client.rb +102 -102
- data/test/IDL_Test/run_test.rb +69 -69
- data/test/IDL_Test/server.ior +1 -1
- data/test/IDL_Test/server.rb +99 -99
- data/test/IORMap/Test.idl +27 -27
- data/test/IORMap/client.rb +73 -73
- data/test/IORMap/run_test.rb +69 -69
- data/test/IORMap/server.ior +1 -1
- data/test/IORMap/server.rb +114 -114
- data/test/IORTable/Test.idl +27 -27
- data/test/IORTable/client.rb +75 -75
- data/test/IORTable/run_test.rb +69 -69
- data/test/IORTable/server.ior +1 -1
- data/test/IORTable/server.rb +130 -130
- data/test/Implicit_Conversion/Test.idl +31 -31
- data/test/Implicit_Conversion/client.rb +110 -110
- data/test/Implicit_Conversion/run_test.rb +69 -69
- data/test/Implicit_Conversion/server.ior +1 -1
- data/test/Implicit_Conversion/server.rb +99 -99
- data/test/Multi_Threading/Multiple_ORB/Test.idl +27 -27
- data/test/Multi_Threading/Multiple_ORB/client.rb +82 -82
- data/test/Multi_Threading/Multiple_ORB/run_test.rb +71 -71
- data/test/Multi_Threading/Multiple_ORB/server.rb +108 -108
- data/test/Multi_Threading/Multiple_ORB/server0.ior +1 -1
- data/test/Multi_Threading/Multiple_ORB/server1.ior +1 -1
- data/test/Multi_Threading/Simple/Test.idl +27 -27
- data/test/Multi_Threading/Simple/client.rb +93 -88
- data/test/Multi_Threading/Simple/run_test.rb +69 -69
- data/test/Multi_Threading/Simple/server.ior +1 -1
- data/test/Multi_Threading/Simple/server.rb +117 -117
- data/test/Multi_Threading/Threads/Test.idl +31 -31
- data/test/Multi_Threading/Threads/client.rb +80 -80
- data/test/Multi_Threading/Threads/run_test.rb +76 -76
- data/test/Multi_Threading/Threads/server.ior +1 -1
- data/test/Multi_Threading/Threads/server.rb +119 -119
- data/test/Multi_Threading/Threads/watchdog.ior +1 -1
- data/test/Multi_Threading/Threads/watchdog.rb +87 -87
- data/test/Multiple_Servant_Interfaces/Test.idl +34 -34
- data/test/Multiple_Servant_Interfaces/client.rb +70 -70
- data/test/Multiple_Servant_Interfaces/run_test.rb +69 -69
- data/test/Multiple_Servant_Interfaces/server.ior +1 -1
- data/test/Multiple_Servant_Interfaces/server.rb +102 -102
- data/test/Nil/Test.idl +27 -27
- data/test/Nil/run_test.rb +52 -52
- data/test/Nil/test.rb +78 -78
- data/test/OBV/AbstractInterface/client.rb +179 -179
- data/test/OBV/AbstractInterface/run_test.rb +69 -69
- data/test/OBV/AbstractInterface/server.ior +1 -1
- data/test/OBV/AbstractInterface/server.rb +149 -149
- data/test/OBV/AbstractInterface/test.idl +53 -53
- data/test/OBV/Custom/OBV.idl +18 -18
- data/test/OBV/Custom/OBV_impl.rb +40 -40
- data/test/OBV/Custom/client.rb +86 -86
- data/test/OBV/Custom/run_test.rb +69 -69
- data/test/OBV/Custom/server.ior +1 -1
- data/test/OBV/Custom/server.rb +100 -100
- data/test/OBV/Simple/OBV.idl +15 -15
- data/test/OBV/Simple/OBV_impl.rb +26 -26
- data/test/OBV/Simple/client.rb +86 -86
- data/test/OBV/Simple/run_test.rb +69 -69
- data/test/OBV/Simple/server.ior +1 -1
- data/test/OBV/Simple/server.rb +100 -100
- data/test/OBV/Simple_Event/Event.idl +15 -15
- data/test/OBV/Simple_Event/Event_impl.rb +26 -26
- data/test/OBV/Simple_Event/client.rb +86 -86
- data/test/OBV/Simple_Event/run_test.rb +69 -69
- data/test/OBV/Simple_Event/server.ior +1 -1
- data/test/OBV/Simple_Event/server.rb +100 -100
- data/test/OBV/Supports/client.rb +116 -116
- data/test/OBV/Supports/run_test.rb +69 -69
- data/test/OBV/Supports/server.ior +1 -1
- data/test/OBV/Supports/server.rb +103 -103
- data/test/OBV/Supports/supports.idl +33 -33
- data/test/OBV/Supports/supports_impl.rb +57 -57
- data/test/OBV/Tree/client.rb +116 -116
- data/test/OBV/Tree/run_test.rb +69 -69
- data/test/OBV/Tree/server.ior +1 -1
- data/test/OBV/Tree/server.rb +117 -117
- data/test/OBV/Tree/test.idl +32 -32
- data/test/OBV/Truncatable/Extra.idl +27 -27
- data/test/OBV/Truncatable/Truncatable.idl +105 -105
- data/test/OBV/Truncatable/Truncatable_impl.rb +86 -86
- data/test/OBV/Truncatable/client.rb +279 -279
- data/test/OBV/Truncatable/run_test.rb +69 -69
- data/test/OBV/Truncatable/server.ior +1 -1
- data/test/OBV/Truncatable/server.rb +89 -89
- data/test/OBV/ValueBox/client.rb +497 -497
- data/test/OBV/ValueBox/run_test.rb +69 -69
- data/test/OBV/ValueBox/server.ior +1 -1
- data/test/OBV/ValueBox/server.rb +271 -271
- data/test/OBV/ValueBox/valuebox.idl +101 -101
- data/test/OBV/ValueBox/vb_basic.idl +75 -75
- data/test/OBV/ValueBox/vb_struct.idl +68 -68
- data/test/OBV/ValueBox/vb_union.idl +21 -21
- data/test/Object/Test.idl +27 -27
- data/test/Object/client.rb +112 -103
- data/test/Object/run_test.rb +69 -69
- data/test/Object/server.ior +1 -1
- data/test/Object/server.rb +126 -126
- data/test/POA/Test.idl +27 -27
- data/test/POA/run_test.rb +52 -52
- data/test/POA/test.rb +111 -111
- data/test/Param_Test/Test.idl +182 -182
- data/test/Param_Test/client.rb +277 -277
- data/test/Param_Test/run_test.rb +69 -69
- data/test/Param_Test/server.ior +1 -1
- data/test/Param_Test/server.rb +296 -296
- data/test/Performance/Simple/Test.idl +27 -27
- data/test/Performance/Simple/client.rb +90 -90
- data/test/Performance/Simple/run_test.rb +69 -69
- data/test/Performance/Simple/server.ior +1 -1
- data/test/Performance/Simple/server.rb +95 -95
- data/test/Policies/Test.idl +27 -27
- data/test/Policies/run_test.rb +52 -52
- data/test/Policies/test.rb +144 -144
- data/test/Timeout/client.rb +207 -207
- data/test/Timeout/run_test.rb +69 -69
- data/test/Timeout/server.ior +1 -1
- data/test/Timeout/server.rb +109 -109
- data/test/Timeout/test.idl +19 -19
- data/test/lib/assert.rb +43 -43
- data/test/lib/test.rb +542 -542
- data/test/test_runner.rb +193 -193
- metadata +141 -137
@@ -1,101 +1,101 @@
|
|
1
|
-
|
2
|
-
#include "vb_basic.idl"
|
3
|
-
#include "vb_struct.idl"
|
4
|
-
#include "vb_union.idl"
|
5
|
-
|
6
|
-
//
|
7
|
-
// Boxed Strings
|
8
|
-
//
|
9
|
-
valuetype VBstring string;
|
10
|
-
valuetype VBwstring wstring;
|
11
|
-
|
12
|
-
//
|
13
|
-
// Boxed Sequences
|
14
|
-
//
|
15
|
-
typedef sequence<long> TDseqlong;
|
16
|
-
valuetype VBseqlong TDseqlong;
|
17
|
-
|
18
|
-
//
|
19
|
-
// Boxed array ("fixed")
|
20
|
-
//
|
21
|
-
typedef long LongArray[3];
|
22
|
-
valuetype VBlongarray LongArray;
|
23
|
-
|
24
|
-
//
|
25
|
-
// Boxed array ("variable")
|
26
|
-
//
|
27
|
-
typedef string StringArray[2];
|
28
|
-
valuetype VBstringarray StringArray;
|
29
|
-
|
30
|
-
interface Test
|
31
|
-
{
|
32
|
-
// Boxed basic types
|
33
|
-
VBlong basic_op1(in VBlong p1, inout VBlong p2, out VBlong p3);
|
34
|
-
|
35
|
-
vb_basic::M_VBlong basic_op2(in vb_basic::M_VBlong p1,
|
36
|
-
inout vb_basic::M_VBlong p2,
|
37
|
-
out vb_basic::M_VBlong p3);
|
38
|
-
|
39
|
-
long basic_op3 (in long p1, inout long p2, out long p3);
|
40
|
-
|
41
|
-
// Boxed string
|
42
|
-
VBstring string_op1(in VBstring p1, inout VBstring p2, out VBstring p3);
|
43
|
-
|
44
|
-
string string_op2(in string p1, inout string p2, out string p3);
|
45
|
-
|
46
|
-
// Boxed sequence
|
47
|
-
VBseqlong seq_op1(in VBseqlong p1, inout VBseqlong p2,
|
48
|
-
out VBseqlong p3);
|
49
|
-
|
50
|
-
void seq_op2(in TDseqlong p1, inout TDseqlong p2, out TDseqlong p3);
|
51
|
-
|
52
|
-
// Boxed struct
|
53
|
-
VBfixed_struct1 struct_op1(in VBfixed_struct1 p1,
|
54
|
-
inout VBfixed_struct1 p2,
|
55
|
-
out VBfixed_struct1 p3);
|
56
|
-
|
57
|
-
void struct_op2(in Fixed_Struct1 p1,
|
58
|
-
inout Fixed_Struct1 p2,
|
59
|
-
out Fixed_Struct1 p3);
|
60
|
-
|
61
|
-
VBvariable_struct1 struct_op3(in VBvariable_struct1 p1,
|
62
|
-
inout VBvariable_struct1 p2,
|
63
|
-
out VBvariable_struct1 p3);
|
64
|
-
|
65
|
-
void struct_op4(in Variable_Struct1 p1,
|
66
|
-
inout Variable_Struct1 p2,
|
67
|
-
out Variable_Struct1 p3);
|
68
|
-
|
69
|
-
// Boxed array (fixed)
|
70
|
-
VBlongarray array_op1 (in VBlongarray p1, inout VBlongarray p2,
|
71
|
-
out VBlongarray p3);
|
72
|
-
|
73
|
-
void array_op2 (in LongArray p1, inout LongArray p2, out LongArray p3);
|
74
|
-
|
75
|
-
// Boxed array (variable)
|
76
|
-
VBstringarray array_op3 (in VBstringarray p1, inout VBstringarray p2,
|
77
|
-
out VBstringarray p3);
|
78
|
-
|
79
|
-
void array_op4 (in StringArray p1, inout StringArray p2,
|
80
|
-
out StringArray p3);
|
81
|
-
|
82
|
-
// Boxed union
|
83
|
-
VBfixed_union1 union_op1(in VBfixed_union1 p1,
|
84
|
-
inout VBfixed_union1 p2,
|
85
|
-
out VBfixed_union1 p3);
|
86
|
-
|
87
|
-
void union_op2(in Fixed_Union1 p1,
|
88
|
-
inout Fixed_Union1 p2,
|
89
|
-
out Fixed_Union1 p3);
|
90
|
-
|
91
|
-
VBvariable_union1 union_op3(in VBvariable_union1 p1,
|
92
|
-
inout VBvariable_union1 p2,
|
93
|
-
out VBvariable_union1 p3);
|
94
|
-
|
95
|
-
void union_op4(in Variable_Union1 p1,
|
96
|
-
inout Variable_Union1 p2,
|
97
|
-
out Variable_Union1 p3);
|
98
|
-
|
99
|
-
// Shutdown the remote ORB
|
100
|
-
oneway void shutdown ();
|
101
|
-
};
|
1
|
+
|
2
|
+
#include "vb_basic.idl"
|
3
|
+
#include "vb_struct.idl"
|
4
|
+
#include "vb_union.idl"
|
5
|
+
|
6
|
+
//
|
7
|
+
// Boxed Strings
|
8
|
+
//
|
9
|
+
valuetype VBstring string;
|
10
|
+
valuetype VBwstring wstring;
|
11
|
+
|
12
|
+
//
|
13
|
+
// Boxed Sequences
|
14
|
+
//
|
15
|
+
typedef sequence<long> TDseqlong;
|
16
|
+
valuetype VBseqlong TDseqlong;
|
17
|
+
|
18
|
+
//
|
19
|
+
// Boxed array ("fixed")
|
20
|
+
//
|
21
|
+
typedef long LongArray[3];
|
22
|
+
valuetype VBlongarray LongArray;
|
23
|
+
|
24
|
+
//
|
25
|
+
// Boxed array ("variable")
|
26
|
+
//
|
27
|
+
typedef string StringArray[2];
|
28
|
+
valuetype VBstringarray StringArray;
|
29
|
+
|
30
|
+
interface Test
|
31
|
+
{
|
32
|
+
// Boxed basic types
|
33
|
+
VBlong basic_op1(in VBlong p1, inout VBlong p2, out VBlong p3);
|
34
|
+
|
35
|
+
vb_basic::M_VBlong basic_op2(in vb_basic::M_VBlong p1,
|
36
|
+
inout vb_basic::M_VBlong p2,
|
37
|
+
out vb_basic::M_VBlong p3);
|
38
|
+
|
39
|
+
long basic_op3 (in long p1, inout long p2, out long p3);
|
40
|
+
|
41
|
+
// Boxed string
|
42
|
+
VBstring string_op1(in VBstring p1, inout VBstring p2, out VBstring p3);
|
43
|
+
|
44
|
+
string string_op2(in string p1, inout string p2, out string p3);
|
45
|
+
|
46
|
+
// Boxed sequence
|
47
|
+
VBseqlong seq_op1(in VBseqlong p1, inout VBseqlong p2,
|
48
|
+
out VBseqlong p3);
|
49
|
+
|
50
|
+
void seq_op2(in TDseqlong p1, inout TDseqlong p2, out TDseqlong p3);
|
51
|
+
|
52
|
+
// Boxed struct
|
53
|
+
VBfixed_struct1 struct_op1(in VBfixed_struct1 p1,
|
54
|
+
inout VBfixed_struct1 p2,
|
55
|
+
out VBfixed_struct1 p3);
|
56
|
+
|
57
|
+
void struct_op2(in Fixed_Struct1 p1,
|
58
|
+
inout Fixed_Struct1 p2,
|
59
|
+
out Fixed_Struct1 p3);
|
60
|
+
|
61
|
+
VBvariable_struct1 struct_op3(in VBvariable_struct1 p1,
|
62
|
+
inout VBvariable_struct1 p2,
|
63
|
+
out VBvariable_struct1 p3);
|
64
|
+
|
65
|
+
void struct_op4(in Variable_Struct1 p1,
|
66
|
+
inout Variable_Struct1 p2,
|
67
|
+
out Variable_Struct1 p3);
|
68
|
+
|
69
|
+
// Boxed array (fixed)
|
70
|
+
VBlongarray array_op1 (in VBlongarray p1, inout VBlongarray p2,
|
71
|
+
out VBlongarray p3);
|
72
|
+
|
73
|
+
void array_op2 (in LongArray p1, inout LongArray p2, out LongArray p3);
|
74
|
+
|
75
|
+
// Boxed array (variable)
|
76
|
+
VBstringarray array_op3 (in VBstringarray p1, inout VBstringarray p2,
|
77
|
+
out VBstringarray p3);
|
78
|
+
|
79
|
+
void array_op4 (in StringArray p1, inout StringArray p2,
|
80
|
+
out StringArray p3);
|
81
|
+
|
82
|
+
// Boxed union
|
83
|
+
VBfixed_union1 union_op1(in VBfixed_union1 p1,
|
84
|
+
inout VBfixed_union1 p2,
|
85
|
+
out VBfixed_union1 p3);
|
86
|
+
|
87
|
+
void union_op2(in Fixed_Union1 p1,
|
88
|
+
inout Fixed_Union1 p2,
|
89
|
+
out Fixed_Union1 p3);
|
90
|
+
|
91
|
+
VBvariable_union1 union_op3(in VBvariable_union1 p1,
|
92
|
+
inout VBvariable_union1 p2,
|
93
|
+
out VBvariable_union1 p3);
|
94
|
+
|
95
|
+
void union_op4(in Variable_Union1 p1,
|
96
|
+
inout Variable_Union1 p2,
|
97
|
+
out Variable_Union1 p3);
|
98
|
+
|
99
|
+
// Shutdown the remote ORB
|
100
|
+
oneway void shutdown ();
|
101
|
+
};
|
@@ -1,75 +1,75 @@
|
|
1
|
-
|
2
|
-
//=========================================================================
|
3
|
-
// Valuebox of basic types
|
4
|
-
//=========================================================================
|
5
|
-
|
6
|
-
// Valuebox of all basic types defined at outermost scope:
|
7
|
-
|
8
|
-
enum Color { red, orange, yellow, green, blue, indigo, violet };
|
9
|
-
|
10
|
-
valuetype VBshort short;
|
11
|
-
valuetype VBlong long;
|
12
|
-
valuetype VBlonglong long long;
|
13
|
-
valuetype VBushort unsigned short;
|
14
|
-
valuetype VBulong unsigned long;
|
15
|
-
valuetype VBulonglong unsigned long long;
|
16
|
-
valuetype VBchar char;
|
17
|
-
valuetype VBwchar wchar;
|
18
|
-
valuetype VBboolean boolean;
|
19
|
-
valuetype VBoctet octet;
|
20
|
-
valuetype VBfloat float;
|
21
|
-
valuetype VBdouble double;
|
22
|
-
valuetype VBlongdouble long double;
|
23
|
-
valuetype VBenum Color;
|
24
|
-
|
25
|
-
// Typedefs of basic types
|
26
|
-
typedef short TDshort;
|
27
|
-
typedef long TDlong;
|
28
|
-
typedef long long TDlonglong;
|
29
|
-
typedef unsigned short TDushort;
|
30
|
-
typedef unsigned long TDulong;
|
31
|
-
typedef unsigned long long TDulonglong;
|
32
|
-
typedef char TDchar;
|
33
|
-
typedef wchar TDwchar;
|
34
|
-
typedef boolean TDboolean;
|
35
|
-
typedef octet TDoctet;
|
36
|
-
typedef float TDfloat;
|
37
|
-
typedef double TDdouble;
|
38
|
-
typedef long double TDlongdouble;
|
39
|
-
typedef Color TDenum;
|
40
|
-
|
41
|
-
// Value box of typedef of basic types
|
42
|
-
valuetype VBTDshort TDshort;
|
43
|
-
valuetype VBTDlong TDlong;
|
44
|
-
valuetype VBTDlonglong TDlonglong;
|
45
|
-
valuetype VBTDushort TDushort;
|
46
|
-
valuetype VBTDulong TDulong;
|
47
|
-
valuetype VBTDulonglong TDulonglong;
|
48
|
-
valuetype VBTDchar TDchar;
|
49
|
-
valuetype VBTDwchar TDwchar;
|
50
|
-
valuetype VBTDboolean TDboolean;
|
51
|
-
valuetype VBTDoctet TDoctet;
|
52
|
-
valuetype VBTDfloat TDfloat;
|
53
|
-
valuetype VBTDdouble TDdouble;
|
54
|
-
valuetype VBTDlongdouble TDlongdouble;
|
55
|
-
valuetype VBTDenum TDenum;
|
56
|
-
|
57
|
-
// Any and typedef of any
|
58
|
-
valuetype VBany any;
|
59
|
-
typedef any TDany;
|
60
|
-
valuetype VBTDany TDany;
|
61
|
-
|
62
|
-
module vb_basic
|
63
|
-
{
|
64
|
-
// Valuebox defined within a module scope
|
65
|
-
valuetype M_VBlong long;
|
66
|
-
|
67
|
-
interface Test
|
68
|
-
{
|
69
|
-
M_VBlong basic_op1(in M_VBlong p1, inout M_VBlong p2,
|
70
|
-
out M_VBlong p3);
|
71
|
-
};
|
72
|
-
};
|
73
|
-
|
74
|
-
// Valuebox of an interface
|
75
|
-
valuetype VBinterface vb_basic::Test;
|
1
|
+
|
2
|
+
//=========================================================================
|
3
|
+
// Valuebox of basic types
|
4
|
+
//=========================================================================
|
5
|
+
|
6
|
+
// Valuebox of all basic types defined at outermost scope:
|
7
|
+
|
8
|
+
enum Color { red, orange, yellow, green, blue, indigo, violet };
|
9
|
+
|
10
|
+
valuetype VBshort short;
|
11
|
+
valuetype VBlong long;
|
12
|
+
valuetype VBlonglong long long;
|
13
|
+
valuetype VBushort unsigned short;
|
14
|
+
valuetype VBulong unsigned long;
|
15
|
+
valuetype VBulonglong unsigned long long;
|
16
|
+
valuetype VBchar char;
|
17
|
+
valuetype VBwchar wchar;
|
18
|
+
valuetype VBboolean boolean;
|
19
|
+
valuetype VBoctet octet;
|
20
|
+
valuetype VBfloat float;
|
21
|
+
valuetype VBdouble double;
|
22
|
+
valuetype VBlongdouble long double;
|
23
|
+
valuetype VBenum Color;
|
24
|
+
|
25
|
+
// Typedefs of basic types
|
26
|
+
typedef short TDshort;
|
27
|
+
typedef long TDlong;
|
28
|
+
typedef long long TDlonglong;
|
29
|
+
typedef unsigned short TDushort;
|
30
|
+
typedef unsigned long TDulong;
|
31
|
+
typedef unsigned long long TDulonglong;
|
32
|
+
typedef char TDchar;
|
33
|
+
typedef wchar TDwchar;
|
34
|
+
typedef boolean TDboolean;
|
35
|
+
typedef octet TDoctet;
|
36
|
+
typedef float TDfloat;
|
37
|
+
typedef double TDdouble;
|
38
|
+
typedef long double TDlongdouble;
|
39
|
+
typedef Color TDenum;
|
40
|
+
|
41
|
+
// Value box of typedef of basic types
|
42
|
+
valuetype VBTDshort TDshort;
|
43
|
+
valuetype VBTDlong TDlong;
|
44
|
+
valuetype VBTDlonglong TDlonglong;
|
45
|
+
valuetype VBTDushort TDushort;
|
46
|
+
valuetype VBTDulong TDulong;
|
47
|
+
valuetype VBTDulonglong TDulonglong;
|
48
|
+
valuetype VBTDchar TDchar;
|
49
|
+
valuetype VBTDwchar TDwchar;
|
50
|
+
valuetype VBTDboolean TDboolean;
|
51
|
+
valuetype VBTDoctet TDoctet;
|
52
|
+
valuetype VBTDfloat TDfloat;
|
53
|
+
valuetype VBTDdouble TDdouble;
|
54
|
+
valuetype VBTDlongdouble TDlongdouble;
|
55
|
+
valuetype VBTDenum TDenum;
|
56
|
+
|
57
|
+
// Any and typedef of any
|
58
|
+
valuetype VBany any;
|
59
|
+
typedef any TDany;
|
60
|
+
valuetype VBTDany TDany;
|
61
|
+
|
62
|
+
module vb_basic
|
63
|
+
{
|
64
|
+
// Valuebox defined within a module scope
|
65
|
+
valuetype M_VBlong long;
|
66
|
+
|
67
|
+
interface Test
|
68
|
+
{
|
69
|
+
M_VBlong basic_op1(in M_VBlong p1, inout M_VBlong p2,
|
70
|
+
out M_VBlong p3);
|
71
|
+
};
|
72
|
+
};
|
73
|
+
|
74
|
+
// Valuebox of an interface
|
75
|
+
valuetype VBinterface vb_basic::Test;
|
@@ -1,68 +1,68 @@
|
|
1
|
-
|
2
|
-
//=========================================================================
|
3
|
-
// Valuebox of structs
|
4
|
-
//=========================================================================
|
5
|
-
|
6
|
-
// "Fixed" struct
|
7
|
-
struct Fixed_Struct1
|
8
|
-
{ long l;
|
9
|
-
struct Bstruct {short s1; short s2; } abstruct;
|
10
|
-
};
|
11
|
-
|
12
|
-
// "Variable" struct
|
13
|
-
struct Variable_Struct1
|
14
|
-
{ long l;
|
15
|
-
string str;
|
16
|
-
};
|
17
|
-
|
18
|
-
typedef Variable_Struct1 TDvariable_struct1;
|
19
|
-
|
20
|
-
interface InterfaceFwd;
|
21
|
-
|
22
|
-
interface Interface1
|
23
|
-
{
|
24
|
-
long getval(in short s);
|
25
|
-
};
|
26
|
-
|
27
|
-
enum Pet { dog, cat, fish, rhinoceros };
|
28
|
-
typedef short short_array[15];
|
29
|
-
|
30
|
-
union Union1 switch(long)
|
31
|
-
{
|
32
|
-
case 1: long m1;
|
33
|
-
case 2: Pet m2;
|
34
|
-
};
|
35
|
-
|
36
|
-
typedef sequence<long> LongSeq;
|
37
|
-
typedef octet oct_array[10];
|
38
|
-
typedef sequence <Pet> PetSeq;
|
39
|
-
// Use all possible types inside a struct
|
40
|
-
struct Variable_Struct2
|
41
|
-
{
|
42
|
-
long len; // predefined type
|
43
|
-
any whatever; // predefined type
|
44
|
-
Pet apet; // enum
|
45
|
-
oct_array octet_array; // array
|
46
|
-
short_array td_array; // typedefed array
|
47
|
-
Interface1 intf1; // interface
|
48
|
-
InterfaceFwd intf2; // interface fwd
|
49
|
-
string str; // string
|
50
|
-
wstring wstr; // string
|
51
|
-
LongSeq ls; // typedef sequence
|
52
|
-
PetSeq sqq; // sequence
|
53
|
-
struct NestedStruct1 { short s; string str2; } ns1; // structure
|
54
|
-
Variable_Struct1 NestedStruct2;
|
55
|
-
TDvariable_struct1 NestedStruct3;
|
56
|
-
Union1 un; // union
|
57
|
-
};
|
58
|
-
|
59
|
-
valuetype VBfixed_struct1 Fixed_Struct1;
|
60
|
-
|
61
|
-
valuetype VBvariable_struct1 Variable_Struct1;
|
62
|
-
|
63
|
-
valuetype VBvariable_struct2 Variable_Struct2;
|
64
|
-
|
65
|
-
interface InterfaceFwd
|
66
|
-
{
|
67
|
-
long getval(in short s);
|
68
|
-
};
|
1
|
+
|
2
|
+
//=========================================================================
|
3
|
+
// Valuebox of structs
|
4
|
+
//=========================================================================
|
5
|
+
|
6
|
+
// "Fixed" struct
|
7
|
+
struct Fixed_Struct1
|
8
|
+
{ long l;
|
9
|
+
struct Bstruct {short s1; short s2; } abstruct;
|
10
|
+
};
|
11
|
+
|
12
|
+
// "Variable" struct
|
13
|
+
struct Variable_Struct1
|
14
|
+
{ long l;
|
15
|
+
string str;
|
16
|
+
};
|
17
|
+
|
18
|
+
typedef Variable_Struct1 TDvariable_struct1;
|
19
|
+
|
20
|
+
interface InterfaceFwd;
|
21
|
+
|
22
|
+
interface Interface1
|
23
|
+
{
|
24
|
+
long getval(in short s);
|
25
|
+
};
|
26
|
+
|
27
|
+
enum Pet { dog, cat, fish, rhinoceros };
|
28
|
+
typedef short short_array[15];
|
29
|
+
|
30
|
+
union Union1 switch(long)
|
31
|
+
{
|
32
|
+
case 1: long m1;
|
33
|
+
case 2: Pet m2;
|
34
|
+
};
|
35
|
+
|
36
|
+
typedef sequence<long> LongSeq;
|
37
|
+
typedef octet oct_array[10];
|
38
|
+
typedef sequence <Pet> PetSeq;
|
39
|
+
// Use all possible types inside a struct
|
40
|
+
struct Variable_Struct2
|
41
|
+
{
|
42
|
+
long len; // predefined type
|
43
|
+
any whatever; // predefined type
|
44
|
+
Pet apet; // enum
|
45
|
+
oct_array octet_array; // array
|
46
|
+
short_array td_array; // typedefed array
|
47
|
+
Interface1 intf1; // interface
|
48
|
+
InterfaceFwd intf2; // interface fwd
|
49
|
+
string str; // string
|
50
|
+
wstring wstr; // string
|
51
|
+
LongSeq ls; // typedef sequence
|
52
|
+
PetSeq sqq; // sequence
|
53
|
+
struct NestedStruct1 { short s; string str2; } ns1; // structure
|
54
|
+
Variable_Struct1 NestedStruct2;
|
55
|
+
TDvariable_struct1 NestedStruct3;
|
56
|
+
Union1 un; // union
|
57
|
+
};
|
58
|
+
|
59
|
+
valuetype VBfixed_struct1 Fixed_Struct1;
|
60
|
+
|
61
|
+
valuetype VBvariable_struct1 Variable_Struct1;
|
62
|
+
|
63
|
+
valuetype VBvariable_struct2 Variable_Struct2;
|
64
|
+
|
65
|
+
interface InterfaceFwd
|
66
|
+
{
|
67
|
+
long getval(in short s);
|
68
|
+
};
|