Lines Matching refs:set
18 set testdir [file dirname $argv0]
24 set txt [$db eval {SELECT name, type, sql FROM sqlite_master}]\n
31 set cksum [string length $txt]-[md5 $txt]
42 set orig_sum [cksum]
43 set i $initcnt
47 set sqlite_interrupt_count $i
49 set ::r [catchsql %s]
50 set ::code [db errorcode]
59 set ::r
64 set sqlite_interrupt_count 0
97 set origsize [file size test.db]
98 set cksum [db eval {SELECT md5sum(a || b) FROM t1}]
114 for {set i 1} {$i<50} {incr i 5} {
123 set ::sqlite_interrupt_count $::i
154 set sql {
157 set sqlite_interrupt_count 1000000
159 set max_count [expr {1000000-$sqlite_interrupt_count}]
160 for {set i 1} {$i<$max_count-5} {incr i 1} {
162 set ::sqlite_interrupt_count $::i