call-with-input-stringとcall-with-output-stringを使ってwrite-to-stringとread-drom-stringを実装する． ポートの挙動がよくわかってなかったので苦戦した． こういう時にREPLはありがたい． (define (write-to-string arg) (call-with-output-string (la…