view run/delete_01.d @ 1619:bebc7472a832

Fix #7.
author Christian Kamm <kamm incasoftware de>
date Sat, 07 Nov 2009 18:55:30 +0100
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;
}