Mercurial > projects > dstress
annotate run/foreach_15.d @ 0:3269e4627918
init dstress
author | svnowner |
---|---|
date | Sat, 25 Sep 2004 22:33:30 +0000 |
parents | |
children | 3414705c41ac |
rev | line source |
---|---|
0 | 1 // $Header: /home/th/Dokumente/Entwicklung/MEIN_CVS/MiniD/src/run/foreach_15.d,v 1.1 2004/09/23 09:39:55 th Exp $ |
2 | |
3 | |
4 int main(){ | |
5 char[3] array; | |
6 array[0]='a'; | |
7 array[1]='b'; | |
8 array[2]='c'; | |
9 int count=0; | |
10 assert(count==0); | |
11 assert(array[0]=='a'); | |
12 assert(array[1]=='b'); | |
13 assert(array[2]=='c'); | |
14 foreach(inout char value; array){ | |
15 count++; | |
16 value++; | |
17 } | |
18 assert(count==3); | |
19 assert(array[0]=='b'); | |
20 assert(array[1]=='c'); | |
21 assert(array[2]=='d'); | |
22 return 0; | |
23 } |