Lines Matching refs:fd

15   set fd [open $sqlfile r]
16 set sql [string trim [read $fd [file size $sqlfile]]]
17 close $fd
67 set fd [open clear.sql w]
68 puts $fd {
72 close $fd
75 set fd [open 2kinit.sql w]
76 puts $fd {
80 close $fd
83 set fd [open nosync-init.sql w]
84 puts $fd {
88 close $fd
118 set fd [open test$cnt.sql w]
119 puts $fd "BEGIN;"
120 puts $fd "CREATE TABLE t1(a INTEGER, b INTEGER, c VARCHAR(100));"
123 puts $fd "INSERT INTO t1 VALUES($i,$r,'[number_name $r]');"
125 puts $fd "COMMIT;"
126 close $fd
130 set fd [open test$cnt.sql w]
131 puts $fd "DELETE FROM t1;"
132 close $fd
136 set fd [open test$cnt.sql w]
137 puts $fd "BEGIN;"
140 puts $fd "INSERT INTO t1 VALUES($i,$r,'[number_name $r]');"
142 puts $fd "COMMIT;"
143 close $fd
147 set fd [open test$cnt.sql w]
148 puts $fd "DELETE FROM t1;"
149 close $fd
153 set fd [open test$cnt.sql w]
154 puts $fd "BEGIN;"
157 puts $fd "INSERT INTO t1 VALUES($i,$r,'[number_name $r]');"
159 puts $fd "COMMIT;"
160 close $fd
164 set fd [open test$cnt.sql w]
165 puts $fd "DELETE FROM t1;"
166 close $fd
170 set fd [open test$cnt.sql w]
171 puts $fd "BEGIN;"
174 puts $fd "INSERT INTO t1 VALUES($i,$r,'[number_name $r]');"
176 puts $fd "COMMIT;"
177 close $fd
181 set fd [open test$cnt.sql w]
182 puts $fd "DELETE FROM t1;"
183 close $fd
187 set fd [open test$cnt.sql w]
188 puts $fd "BEGIN;"
191 puts $fd "INSERT INTO t1 VALUES($i,$r,'[number_name $r]');"
193 puts $fd "COMMIT;"
194 close $fd
198 set fd [open test$cnt.sql w]
199 puts $fd "DELETE FROM t1;"
200 close $fd
204 set fd [open test$cnt.sql w]
205 puts $fd {DROP TABLE t1;}
206 close $fd