/ Check-in [8dcb9d50]
Login

Many hyperlinks are disabled.
Use anonymous login to enable hyperlinks.

Overview
Comment:Minor test infrastructure changes to better support SEE testing.
Downloads: Tarball | ZIP archive | SQL archive
Timelines: family | ancestors | descendants | both | trunk
Files: files | file ages | folders
SHA1: 8dcb9d506b5eef3a21d97877217e0df69966a915
User & Date: drh 2016-07-25 16:10:43
Context
2016-07-25
21:11
Fix a test case in FTS5 to make it compatible with Tcl 8.5. check-in: a495f8e7 user: drh tags: trunk
17:31
Merge 3.14 alpha changes from trunk. check-in: e98cefb1 user: drh tags: apple-osx
16:10
Minor test infrastructure changes to better support SEE testing. check-in: 8dcb9d50 user: drh tags: trunk
14:40
Add a new %ifdef to parse.y so that the build works with SQLITE_OMIT_SUBQUERY. check-in: 38a48cfb user: drh tags: trunk
Changes
Hide Diffs Unified Diffs Show Whitespace Changes Patch

Changes to test/tester.tcl.

369
370
371
372
373
374
375

376
377
378
379
380
381
382
# This command should be called after loading tester.tcl from within
# all test scripts that are incompatible with encryption codecs.
#
proc do_not_use_codec {} {
  set ::do_not_use_codec 1
  reset_db
}


# Return true if the "reserved_bytes" integer on database files is non-zero.
#
proc nonzero_reserved_bytes {} {
  return [sqlite3 -has-codec]
}








>







369
370
371
372
373
374
375
376
377
378
379
380
381
382
383
# This command should be called after loading tester.tcl from within
# all test scripts that are incompatible with encryption codecs.
#
proc do_not_use_codec {} {
  set ::do_not_use_codec 1
  reset_db
}
unset -nocomplain do_not_use_codec

# Return true if the "reserved_bytes" integer on database files is non-zero.
#
proc nonzero_reserved_bytes {} {
  return [sqlite3 -has-codec]
}

Changes to test/walcrash4.test.

13
14
15
16
17
18
19

20
21
22
23
24
25
26

set testdir [file dirname $argv0]
source $testdir/tester.tcl
source $testdir/lock_common.tcl
source $testdir/wal_common.tcl
ifcapable !wal {finish_test ; return }
set testprefix walcrash4


#-------------------------------------------------------------------------
# At one point, if "PRAGMA synchronous=full" is set and the platform
# does not support POWERSAFE_OVERWRITE, and the last frame written to 
# the wal file in a transaction is aligned with a sector boundary, the
# xSync() call was omitted. 
#







>







13
14
15
16
17
18
19
20
21
22
23
24
25
26
27

set testdir [file dirname $argv0]
source $testdir/tester.tcl
source $testdir/lock_common.tcl
source $testdir/wal_common.tcl
ifcapable !wal {finish_test ; return }
set testprefix walcrash4
do_not_use_codec

#-------------------------------------------------------------------------
# At one point, if "PRAGMA synchronous=full" is set and the platform
# does not support POWERSAFE_OVERWRITE, and the last frame written to 
# the wal file in a transaction is aligned with a sector boundary, the
# xSync() call was omitted. 
#