Mercurial > projects > dstress
diff run/foreach_15.d @ 0:3269e4627918
init dstress
author | svnowner |
---|---|
date | Sat, 25 Sep 2004 22:33:30 +0000 |
parents | |
children | 3414705c41ac |
line wrap: on
line diff
--- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/run/foreach_15.d Sat Sep 25 22:33:30 2004 +0000 @@ -0,0 +1,23 @@ +// $Header: /home/th/Dokumente/Entwicklung/MEIN_CVS/MiniD/src/run/foreach_15.d,v 1.1 2004/09/23 09:39:55 th Exp $ + + +int main(){ + char[3] array; + array[0]='a'; + array[1]='b'; + array[2]='c'; + int count=0; + assert(count==0); + assert(array[0]=='a'); + assert(array[1]=='b'); + assert(array[2]=='c'); + foreach(inout char value; array){ + count++; + value++; + } + assert(count==3); + assert(array[0]=='b'); + assert(array[1]=='c'); + assert(array[2]=='d'); + return 0; +}