view run/line_token_02.d @ 1330:f3f715978184

Georg Wrede <georg@iki.fi> 2007-01-07 mail:45A120F5.1050108@iki.fi
author thomask
date Sat, 13 Jan 2007 10:33:49 +0000
parents 9a121126b077
children 36bedfa079e6
line wrap: on
line source

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

// __DSTRESS_TORTURE_BLOCK__ -release

module dstress.run.line_token_02;

int main(){
	try{
		#line 0
		assert(0);
	}catch(Object e){
		checkLineNumber(e);
		return 0;
	}

	assert(0);
}

/* 
 * @WARNING@: this code depends on the phobos implementation.
 * char[]s returned by wrong assertions have to look like:
 *	 "blah blah (linenumber) blah blah"
 */
void checkLineNumber(Object o){
	char[] string=o.toString();
	
	int start;
	for(start=0; start<string.length; start++){
		if(string[start]=='('){
			break;
		}
	}

	int end;
	for(end=string.length-1; end>start; end--){
		if(string[end]==')'){
			break;
		}
	}

	assert(end-start==2);
	assert(string[start+1]=='0');
}