: url>string ( url -- str ) dup url? [ [ protocol>> "://" append ] [ host>> ] [ path>> ] tri 3append ] when ;
Done