4
// Copyright Ericsson AB 2003-2010. All Rights Reserved.
6
// The contents of this file are subject to the Erlang Public License,
7
// Version 1.1, (the "License"); you may not use this file except in
8
// compliance with the License. You should have received a copy of the
9
// Erlang Public License along with this software. If not, it can be
10
// retrieved online at http://www.erlang.org/.
12
// Software distributed under the License is distributed on an "AS IS"
13
// basis, WITHOUT WARRANTY OF ANY KIND, either express or implied. See
14
// the License for the specific language governing rights and limitations
22
const short TestConst = 1;
26
const short TestConst = 2;
38
enum fruit {orange, banana, apple, peach, pear};
40
typedef sequence<long> lseq;
42
typedef sequence<b> bseq;
50
typedef sequence<a> aseq;
52
typedef sequence<string> sseq;
56
typedef long arr1[500], dd[2][3];
58
typedef erlang::term apa;
59
typedef erlang::port banan;
61
typedef sequence<erlang::term> etseq;
79
typedef sequence<char> str1;
80
typedef string<12> str2;
83
typedef sequence<string> sstr3; // sequence of string
84
typedef sequence<sstr3> ssstr3; // sequence of sequences of strings
86
typedef long arr3[3]; // array of long
87
typedef sequence<arr3> sarr3; // sequence of array
88
typedef sequence<sarr3> ssarr3; // sequence of sequnces of arrays of strings
106
typedef dyn arr2[1][2];
111
const short TestConst = 3;
113
//arr2 suck(in arr2 x, out arr2 y );
115
///////////////////////////////// attribute long l;
119
long long_test(in long a, out long a1);
120
long long longlong_test(in long long a, out long long a1);
121
unsigned short ushort_test(in unsigned short a, out unsigned short a1);
122
unsigned long ulong_test(in unsigned long a, out unsigned long a1);
123
unsigned long long ulonglong_test(in unsigned long long a, out unsigned long long a1);
124
double double_test(in double a, out double a1);
125
char char_test(in char a, out char a1);
126
wchar wchar_test(in wchar a, out wchar a1);
127
octet octet_test(in octet a, out octet a1);
128
boolean bool_test(in boolean a, out boolean a1);
130
// Seq. and struct tests
131
b struct_test(in b a, out b a1);
132
es struct2_test(in es a, out es a1);
133
//simple struct3_test(in simple x, out simple y);
134
bseq seq1_test(in bseq a, out bseq a1);
135
aseq seq2_test(in aseq a, out aseq a1);
136
lseq seq3_test(in lseq a, out lseq a1);
137
ssstr3 seq4_test(in ssstr3 a, out ssstr3 a1);
138
ssarr3 seq5_test(in ssarr3 a, out ssarr3 a1);
141
arr1 array1_test(in arr1 a, out arr1 a1);
142
dd array2_test(in dd a, out dd a1);
145
fruit enum_test(in fruit a, out fruit a1);
148
string string1_test(in string a, out string a1);
149
wstring wstring1_test(in wstring a, out wstring a1);
150
sseq string2_test(in sseq a, out sseq a1);
151
str string3_test(in str a, out str a1);
152
strRec string4_test(in strRec a, out strRec a1);
154
// Special erlang types
155
erlang::pid pid_test(in erlang::pid a, out erlang::pid a1);
156
erlang::port port_test(in erlang::port a, out erlang::port a1);
157
erlang::ref ref_test(in erlang::ref a, out erlang::ref a1);
158
erlang::term term_test(in erlang::term a, out erlang::term a1);
161
long typedef_test(in apa a, in banan b, out apa a1, out banan b1);
164
s inline_sequence_test(in s a, out s a1);
167
etseq term_sequence_test(in etseq a, out etseq a1);
169
et term_struct_test(in et a, out et a1);