#gosh> (library-for-each "**/*" (^(x y) (if (#/^.*mop.*/ x) (print x))))
#<undef>
gosh> (library-for-each "gauche/**/*" (^(x y) (if (#/^.*mop.*/ x) (print x))))
gauche/mop/instance-pool
gauche/mop/validator
gauche/mop/singleton
gauche/mop/propagate
#<undef>
gosh>
#library-for-eachで"**/*"を指定した場合の解釈はロードパス直下のディレクトリを再帰的に読むのかとおもっていたのですが・・・・
#どうすれば、全部のモジュールをみることができるのでしょうか？
#ソースを読んで見ました。library-for-eachでは"**"は特別な意味のないパタンなんですね。
#library-for-eachとかは、現在のglobが出来る前に書いたものなんで独自に検索してますが、今となってはglobで書き直してもいいかなあ。
#sf.netがリポジトリのアップグレードを行っていて、GaucheのgitリポジトリのURLが変わります。以前のURLでもread onlyで参照できますが、新たなコミットは新リポジトリの方にしか反映されません。移行が完了したらpractical-scheme.netの方で新URLをお知らせします。
#gosh> (regexp-compile '(0 #f (1 a #\b)))
#/(?<a>b)/
gosh> ((#/(?<a>b)/ "b") 'a)
"b"
gosh> (((regexp-compile '(0 #f (1 a #\b))) "b") 'a)
*** ERROR: named submatch not found: a
#バグってるんでしょうか？
#む、バグってますね。
Gauche > Archives > 2013/04/16