Mercurial > projects > ldc
annotate tests/mini/ptrarith.d @ 849:ba390e5e9150
Remove unportable env-sanitizing code. If it is really needed, it needs to be
rethought. Closes #131.
author | Christian Kamm <kamm incasoftware de> |
---|---|
date | Sun, 14 Dec 2008 16:30:06 +0100 |
parents | 1bb99290e03a |
children |
rev | line source |
---|---|
270
d9d5d59873d8
[svn r291] Fixed a bunch of the old Phobos tests to work with Tango.
lindquist
parents:
1
diff
changeset
|
1 extern(C) int printf(char*, ...); |
d9d5d59873d8
[svn r291] Fixed a bunch of the old Phobos tests to work with Tango.
lindquist
parents:
1
diff
changeset
|
2 |
1 | 3 void main() |
4 { | |
5 printf("Pointer arithmetic test\n"); | |
6 int* p; | |
7 printf("0x%x\n", p); | |
8 assert(p++ is null); | |
9 assert(cast(size_t)p == 4); | |
10 printf("0x%x\n", p); | |
11 p--; | |
12 assert(p is null); | |
13 printf("0x%x\n", p); | |
14 int d = 4; | |
15 p+=d; | |
16 printf("0x%x\n", p); | |
17 assert(cast(size_t)p == 16); | |
18 d = 2; | |
19 p+=d; | |
20 printf("0x%x\n", p); | |
21 assert(cast(size_t)p == 0x18); | |
22 d = 6; | |
23 p-=d; | |
24 printf("0x%x\n", p); | |
25 assert(p is null); | |
26 printf(" SUCCESS\n"); | |
27 } | |
28 | |
29 void fill_byte_array(ubyte* a, size_t n, ubyte v) | |
30 { | |
31 auto p = a; | |
32 auto end = a+n; | |
33 while (p !is end) | |
34 *p++ = v; | |
35 } |