haskell - 将 http-conduit 源连接到 xml-conduit 接收器

Question

我试图遵循这个connecting-http-conduit-to-xml-conduit stackoverflow 问题，因为它看起来与我想要做的完全一样。

我正在构建来自 yesod 书的http-conduit部分的示例。

编码

getBody = do
   manager <- liftIO $ newManager def
   req <- liftIO $ parseUrl fredURL
   http req manager

错误

No instance for (monad-control-0.3.1.3:Control.Monad.Trans.Control.MonadBaseControl
                   IO m0)
  arising from a use of `http'
Possible fix:
  add an instance declaration for
  (monad-control-0.3.1.3:Control.Monad.Trans.Control.MonadBaseControl
     IO m0)
In a stmt of a 'do' block: http req manager
In the expression:
  do { manager <- liftIO $ newManager def;
       req <- liftIO $ parseUrl fredURL;
       http req manager }
In an equation for `getBody':
    getBody
      = do { manager <- liftIO $ newManager def;
             req <- liftIO $ parseUrl fredURL;
             http req manager }

目标

我正在尝试返回一个将由 xml-conduit Sink 使用的 Source，其目的是我想使用 XML-Conduit 来解析 XML 并将其表示为 Haskelldata类型。我能否解释一下我为什么会出错？