1
0
mirror of https://github.com/sqlite/sqlite.git synced 2025-07-30 19:03:16 +03:00

On instruction from DRH, only do malloc failure tests for O/S ops on non-Windows systems. Better test fixture code will be introduced in 3.6.0 to add this coverage back in for Windows. (CVS 5130)

FossilOrigin-Name: e4aab150042bd22868ab02645151cb69a1c02ba0
This commit is contained in:
shane
2008-05-13 19:41:53 +00:00
parent cec3e3eeaa
commit d3638aef0b
4 changed files with 13 additions and 16 deletions

View File

@ -13,7 +13,7 @@
# correctly. The emphasis of these tests are the _prepare(), _step() and
# _finalize() calls.
#
# $Id: malloc3.test,v 1.22 2008/05/13 13:27:34 drh Exp $
# $Id: malloc3.test,v 1.23 2008/05/13 19:41:54 shane Exp $
set testdir [file dirname $argv0]
source $testdir/tester.tcl
@ -562,18 +562,15 @@ proc run_test {arglist iRepeat {pcstart 0} {iFailStart 1}} {
set ::rollback_hook_count 0
set ac [sqlite3_get_autocommit $::DB] ;# Auto-Commit
if {$iterid=="pc=4.iFail=44-sql"} breakpoint
sqlite3_memdebug_fail $iFail -repeat 0
#puts sql=[lindex $v 1]
set rc [catch {db eval [lindex $v 1]} msg] ;# True error occurs
#puts "rc=$rc msg=$msg"
set nac [sqlite3_get_autocommit $::DB] ;# New Auto-Commit
if {$rc != 0 && $nac && !$ac} {
# Before [db eval] the auto-commit flag was clear. Now it
# is set. Since an error occured we assume this was not a
# commit - therefore a rollback occured. Check that the
# rollback-hook was invoked.
# commit - therefore a rollback occured. Check that the
# rollback-hook was invoked.
do_test malloc3-rollback_hook.$iterid {
set ::rollback_hook_count
} {1}