view run/m/memory_management_05.d @ 1619:bebc7472a832

Fix #7.
author Christian Kamm <kamm incasoftware de>
date Sat, 07 Nov 2009 18:55:30 +0100
parents 81222734adf3
children
line wrap: on
line source

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

// @author@	<thomas-dloop@kuehne.cn>
// @date@	2006-03-24
// @uri@	http://d.puremagic.com/issues/show_bug.cgi?id=72

module dstress.run.m.memory_management_05;

int main(){
	char[] dummy;
	dummy = "abc".dup;
	for(size_t a=0; a < 200; a++){
		char[] tmp = new char[a % 80];
		for(size_t b=0; b < a % 10; b++){
			dummy = dummy[0 .. $ % 33] ~ tmp[0 .. $ % 11] ~ dummy[ $ % 33 .. $];
		}
	}

	if(dummy.length != 4189){
		assert(0);
	}

	foreach(char c; dummy){
		switch(c){
			case 'a':
			case 'b':
			case 'c':
			case c.init:
				break;
			default:
				assert(0);
		}
	}

	return dummy.length / 4190;
}