diff options
| author | danielk1977 <danielk1977@noemail.net> | 2007-08-25 13:37:48 +0000 |
|---|---|---|
| committer | danielk1977 <danielk1977@noemail.net> | 2007-08-25 13:37:48 +0000 |
| commit | 222a757dbad4a7b72d9b425ea2c4db05eafe52cd (patch) | |
| tree | 4a0d17aa0d18670c00e9625e5a8fc08dc4a6480f /test/fuzz_malloc.test | |
| parent | cdc3a6bcbc8e14cf9129bc96252128bee59b69b8 (diff) | |
| download | sqlite-222a757dbad4a7b72d9b425ea2c4db05eafe52cd.tar.gz sqlite-222a757dbad4a7b72d9b425ea2c4db05eafe52cd.zip | |
Update the rest of the malloc failure test scripts to use the new interface. (CVS 4296)
FossilOrigin-Name: b076e1655d6bae5ae10e6ceee646f502435da66a
Diffstat (limited to 'test/fuzz_malloc.test')
| -rw-r--r-- | test/fuzz_malloc.test | 16 |
1 files changed, 4 insertions, 12 deletions
diff --git a/test/fuzz_malloc.test b/test/fuzz_malloc.test index 30cdc50ae..4cf455684 100644 --- a/test/fuzz_malloc.test +++ b/test/fuzz_malloc.test @@ -12,21 +12,13 @@ # # This file tests malloc failures in concert with fuzzy SQL generation. # -# $Id: fuzz_malloc.test,v 1.5 2007/06/18 12:22:43 drh Exp $ +# $Id: fuzz_malloc.test,v 1.6 2007/08/25 13:37:49 danielk1977 Exp $ set testdir [file dirname $argv0] source $testdir/tester.tcl -# Only run these tests if memory debugging is turned on. -# -if {[info command sqlite_malloc_stat]==""} { - puts "Skipping fuzz_malloc tests: not compiled with -DSQLITE_MEMDEBUG=1" - finish_test - return -} - -source $testdir/fuzz_common.tcl source $testdir/malloc_common.tcl +source $testdir/fuzz_common.tcl if {[info exists ISQUICK]} { set ::REPEATS 20 @@ -48,7 +40,7 @@ proc do_fuzzy_malloc_test {testname args} { set ::fuzzyopts(-sqlprep) {} array set ::fuzzyopts $args - sqlite_malloc_fail 0 + sqlite3_memdebug_fail -1 0 db close file delete test.db test.db-journal sqlite3 db test.db @@ -93,5 +85,5 @@ do_fuzzy_malloc_test fuzzy_malloc-3 \ -template {[Select]} \ -sqlprep $::SQLPREP -sqlite_malloc_fail 0 +sqlite3_memdebug_fail -1 0 finish_test |