我想象一个函数，形如 takeChunkUntil :: [a] -> ([a] -> Bool) -> ([a], [a]) 希望是惰性的。 它从第一个列表中取出元素，直到它们满足谓词，然后返回该子列表以及剩余的元素。 回答一些问题： 最终目标是制作一个可以懒惰地读取Huffman...