R5RS準拠バージョンのSchemeでテキストをファイルに出力する簡単な方法は何ですか? MIT の MEEP (スクリプトにスキームを使用) を使用しており、テキストをファイルに出力したいと考えています。Stackoverflow で次の他の回答を見つけました。
IronScheme の既存のテキストファイル [sic] に文字列を追加します
しかし、それらはまさに私が探していたものではありませんでした。
R5RS準拠バージョンのSchemeでテキストをファイルに出力する簡単な方法は何ですか? MIT の MEEP (スクリプトにスキームを使用) を使用しており、テキストをファイルに出力したいと考えています。Stackoverflow で次の他の回答を見つけました。
IronScheme の既存のテキストファイル [sic] に文字列を追加します
しかし、それらはまさに私が探していたものではありませんでした。
Charlie Martin、Ben Rudgers、および Vijay Mathew による回答は非常に役に立ちましたが、私のような新しいスキーマ担当者にとってシンプルで理解しやすい回答を提供したいと思います :)
; This call opens a file in the append mode (it will create a file if it doesn't exist)
(define my-file (open-file "my-file-name.txt" "a"))
; You save text to a variable
(define my-text-var1 "This is some text I want in a file")
(define my-text-var2 "This is some more text I want in a file")
; You can output these variables or just text to the file above specified
; You use string-append to tie that text and a new line character together.
(display (string-append my-text-var1 "\r\n" my-file))
(display (string-append my-text-var2 "\r\n" my-file))
(display (string-append "This is some other text I want in the file" "\r\n" my-file))
; Be sure to close the file, or your file will not be updated.
(close-output-port my-file)
また、「\r\n」全体に関する長引く質問については、次の回答を参照してください。
乾杯!