Използвам TinyScheme (всъщност Script-Fu в GIMP) и не мога да намеря добър начин да отворя файл и да добавя ред текст към него.
Опитвам се да запиша някаква информация във файла за отстраняване на грешки и изглежда, че включването на препис не се прилага...
Точно сега аз изтривам, като чета целия файл (по един символ!), обединявам го в низ, обединявам текста си до края на това, след което го записвам отново във файла.
Трябва да има по-добър начин!
Ще бъде нещо като
(open-file "myfile" (file-options append))
Искате да потърсите функцията file-options.
Ето версията на guile:
(open-file "myfilename.dat" "a")
Просто имах точно същия проблем в 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 във файл.
