R6RS の Records の参考実装を読んでいたら見つけた。 (define-syntax define-alist-extractor (syntax-rules () ((define-alist-extractor ?name ?name/cps ?tag ?default) (begin (define-syntax ?name/cps (syntax-rules (?tag) ((?name/cps () ?k . ?ran…

楽天など多くのメルマガがメールボックスに訪れて、必要なメールの邪魔をするようになってきた。 5分ほど頑張って、購読停止したらスッキリ。 特に楽天のメルマガはまとめて購読停止ができるし良心的だと思った。（その分購入時に、メルマガを受け取るがデフ…