Nevermind,

I just got the client to work:

echoClient :: IO ()
echoClient = withSocketsDo $ do
    sock <- socket AF_INET Datagram 0
    n <- sendTo sock "hi" (SockAddrInet echoPort 0x01000007f)
    return ()

Thanks everyone for your help.

-John

On 1/12/07, John Ky < newhoggy@gmail.com > wrote:Hi,

What's wrong with my UDP client?

echoClient :: IO ()
echoClient = withSocketsDo $ do
    putStrLn "[a]"
    sock <- socket AF_INET Datagram 0
    putStrLn "[b]"
    connect sock (SockAddrInet 9900 iNADDR_ANY)
    putStrLn "[c]"
    n <- send sock "hi"
    putStrLn "[d]"
    return ()

I get:

*Main> echoClient
[a]
[b]
*** Exception: connect: failed (Cannot assign requested address (WSAEADDRNOTAVAI
L))

Thanks

-John