diff options
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. |