プログラミングGauche 14.3.2練習問題
call-with-input-string
とcall-with-output-string
を使ってwrite-to-string
とread-drom-string
を実装する.
ポートの挙動がよくわかってなかったので苦戦した.
こういう時にREPLはありがたい.
(define (write-to-string arg) (call-with-output-string (lambda (port) (write arg port)))) (define (read-from-string string) (call-with-input-string string read))