Haskell 将Data.Text.Lazy.Text转换为Data.Text.Text类型的行列表

我想知道首选的方法是什么，将惰性文本转换成按行尾分割的严格文本列表。我提出了如下内容，但不确定是否可以保证每个严格的文本元素都是完整的一行（或者如果存在其他问题）：

将限定的Data.Text.Lazy导入为LT
readLines filePath=do
目录
但是，将每一行连接成一个严格的块。然而，进行连接可能比将每一行作为严格块列表进行处理要慢。懒散的
文本
谢谢。您关于直接使用惰性文本的评论可能正是我想要做的。
import qualified Data.Text.Lazy as LT

readLines filePath = do
    contents <- Data.Text.Lazy.IO.readFile filePath
    let lines = concat (map LT.toChunks (LT.lines contents))
    return lines

readLines filePath = do
    contents <- Data.Text.Lazy.IO.readFile filePath
    let lines = concat (map LT.toChunks (LT.lines contents))
    return lines

readLines filePath = do
    contents <- Data.Text.Lazy.IO.readFile filePath
    let lines = map (T.concat . LT.toChunks) (LT.lines contents)
    return lines