view run/b/bug_cgcod_562_P2.d @ 1630:d0efa3ae5522 default tip

run/mini/naked_asm5: New x86_64 ABI passes the arguments in reverse order.
author David Nadlinger <code@klickverbot.at>
date Sat, 23 Apr 2011 22:57:32 +0200
parents b8c0195059d9
children
line wrap: on
line source

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

// @author@	Tiago Gasiba <tiago.gasiba@gmail.com>
// @date@	2005-11-28
// @uri@	http://www.digitalmars.com/pnews/read.php?server=news.digitalmars.com&group=digitalmars.D.bugs&artnum=5690

module dstress.run.b.bug_cgcod_562_P2;

template test( T : T[] ){
	void test( T[] data ) {
		data[0] /= cast(cdouble)data.length;
	}
}

alias test!(cdouble[]) bug;

int main(){
	cdouble[2] array;
	array[0] = 2.0 + 0.0i;

	bug(array);
	array[0] -= 1.0;
	if(array[0].re < 0.0){
		array[0] *= -1;
	}

	if(array[0].re > double.epsilon * 4.0){
		assert(0);
	}
	if(array[0].im > double.epsilon * 4.0){
		assert(0);
	}

	return 0;
}