Mercurial > projects > dstress

comparison run/foreach_15.d @ 0:3269e4627918

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
init dstress
author svnowner
date Sat, 25 Sep 2004 22:33:30 +0000
parents
children 3414705c41ac
comparison
equal deleted inserted replaced
-1:000000000000 0:3269e4627918
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 }