1

このタイプのエラーが発生します:

Couldn't match type `containers-0.5.0.0:Data.Map.Base.Map
                       ByteString [ByteString]'
              with `M.Map ByteString [ByteString]'
Expected type: M.Map ByteString [ByteString]
  Actual type: Params

ただし、Params 型は Map ByteString [ByteString] です。

type Params = Map ByteString [ByteString]

それが助けになるなら、これは完全な機能です:

import qualified Data.Map as M

categoryDoc :: Params -> Document
categoryDoc params = map (\(k,[v]) -> T.decodeUtf8 k =: T.decodeUtf8 v) $ M.toList params

ありがとうございました。

4

1 に答える 1