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
|
exec("swigtest.start", -1);
b_set("hello");
checkequal(b_get(), "hello", "b_get()");
sa = new_A();
A_x_set(sa, 5);
checkequal(A_x_get(sa), 5, "A_x_get(sa)");
a_set(sa);
checkequal(A_x_get(a_get()), 5, "A_x_get(a)");
ap_set(sa);
A_x_set(sa, 14);
checkequal(A_x_get(ap_get()), 14, "A_x_get(ap)");
delete_A(sa);
sa2 = new_A();
cap_set(sa2);
A_x_set(sa2, 16);
checkequal(A_x_get(cap_get()), 16, "A_x_get(cap)");
checkequal(A_x_get(ar_get()), 5, "A_x_get(ar)");
ar_set(sa2);
checkequal(A_x_get(ar_get()), 16, "A_x_get(ar)");
delete_A(sa2);
x_set(11);
checkequal(x_get(), 11, "x_get()");
exec("swigtest.quit", -1);
|
