/ Check-in [e4e99606]
Login

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

Overview
Comment:Do not run multi-threaded Tcl tests if the library was built with SQLITE_MUTEX_NOOP defined.
Downloads: Tarball | ZIP archive | SQL archive
Timelines: family | ancestors | descendants | both | trunk
Files: files | file ages | folders
SHA1: e4e99606fdf1f1cecf914dc865b066bf07793d1f
User & Date: dan 2011-04-07 10:09:00
Context
2011-04-07
14:05
Avoid running thread1.test or thread2.test if SQLITE_MUTEX_NOOP is defined. check-in: 532ae32e user: dan tags: trunk
10:09
Do not run multi-threaded Tcl tests if the library was built with SQLITE_MUTEX_NOOP defined. check-in: e4e99606 user: dan tags: trunk
05:17
Fix test script attach4.test so that it works with type 1 VFS implementations (no wal). And wal.test so that it work with a small default pager cache size. check-in: 29c7b425 user: dan tags: trunk
Changes
Hide Diffs Side-by-Side Diffs Ignore Whitespace Patch

Changes to src/test_config.c.

    86     86   #endif
    87     87   
    88     88   #ifdef SQLITE_MUTEX_OMIT
    89     89     Tcl_SetVar2(interp, "sqlite_options", "mutex", "0", TCL_GLOBAL_ONLY);
    90     90   #else
    91     91     Tcl_SetVar2(interp, "sqlite_options", "mutex", "1", TCL_GLOBAL_ONLY);
    92     92   #endif
           93  +
           94  +#ifdef SQLITE_MUTEX_NOOP
           95  +  Tcl_SetVar2(interp, "sqlite_options", "mutex_noop", "1", TCL_GLOBAL_ONLY);
           96  +#else
           97  +  Tcl_SetVar2(interp, "sqlite_options", "mutex_noop", "0", TCL_GLOBAL_ONLY);
           98  +#endif
    93     99   
    94    100   #ifdef SQLITE_OMIT_ALTERTABLE
    95    101     Tcl_SetVar2(interp, "sqlite_options", "altertable", "0", TCL_GLOBAL_ONLY);
    96    102   #else
    97    103     Tcl_SetVar2(interp, "sqlite_options", "altertable", "1", TCL_GLOBAL_ONLY);
    98    104   #endif
    99    105   

Changes to test/thread_common.tcl.

    85     85   
    86     86   # Return true if this build can run the multi-threaded tests.
    87     87   #
    88     88   proc run_thread_tests {{print_warning 0}} {
    89     89     ifcapable !mutex { 
    90     90       set zProblem "SQLite build is not threadsafe"
    91     91     }
           92  +  ifcapable mutex_noop { 
           93  +    set zProblem "SQLite build uses SQLITE_MUTEX_NOOP"
           94  +  }
    92     95     if {[info commands sqlthread] eq ""} {
    93     96       set zProblem "SQLite build is not threadsafe"
    94     97     }
    95     98     if {![info exists ::tcl_platform(threaded)]} {
    96     99       set zProblem "Linked against a non-threadsafe Tcl build"
    97    100     }
    98    101     if {[info exists zProblem]} {