用于非字符串输入的appendFile函数

Question

我想写一个由元组列表组成的文件，但是appendFile需要字符串输入。我想我可以只保存元组或引用元组来对它们进行字符串化，并在以后保存它们；但是，我希望能够保存n元组的列表，以跳过“现在show，稍后read”部分。是否有appendFile函数的Show a=>FilePath -> a -> IO ()版本？

Answer 1

quick hoogle search表明没有类型为Show a => FilePath -> a -> IO ()的函数。然而，自己编写并不是很难：

showAppendFile :: Show a => FilePath -> a -> IO ()
showAppendFile p x = appendFile p (show x)