view run/i/interface_23_D.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 81222734adf3
children
line wrap: on
line source

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

// @author@	<smjg@iname.com>
// @date@	2006-03-22
// @uri@	http://d.puremagic.com/issues/show_bug.cgi?id=65

module dstress.run.i.interface_23_D;

int status;

interface I {
	int showData();
}

class Parent {
	I test() {
		status += 7;
		return new Child(42);
	}
}

class Child : Parent, I {
	int data;

	this(int d) {
		data = d;
	}

	override Child test() {
		status += 1;
		return new Child(69);
	}

	override int showData(){
		return data;
	}
}

int main() {
	Child a = new Child(105);
	assert(a);
	assert(status == 0);
	assert(a.data == 105);

	Parent p = a;
	assert(a);
	assert(status == 0);

	a.test();
	assert(status == 1);

	I i = p.test();
	assert(i);
	assert(status == 2);

	assert(a.data == 105);
	assert(a.showData() == 105);
	assert(i.showData() == 69);

	return 0;
}