非字符串输入的{appendFile函数

Question

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

Answer 1

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

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