diff options
| author | drh <drh@noemail.net> | 2007-08-22 22:04:37 +0000 |
|---|---|---|
| committer | drh <drh@noemail.net> | 2007-08-22 22:04:37 +0000 |
| commit | ed138fb3bc8e55a6ae93669899dce79e5e26c65a (patch) | |
| tree | b47d13ffd4af69fc5372d4a2a845404079c7cc8b /test/malloc_common.tcl | |
| parent | f3a65f7e443865f00b6799ba9637604b0ae55dc5 (diff) | |
| download | sqlite-ed138fb3bc8e55a6ae93669899dce79e5e26c65a.tar.gz sqlite-ed138fb3bc8e55a6ae93669899dce79e5e26c65a.zip | |
All of the malloc test cases run. Still seeing failures in malloc4.test. (CVS 4272)
FossilOrigin-Name: 205d0b881d541db65837ce6cf44d58d607635bc2
Diffstat (limited to 'test/malloc_common.tcl')
| -rw-r--r-- | test/malloc_common.tcl | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/test/malloc_common.tcl b/test/malloc_common.tcl index 98e8b4892..c49f5ac61 100644 --- a/test/malloc_common.tcl +++ b/test/malloc_common.tcl @@ -48,6 +48,9 @@ proc do_malloc_test {tn args} { catch {file delete -force test.db-journal} catch {file delete -force test2.db} catch {file delete -force test2.db-journal} + if {[info exists ::mallocopts(-testdb)]} { + file copy $::mallocopts(-testdb) test.db + } catch {sqlite3 db test.db} # Execute any -tclprep and -sqlprep scripts. |