ファイルに追記する


Tags: 入出力, R6RS

ファイルに追記する

ファイルを入出力両用ポートとして開き、 get-string-all / get-bytevector-all 手続きでファイル位置をファイル終端に移動させてから書き込みを行なう。

(import (rnrs))

(call-with-port
  (open-file-input/output-port
    "/path/to/text"
    (file-options no-fail no-truncate)
    (buffer-mode block)
    (make-transcoder (latin-1-codec)))
  (lambda (port)
    (get-string-all port)
    (put-string port "\nabc\n")))