リーダーマクロ
CommonLispはmake-dispatch-macro-characterとかset-dispatch-macro-characterを使って定義するようだ。
Gaucheにはこういう機能はないのかな？
最近さわっている Ruby のブロックを参考に，Common Lisp のリーダーマクロを使って
http://www.geocities.co.jp/SiliconValley-SanJose/7474/cmuclMemo.html#0013
(mapcar (lambda (x) (* x x)) '(1 2 3 4 5))
を
(mapcar {|x| (* x x)} '(1 2 3 4 5))
と書けるようにしてみた．一応，タイプ数は節約できるが…．微妙だ…．
(make-dispatch-macro-character #\{)
(set-dispatch-macro-character #\{ #\|
