view run/foreach_10.d @ 1623:04022926a4d5

Fix dstress.run.b.bug_cod1_2528_C as reported by Don Clugston Quoting Don's words from Ticket #8: Fails because it returns 3 instead of 0. The DStress test case is incorrect. The arrray literal is an int, so it's 4 bytes. Casting it to void[] should give a length of 4 -- and that's exactly what it does. Should be "return x.length - 4;".
author Leandro Lucarella <llucax@gmail.com>
date Fri, 05 Nov 2010 10:10:51 -0300
parents 20d8ee6523e1
children
line wrap: on
line source

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

module dstress.run.foreach_10;

class MyArray{
	double[] array;
	
	this(){
		array=new double[3];
		array[0]=0.0;
		array[1]=4.0;
		array[2]=8.0;
	}
	
	int opApply(int delegate(ref double) dg){
		double result;
		for(int i=0; i<array.length; i++){
			result = dg(array[i]);
			if(result){
				return i;
			}
		}
		return array.length;
	}
}
int main(){
	MyArray array=new MyArray();
	double test=0.0;
	assert(test==0.0);
	foreach(double value; array){
		test+=value;
	}
	assert(test==12.0);
	return 0;
}