view run/foreach_13.d @ 1584:75358a6522ce

[Issue 1829] New: Inline assembler cannot get label addresses <burton-radons@shaw.ca> 2007-02-12 http://d.puremagic.com/issues/show_bug.cgi?id=1829
author thomask
date Fri, 22 Feb 2008 07:55:41 +0000
parents 20d8ee6523e1
children
line wrap: on
line source

// $HeadURL$
// $Date$
// $Author$

module dstress.run.foreach_13;

int main(){
	char[] array="abc".dup;
	int count=0;
	assert(count==0);
	assert(array[0]=='a');
	assert(array[1]=='b');
	assert(array[2]=='c');
	foreach(ref char value; array){
		count++;
		value++;
	}
	assert(count==3);
	assert(array[0]=='b');
	assert(array[1]=='c');
	assert(array[2]=='d');
	return 0;
}