comparison tests/minicomplex/mem1.d @ 341:1bb99290e03a trunk

[svn r362] Started merging the old 'test' dir as well as the newer 'tangotests' dir into 'tests/mini' and 'tests/minicomplex'.
author lindquist
date Sun, 13 Jul 2008 02:51:19 +0200
parents
children
comparison
equal deleted inserted replaced
340:351c0077d0b3 341:1bb99290e03a
1 module tangotests.mem1;
2
3 import tango.stdc.stdio;
4
5 void main()
6 {
7 printf("new int;\n");
8 int* i = new int;
9 assert(*i == 0);
10
11 printf("new int[3];\n");
12 int[] ar = new int[3];
13 ar[0] = 1;
14 ar[1] = 56;
15 assert(ar.length == 3);
16 assert(ar[0] == 1);
17 assert(ar[1] == 56);
18 assert(ar[2] == 0);
19
20 printf("array ~= elem;\n");
21 int[] ar2;
22 ar2 ~= 22;
23 assert(ar2.length == 1);
24 assert(ar2[0] == 22);
25
26 printf("array ~= array;\n");
27 ar2 ~= ar;
28 assert(ar2.length == 4);
29 assert(ar2[0] == 22);
30 assert(ar2[1] == 1);
31 printf("%d %d %d %d\n", ar2[0], ar2[1], ar2[2], ar2[3]);
32 assert(ar2[2] == 56);
33 assert(ar2[3] == 0);
34
35 printf("array ~ array;\n");
36 int[] ar5 = ar ~ ar2;
37 assert(ar5.length == 7);
38 assert(ar5[0] == 1);
39 assert(ar5[1] == 56);
40 assert(ar5[2] == 0);
41 assert(ar5[3] == 22);
42 assert(ar5[4] == 1);
43 assert(ar5[5] == 56);
44 assert(ar5[6] == 0);
45
46 printf("array ~ elem;\n");
47 int[] ar4 = ar2 ~ 123;
48 assert(ar4.length == 5);
49 assert(ar4[0] == 22);
50 assert(ar4[1] == 1);
51 assert(ar4[2] == 56);
52 assert(ar4[3] == 0);
53 assert(ar4[4] == 123);
54
55 printf("elem ~ array;\n");
56 int[] ar3 = 123 ~ ar2;
57 assert(ar3.length == 5);
58 assert(ar3[0] == 123);
59 assert(ar3[1] == 22);
60 assert(ar3[2] == 1);
61 assert(ar3[3] == 56);
62 assert(ar3[4] == 0);
63 }