読めるようになりました。 http://json.org/ にリンクがありますが、MzScheme 用 JSON ライブラリを使っています。 使い方は簡単で、json-read という関数に JSON データの入力ポートを渡すだけです。抜粋: (define (api-post api post-data) (let ((in (post-pure-port (string->url (string-append "http://reader.livedoor.com" api)) (string->bytes/utf-8 (alist->form-urlencoded (cons (cons 'ApiKey (api-key)) (or (fix-data post-data) '())))) (list (cookie) "Content-Type: application/x-www
![Scheme で livedoor Reader を - (new Hatena).blog()](https://cdn-ak-scissors.b.st-hatena.com/image/square/90edc748e7ee093f69a36c123d5d83e27283e4b1/height=288;version=1;width=512/http%3A%2F%2Ffarm3.static.flickr.com%2F2166%2F1952574523_d3a8d07a60_o.png)