tsdbg TinyScheme 用デバッグ extension

TinySCHEME のソースを読む機会があったので、内部のセルがどうなっているか調べるために extension を作った。

git clone git://git.code.sf.net/p/tsdbg/code tsdbg-code

セルを再帰的に表示したり、graphviz dot ファイルへ変換したりすることが出来る。

ts> (load-extension "tsdbg/tsdbg")
ts >(define counter
        (let ((c 0))
                (lambda ()
                        (set! c (+ c 1))
                        c )))
counter
ts> (cell-to-dot counter "counter.dot")
#t
ts> (quit)

$ dot counter.dot -Tpng -o counter.png

得られる画像はこんな感じ：