Return to mem5.test CVS log

Up to [ELWIX - Embedded LightWeight unIX -] / embedaddon / sqlite3 / test

Annotation of embedaddon/sqlite3/test/mem5.test, revision 1.1.1.1

1.1       misho       1: # 2011 March 9
                      2: #
                      3: # The author disclaims copyright to this source code.  In place of
                      4: # a legal notice, here is a blessing:
                      5: #
                      6: #    May you do good and not evil.
                      7: #    May you find forgiveness for yourself and forgive others.
                      8: #    May you share freely, never taking more than you give.
                      9: #
                     10: #***********************************************************************
                     11: #
                     12: # This file contains tests of the mem5 allocation subsystem.
                     13: #
                     14: 
                     15: set testdir [file dirname $argv0]
                     16: source $testdir/tester.tcl
                     17: 
                     18: ifcapable !mem5 {
                     19:   finish_test
                     20:   return
                     21: }
                     22: 
                     23: # The tests in this file configure the lookaside allocator after a 
                     24: # connection is opened. This will not work if there is any "presql"
                     25: # configured (SQL run within the [sqlite3] wrapper in tester.tcl).
                     26: if {[info exists ::G(perm:presql)]} {
                     27:   finish_test
                     28:   return
                     29: }
                     30: 
                     31: do_test mem5-1.1 {
                     32:   catch {db close}
                     33:   sqlite3_shutdown
                     34:   sqlite3_config_heap 25000000 0
                     35:   sqlite3_config_lookaside 0 0
                     36:   sqlite3_initialize
                     37: } {SQLITE_OK}
                     38: 
                     39: # try with min request size = 2^30
                     40: do_test mem5-1.2 {
                     41:   catch {db close}
                     42:   sqlite3_shutdown
                     43:   sqlite3_config_heap 1 1073741824
                     44:   sqlite3_config_lookaside 0 0
                     45:   sqlite3_initialize
                     46: } {SQLITE_NOMEM}
                     47: 
                     48: # try with min request size = 2^30+1
                     49: # previously this was causing the memsys5Log() func to infinitely loop.
                     50: do_test mem5-1.3 {
                     51:   catch {db close}
                     52:   sqlite3_shutdown
                     53:   sqlite3_config_heap 1 1073741825
                     54:   sqlite3_config_lookaside 0 0
                     55:   sqlite3_initialize
                     56: } {SQLITE_NOMEM}
                     57: 
                     58: do_test mem5-1.4 {
                     59:   catch {db close}
                     60:   sqlite3_shutdown
                     61:   sqlite3_config_heap 0 0
                     62:   sqlite3_config_lookaside 0 0
                     63:   sqlite3_initialize
                     64: } {SQLITE_OK}
                     65: 
                     66: finish_test