Lines Matching refs:fd
18 set fd [open $sqlfile r]
19 set sql [string trim [read $fd [file size $sqlfile]]]
20 close $fd
70 set fd [open clear.sql w]
71 puts $fd {
75 close $fd
78 set fd [open 2kinit.sql w]
79 puts $fd {
83 close $fd
86 set fd [open nosync-init.sql w]
87 puts $fd {
91 close $fd
121 set fd [open test$cnt.sql w]
122 puts $fd "BEGIN;"
123 puts $fd "CREATE TABLE t1(a INTEGER, b INTEGER, c VARCHAR(100));"
126 puts $fd "INSERT INTO t1 VALUES($i,$r,'[number_name $r]');"
128 puts $fd "COMMIT;"
129 close $fd
133 set fd [open test$cnt.sql w]
134 puts $fd "DELETE FROM t1;"
135 close $fd
139 set fd [open test$cnt.sql w]
140 puts $fd "BEGIN;"
143 puts $fd "INSERT INTO t1 VALUES($i,$r,'[number_name $r]');"
145 puts $fd "COMMIT;"
146 close $fd
150 set fd [open test$cnt.sql w]
151 puts $fd "DELETE FROM t1;"
152 close $fd
156 set fd [open test$cnt.sql w]
157 puts $fd "BEGIN;"
160 puts $fd "INSERT INTO t1 VALUES($i,$r,'[number_name $r]');"
162 puts $fd "COMMIT;"
163 close $fd
167 set fd [open test$cnt.sql w]
168 puts $fd "DELETE FROM t1;"
169 close $fd
173 set fd [open test$cnt.sql w]
174 puts $fd "BEGIN;"
177 puts $fd "INSERT INTO t1 VALUES($i,$r,'[number_name $r]');"
179 puts $fd "COMMIT;"
180 close $fd
184 set fd [open test$cnt.sql w]
185 puts $fd "DELETE FROM t1;"
186 close $fd
190 set fd [open test$cnt.sql w]
191 puts $fd "BEGIN;"
194 puts $fd "INSERT INTO t1 VALUES($i,$r,'[number_name $r]');"
196 puts $fd "COMMIT;"
197 close $fd
201 set fd [open test$cnt.sql w]
202 puts $fd "DELETE FROM t1;"
203 close $fd
207 set fd [open test$cnt.sql w]
208 puts $fd {DROP TABLE t1;}
209 close $fd