+USING: accessors arrays assocs io.sockets io.sockets.secure
+kernel linked-assocs present prettyprint tools.test urls ;
 IN: urls.tests
-USING: io.sockets io.sockets.secure urls urls.private tools.test prettyprint
-arrays kernel assocs present accessors ;
 
 CONSTANT: urls
     {

    T{ url
        { protocol "http" }
        { host "localhost" }
        { query H{ { "foo" "bar" } } }
        { path "/" }
    }
}

        {
            T{ url
                { path "bar" }
                { query LH{ { "a" "b" } } }
            }
            "bar?a=b"
        }
