5
// Copyright Ericsson AB 2002-2010. All Rights Reserved.
7
// The contents of this file are subject to the Erlang Public License,
8
// Version 1.1, (the "License"); you may not use this file except in
9
// compliance with the License. You should have received a copy of the
10
// Erlang Public License along with this software. If not, it can be
11
// retrieved online at http://www.erlang.org/.
13
// Software distributed under the License is distributed on an "AS IS"
14
// basis, WITHOUT WARRANTY OF ANY KIND, either express or implied. See
15
// the License for the specific language governing rights and limitations
23
const short TestConst = 1;
27
const short TestConst = 2;
39
enum fruit {orange, banana, apple, peach, pear};
41
typedef sequence<long> lseq;
43
typedef sequence<b> bseq;
51
typedef sequence<a> aseq;
53
typedef sequence<string> sseq;
57
typedef long arr1[500], dd[2][3];
59
typedef erlang::term apa;
60
typedef erlang::port banan;
62
typedef sequence<erlang::term> etseq;
80
typedef sequence<char> str1;
81
typedef string<12> str2;
84
typedef sequence<string> sstr3; // sequence of string
85
typedef sequence<sstr3> ssstr3; // sequence of sequences of strings
87
typedef long arr3[3]; // array of long
88
typedef sequence<arr3> sarr3; // sequence of array
89
typedef sequence<sarr3> ssarr3; // sequence of sequnces of arrays of strings
107
typedef dyn arr2[1][2];
112
const short TestConst = 3;
114
//arr2 suck(in arr2 x, out arr2 y );
116
///////////////////////////////// attribute long l;
120
long long_test(in long a, out long a1);
121
long long longlong_test(in long long a, out long long a1);
122
unsigned short ushort_test(in unsigned short a, out unsigned short a1);
123
unsigned long ulong_test(in unsigned long a, out unsigned long a1);
124
unsigned long long ulonglong_test(in unsigned long long a, out unsigned long long a1);
125
double double_test(in double a, out double a1);
126
char char_test(in char a, out char a1);
127
wchar wchar_test(in wchar a, out wchar a1);
128
octet octet_test(in octet a, out octet a1);
129
boolean bool_test(in boolean a, out boolean a1);
131
// Seq. and struct tests
132
b struct_test(in b a, out b a1);
133
es struct2_test(in es a, out es a1);
134
//simple struct3_test(in simple x, out simple y);
135
bseq seq1_test(in bseq a, out bseq a1);
136
aseq seq2_test(in aseq a, out aseq a1);
137
lseq seq3_test(in lseq a, out lseq a1);
138
ssstr3 seq4_test(in ssstr3 a, out ssstr3 a1);
139
ssarr3 seq5_test(in ssarr3 a, out ssarr3 a1);
142
arr1 array1_test(in arr1 a, out arr1 a1);
143
dd array2_test(in dd a, out dd a1);
146
fruit enum_test(in fruit a, out fruit a1);
149
string string1_test(in string a, out string a1);
150
wstring wstring1_test(in wstring a, out wstring a1);
151
sseq string2_test(in sseq a, out sseq a1);
152
str string3_test(in str a, out str a1);
153
strRec string4_test(in strRec a, out strRec a1);
155
// Special erlang types
156
erlang::pid pid_test(in erlang::pid a, out erlang::pid a1);
157
erlang::port port_test(in erlang::port a, out erlang::port a1);
158
erlang::ref ref_test(in erlang::ref a, out erlang::ref a1);
159
erlang::term term_test(in erlang::term a, out erlang::term a1);
162
long typedef_test(in apa a, in banan b, out apa a1, out banan b1);
165
s inline_sequence_test(in s a, out s a1);
168
etseq term_sequence_test(in etseq a, out etseq a1);
170
et term_struct_test(in et a, out et a1);