object uri;
Uri uri;
void testURI2(){	object uri;	uri = NEW();	uri->set("/index.lsp?foo=1#sect", "/usr/www/webroot/");	assert_equals( "/usr/www/webroot/",	uri->get_absolute_path()	);	assert_equals( "",					uri->get_relative_path()	);	assert_equals( "",					uri->get_scheme()			);	assert_equals( "",					uri->get_authority()		);	assert_equals( 80,					uri->get_port()				);	assert_equals( "index.lsp",			uri->get_filename()			);	assert_equals( "lsp",				uri->get_filesuffix()		);	assert_equals( "foo=1",				uri->get_query_string()		);	assert_equals( "sect",				uri->get_fragment()			);}