Gauche > Archives > 2012/04/13

2012/04/13 02:12:48 UTCとおる。
#
https://github.com/torus/Gauche なんとなく色付きでソースが見たくなったので、SourceForge のリポジトリのクローンを GitHub に置いてみました。気が向いたときに git pull origin && git push github とかやってます。
2012/04/13 04:49:37 UTC齊藤
#
gosh> (define-syntax foo (syntax-rules () [(_) (^x x)]))
#<undef>
gosh> (foo)
#<closure #f>
gosh> ((foo) 1)
*** ERROR: unbound variable: x
2012/04/13 04:54:38 UTC齊藤
#
すぐに顕在化するので致命的ではないですが、組み合わせに制約があるのは勝手が悪くはありますね。
2012/04/13 10:17:43 UTCshiro
#
そう、これもずっと気になってるんですよねー。我慢の限界を越えたら一気に書き直すかも。
2012/04/13 11:16:38 UTC齊藤
#
そういやちょっと違うパターンでこんなのもあったんだった。
#
gosh> (define-syntax foo
  (syntax-rules ()
    ((_)
     (letrec-syntax ((bar (syntax-rules ()((_)(baz))))
                     (baz (syntax-rules ()((_)'baz))))
       (bar)))))
#<undef>
gosh> (foo)
*** ERROR: unbound variable: baz