diff options
| author | shane <shane@noemail.net> | 2009-02-11 16:06:18 +0000 |
|---|---|---|
| committer | shane <shane@noemail.net> | 2009-02-11 16:06:18 +0000 |
| commit | ce14f6245e7a404e7a40b0c709583b70f4bf20c4 (patch) | |
| tree | dbee8d78df238492885c084d5c752ae37e8b5cbe /test/backup2.test | |
| parent | 46f33ef93c3b5d25d005a6a364a3a3d753ed491a (diff) | |
| download | sqlite-ce14f6245e7a404e7a40b0c709583b70f4bf20c4.tar.gz sqlite-ce14f6245e7a404e7a40b0c709583b70f4bf20c4.zip | |
Updated for Windows compatibility. Test scripts only. (CVS 6285)
FossilOrigin-Name: 2522ad1df3599fa71cd1d929142adaefaf3a4d67
Diffstat (limited to 'test/backup2.test')
| -rw-r--r-- | test/backup2.test | 24 |
1 files changed, 17 insertions, 7 deletions
diff --git a/test/backup2.test b/test/backup2.test index 6a7bc4f9f..2752bd53d 100644 --- a/test/backup2.test +++ b/test/backup2.test @@ -13,7 +13,7 @@ # of the TCL interface - methods which are based on the # sqlite3_backup_XXX API. # -# $Id: backup2.test,v 1.1 2009/02/04 22:46:47 drh Exp $ +# $Id: backup2.test,v 1.2 2009/02/11 16:06:19 shane Exp $ set testdir [file dirname $argv0] source $testdir/tester.tcl @@ -137,12 +137,22 @@ do_test backup2-9 { # Try to restore from an unreadable file. # -do_test backup2-10 { - file delete -force bu3.db - file mkdir bu3.db - set rc [catch {db restore temp bu3.db} res] - lappend rc $res -} {1 {cannot open source database: disk I/O error}} +if {$tcl_platform(platform)=="windows"} { + do_test backup2-10 { + file delete -force bu3.db + file mkdir bu3.db + set rc [catch {db restore temp bu3.db} res] + lappend rc $res + } {1 {cannot open source database: unable to open database file}} +} +if {$tcl_platform(platform)!="windows"} { + do_test backup2-10 { + file delete -force bu3.db + file mkdir bu3.db + set rc [catch {db restore temp bu3.db} res] + lappend rc $res + } {1 {cannot open source database: disk I/O error}} +} # Try to restore from something that is not a database file. # |