新しいプロファイラ便利!

letrec や named-let など名前を持たない、無名のクロージャの呼び出しも、引数の名前やソースコード中の行番号が分かるので特定できるよ。
自分をほめてあげたい。偉い。

time%        msec      calls   name                              location
  27         3510        190   (lambda x y)                      compiler-with-library.scm:8458
   8         1140     143356   (lambda i)                        compiler-with-library.scm:9644
   8         1110       4039   (pass3/$lambda iform loca...)     compiler-with-library.scm:9213
   7          990          -   (<top-level>)
   5          650       8456   (pass3/$call iform locals...)     compiler-with-library.scm:9064
   3          500     197791   (lambda s)                        compiler-with-library.scm:9682
   2          290     811697   (set-intersect lst1 lst2)         compiler-with-library.scm:5270
   1          220        198   (lambda lst1 lst2)                compiler-with-library.scm:5249
   1          200          2   (lambda x y)                      compiler-with-library.scm:8449
   1          190      38872   (lambda i l labels-seen)          compiler-with-library.scm:8318
   1          180          1   (lambda i code)                   compiler-with-library.scm:9072
   1          170      42257   (pass1/sexp->iform sexp l...)     compiler-with-library.scm:7074
   1          160          1   (lambda i code)                   compiler-with-library.scm:9072
   1          150        197   (lambda x lst)                    compiler-with-library.scm:5246
   1          140        215   (lambda i)                        compiler-with-library.scm:8401
   1          130       2788   (pass3/$if iform locals f...)     compiler-with-library.scm:8921
   1          130        192   (lambda x lst)                    compiler-with-library.scm:5246
   0          110        159   (pass3/$let iform locals ...)     compiler-with-library.scm:9276
   0          110        195   (lambda lst1 lst2)                compiler-with-library.scm:5249
   0           90        197   (lambda lst1 lst2)                compiler-with-library.scm:5249
   0           80      49038   (pass1/expand sexp)               compiler-with-library.scm:6327
   0           60     104861   (generic-assoc releq obj ...)     compiler-with-library.scm:1234
   0           50        351   (pass3/$local-assign ifor...)     compiler-with-library.scm:8634