^try{
    $source[this is the cause of error]
	^throw[test;$source;comment value]
}{
	^if($exception.type eq test){
		$exception.handled(1)

		type=$exception.type<br>
	    source=$exception.source<br>
#	    file=$exception.file<br>
	    lineno=$exception.lineno<br>
    	comment=$exception.comment<br>
	}
}