Lines Matching refs:sql
15 set sqlfile test$cnt.sql
19 set sql [string trim [read $fd [file size $sqlfile]]]
21 set sx [split $sql \n]
24 set sql {}
25 for {set i 0} {$i<3} {incr i} {append sql [lindex $sx $i]<br>\n}
26 append sql "<i>... [expr {$n-6}] lines omitted</i><br>\n"
28 append sql [lindex $sx $i]<br>\n
31 regsub -all \n [string trim $sql] <br> sql
34 puts "$sql"
70 set fd [open clear.sql w]
76 catch {exec psql drh <clear.sql}
77 catch {exec mysql drh <clear.sql}
78 set fd [open 2kinit.sql w]
84 exec ./sqlite240 s2k.db <2kinit.sql
85 exec ./sqlite-t1 st1.db <2kinit.sql
86 set fd [open nosync-init.sql w]
92 exec ./sqlite240 sns.db <nosync-init.sql
121 set fd [open test$cnt.sql w]
133 set fd [open test$cnt.sql w]
139 set fd [open test$cnt.sql w]
150 set fd [open test$cnt.sql w]
156 set fd [open test$cnt.sql w]
167 set fd [open test$cnt.sql w]
173 set fd [open test$cnt.sql w]
184 set fd [open test$cnt.sql w]
190 set fd [open test$cnt.sql w]
201 set fd [open test$cnt.sql w]
207 set fd [open test$cnt.sql w]