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

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

// @WARNING@ direct usage of Phobos's GC

module dstress.run.delete_01;
import std.gc;

int status;

class MyClass{
	~this(){
		assert(status==0);
		status--;
	}

	delete(void* p){
		assert(status==-1);
		status--;
	}
}

void test(){
	MyClass c=new MyClass();
	assert(status==0);
	delete c;
}

int main(){
	test();
	assert(status<=-1);
	std.gc.fullCollect();
	std.gc.minimize();
	assert(status==-2);
	return 0;
}