syntax-rules: across （Clojure の .. ぽいもの）

プログラミングClojure P.62～ 「Clojure から Java を使う」より。

(.getLocation (.getCodeSource (.getProtectionDomain (.getClass '(1 2)))))

が

(.. '(1 2) getClass getProtectionDomain getCodeSource getLocation)

と書けますよーということのようです。

Java だと

'(1 2).getClass().getProtectionDomain().getCodeSourse().getLocation();

みたいなイメージで良いんでしょうかね。


scheme (gauche) の syntax-rules で書くと下記のような感じでしょうか。
良い名前が思いつきませんでした。当初は chain にしてましたが、なんとなく across に変えました。。

書いてみたコードは以下のようなもの。

追記

本家ソースはこれかな。

• src/clj/clojure/core.clj at master from richhickey's clojure - GitHub

追記2

コメント欄で教えていただきました！名前が良いなぁ。

• 2009-08-28 - d.hatena.ne.jp/mtakuya/

let1 要らないですね。。