Windows 8で「InternalIOException getAddrInfo：存在しません（エラー10093）」

Question

このような単純なコードが機能しないのはなぜですか？

import Network.HTTP.Conduit 
import qualified Data.ByteString.Lazy as L 

main :: IO() 
main = simpleHttp "http://www.dir.bg/" >>= L.putStr 

それは、次のエラーが発生：

TestConduit.exe: InternalIOException getAddrInfo: does not exist (error 10093)

Answer 1

あなたはソケットを初期化するためにwithSocketsDoを使用する必要があります。

import Network.HTTP.Conduit 
import qualified Data.ByteString.Lazy as L 
import Network (withSocketsDo) 

main :: IO() 
main = withSocketsDo 
     $ simpleHttp "http://www.dir.bg/" >>= L.putStr