如何以追加模式寫入文件-scheme R5RS？

Question

(call-with-output-file "b.txt" 
(lambda (output-port) 
(display "hello, world" output-port))) 

如何以追加模式打開b.txt。所以，我的結果將被附加在文本文件中。我在下面找到了一些答案。但那不是我所期望的。

Append in scheme

我想用「呼叫與輸出文件」的工作。因爲我覺得這個工作正常。通過這個調用輸出文件，我該如何追加？

Answer 1

您提到的鏈接提供了正確的解決方案。在guile中，ÓscarLópez的建議無效，因爲其call-with-output-file沒有#:exists關鍵字。然而，這應該工作：

(let ((output-port (open-file "my.txt" "a"))) 
    (display "hello, world" output-port) 
    (newline output-port) 
    (close output-port)) 

你可以找到call-with-output-file的代碼ice-9/boot-9。將其擴展以支持附加將很容易。