view run/i/in_out_body_11_H.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@	Stewart Gordon <smjg_1998@yahoo.com>
// @date@	2005-12-12
// @uri@	http://www.digitalmars.com/pnews/read.php?server=news.digitalmars.com&group=digitalmars.D.bugs&artnum=5835

// __DSTRESS_TORTURE_BLOCK__ -release

module dstress.run.i.in_out_body_11_H;

int inDerived;
int inBase;
int done;

class Base{
	void test(int i)
	in{
		inBase++;
		assert(0);
	}body{
		assert(0);
	}
}

class Derived : Base{
	void test(int i)
	in{
		inDerived++;
		assert(0);
	}body{
		done++;
	}
}

int main(){
	Derived d = new Derived();

	try{
		d.test(1);
	}catch(Exception e){
		assert(done == 0);
		assert(inBase == 1);
		assert(inDerived == 1);

		return 0;
	}
	return 0;
}