Hi all,

I'm having a bit of difficulty with Network.URI -- unless I
misunderstand the documentation, the attached demo program is supposed
to produce:

   http://localhost:9000
   http://localhost:9000/d1
   http://localhost:9000/d1/d2

but it produces

   http://localhost:9000
   http://localhost:9000/d1
   http://localhost:9000/d2

Is this some sort of bug or am I not understanding the documentation
correctly?

Cheers,

-- 
Bardur Arantsson
<[EMAIL PROTECTED]>

The thing that's depressing about tennis is that no matter how
good I get, I'll never be as good as a wall.
                                                    Mitch Hedberg
import Network.URI
import Data.Maybe

base = fromJust $ parseURI "http://localhost:9000";
d1 = fromJust $ parseRelativeReference "d1"
d2 = fromJust $ parseRelativeReference "d2"

main :: IO ()
main = do
  let u = base
  let u1 = fromJust $ d1 `relativeTo` base
  let u2 = fromJust $ d2 `relativeTo` u1
  print $ u
  print $ u1
  print $ u2

_______________________________________________
Haskell-Cafe mailing list
Haskell-Cafe@haskell.org
http://www.haskell.org/mailman/listinfo/haskell-cafe

Reply via email to