Berkeley DB のテストってどうなってんのかなーと思ったら tcl で書かれてた。 12 proc dead003 { { procs "2 4 10" } {tests "ring clump" } } { 13 source ./include.tcl 14 15 set detects { oldest youngest } 16 puts "Dead003: Deadlock detector test…