プログラミング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))