Как добавить файл в схему?

Question

Я использую TinyScheme (на самом деле Script-Fu в GIMP) и не могу найти хороший способ открыть файл и добавить к нему строку текста.

Я пытаюсь записать некоторую информацию в файл для отладки, и запись не включена ...

Прямо сейчас я разбираюсь, читая весь файл (по одному символу за раз!), Объединяю его в строку, объединяю мой текст до конца, а затем снова записываю все это в файл. *

Должен быть лучший способ!

Answer 1

Это будет что-то вроде

(open-file "myfile" (file-options append))

Вы хотите посмотреть функцию file-options.

Обновление

Вот версия guile :

(open-file "myfilename.dat" "a")

Answer 2

Просто была та же самая проблема в GIMP и решил использовать open-input-output-file. Мое решение примерно так:

(let* ((out (open-input-output-file "file.txt") ))
  (display "hello world" out)
  (newline out)                    
  (close-output-port out))

Прошел через источник TinyScheme и проверил, что эта функция действительно вызывает fopen с "a+". Файл открыт для чтения и записи. Для наших целей мы хотим только писать, поэтому просто игнорируйте чтение.

Я пишу Script-Fu для записи значений gimp-selection-bounds в файл.