Lines Matching full:code2
70 proc code2 {tcl} { uplevel #0 $tcl }
71 if {$bin1 != ""} { proc code2 {tcl} { testfixture $::bc_chan1 $tcl } }
76 proc code2 {tcl} { testfixture $::bc_chan2 $tcl }
80 proc sql2 sql { code2 [list db eval $sql] }
83 code2 { sqlite3 db test.db }
88 catch { code2 { db close } }
217 code2 { db close }
220 code2 { sqlite3 db test.db }
240 && [code2 {sqlite3 -version}] >= "3.7.0"
257 code2 {db close}
260 code2 {sqlite3 db test.db}
263 # process. Check that the [code2] process can recover the log.
296 && [code2 {set ::sqlite_options(fts3)}]
417 && [code2 {set ::sqlite_options(fts3)}]
