Many hyperlinks are disabled.
Use anonymous login
to enable hyperlinks.
Overview
| Comment: | Make sure SQLite is running with MEMSTATUS enabled at the beginning of every test script. |
|---|---|
| Downloads: | Tarball | ZIP archive | SQL archive |
| Timelines: | family | ancestors | descendants | both | apple-osx |
| Files: | files | file ages | folders |
| SHA1: | b6e9a4d8f7d8b683b4098270e0be149d |
| User & Date: | drh 2010-09-10 00:18:13 |
Context
|
2010-09-10
| ||
| 00:59 | replaced relative lock proxy paths with absolute check-in: 6a88cd46 user: adam tags: apple-osx | |
| 00:18 | Make sure SQLite is running with MEMSTATUS enabled at the beginning of every test script. check-in: b6e9a4d8 user: drh tags: apple-osx | |
|
2010-09-09
| ||
| 23:40 | Make sure MEMSTATUS is enabled at the beginning of the memsubsys2.test script. check-in: cf23a354 user: drh tags: apple-osx | |
Changes
Changes to test/memsubsys2.test.
12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 |
# This file contains tests of the memory allocation subsystem. # # $Id: memsubsys2.test,v 1.2 2008/08/12 15:21:12 drh Exp $ set testdir [file dirname $argv0] source $testdir/tester.tcl sqlite3_reset_auto_extension sqlite3_shutdown sqlite3_config_memstatus 1 sqlite3_initialize # This procedure constructs a new database in test.db. It fills # this database with many small records (enough to force multiple # rebalance operations in the btree-layer and to require a large # page cache), verifies correct results, then returns. # proc build_test_db {testname pragmas} { |
< < < |
12 13 14 15 16 17 18 19 20 21 22 23 24 25 |
# This file contains tests of the memory allocation subsystem.
#
# $Id: memsubsys2.test,v 1.2 2008/08/12 15:21:12 drh Exp $
set testdir [file dirname $argv0]
source $testdir/tester.tcl
sqlite3_reset_auto_extension
# This procedure constructs a new database in test.db. It fills
# this database with many small records (enough to force multiple
# rebalance operations in the btree-layer and to require a large
# page cache), verifies correct results, then returns.
#
proc build_test_db {testname pragmas} {
|
Changes to test/tester.tcl.
240 241 242 243 244 245 246 247 248 249 250 251 252 253 |
}
}
reset_db
# Abort early if this script has been run before.
#
if {[info exists TC(count)]} return
# Initialize the test counters and set up commands to access them.
# Or, if this is a slave interpreter, set up aliases to write the
# counters in the parent interpreter.
#
if {0==[info exists ::SLAVE]} {
set TC(errors) 0
|
> > > > |
240 241 242 243 244 245 246 247 248 249 250 251 252 253 254 255 256 257 |
}
}
reset_db
# Abort early if this script has been run before.
#
if {[info exists TC(count)]} return
# Make sure memory statistics are enabled.
#
sqlite3_config_memstatus 1
# Initialize the test counters and set up commands to access them.
# Or, if this is a slave interpreter, set up aliases to write the
# counters in the parent interpreter.
#
if {0==[info exists ::SLAVE]} {
set TC(errors) 0
|