view run/align_10.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 ec5e144583ea
children
line wrap: on
line source

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

// @author@	Ben Hinkle <bhinkle@mathworks.com>
// @date@	2005-03-23
// @uri@	http://www.digitalmars.com/pnews/read.php?server=news.digitalmars.com&group=digitalmars.D.bugs&artnum=3313

module dstress.run.align_10;

version(Tango){
	static assert(0, "DSTRESS{XFAIL}: Tango doesn't provide access to fullCollect");
}else{
	// @WARNING@	imports Phobos' gc
	import std.gc;

	struct S{
		char[] font_face;
		byte charset;
	}

	int main(){
		S[] x;

		S s;
		s.font_face="font face".dup;
		x ~= s;
		s.font_face="font face".dup;
		x ~= s;
		s.font_face="font face".dup;
		x ~= s;
		s.font_face="font face".dup;
		x ~= s;

		fullCollect();

		assert(x[0].font_face=="font face");
		assert(x[1].font_face=="font face");

		return 0;
	}
}