Mercurial > projects > dstress

view run/bug_cg87_2393_A.d @ 1630:d0efa3ae5522 default tip

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
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 ec5e144583ea
children
line wrap: on
line source

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

// @author@	Tom S <h3r3tic@remove.mat.uni.torun.pl>
// @date@	2005-03-27
// @uri@	http://www.digitalmars.com/pnews/read.php?server=news.digitalmars.com&group=digitalmars.D.bugs&artnum=3363

module dstress.run.bug_cg87_2393_A;

creal x;
    
void foo(){
	x = -x;
}

void bar(){
	return foo();
}

int main(){
	x = 2.0L + 0.0Li;
	bar();
	if(-2.0L + 0.0Li != x){
		assert(0);
	}
	return 0;
}