haskell - String -> ByteString 并反转

Question

在我的 Haskell 程序中，我需要使用 Strings 和 ByteStrings:

import Data.ByteString.Lazy as BS  (ByteString)
import Data.ByteString.Char8 as C8 (pack)
import Data.Char                   (chr)

stringToBS :: String -> ByteString
stringToBS str = C8.pack str

bsToString :: BS.ByteString -> String
bsToString bs = map (chr . fromEnum) . BS.unpack $ bs

bsToString工作正常，但 stringToBS编译时出现以下错误:

Couldn't match expected type ‘ByteString’
                with actual type ‘Data.ByteString.Internal.ByteString’
    NB: ‘ByteString’ is defined in ‘Data.ByteString.Lazy.Internal’
        ‘Data.ByteString.Internal.ByteString’
          is defined in ‘Data.ByteString.Internal’
    In the expression: pack str
    In an equation for ‘stringToBS’: stringToBS str = pack str

但我需要让它成为 ByteString来自 Data.ByteString.Lazy as BS (ByteString)用于我的代码中的进一步工作功能。

知道如何解决我的问题吗？

Answer 1

您正在使用两种不同类型的严格 ByteString 和惰性 ByteString。

本次进口:

import Data.ByteString.Lazy as BS  (ByteString)

使 ByteString引用懒惰的 ByteStrings，所以你的 stringToBS 的类型签名不符合它的定义:

stringToBS :: String -> ByteString  -- refers to lazy ByteStrings
stringToBS str = C8.pack str        -- refers to strict ByteStrings

我认为使用 import qualified 会是一个更好的主意像这样:

import qualified Data.ByteString.Lazy as LBS
import qualified Data.ByteString.Char8 as BS

并使用 BS.ByteString和 LBS.ByteString引用严格/懒惰的 ByteStrings。