/ Check-in [dd248c18]
Login

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

Overview
Comment:Tweaks to wapptest.tcl: Ensure that the "Debug" checkbox is disabled unless the app is in "config" state, and have Debug variants run "test" instead of "fulltest".
Downloads: Tarball | ZIP archive | SQL archive
Timelines: family | ancestors | descendants | both | trunk
Files: files | file ages | folders
SHA3-256: dd248c186a157b5ed60bbdae669b31237b8354c1a7e6ed64d377904043bd57ee
User & Date: dan 2019-04-12 13:40:54
Context
2019-04-12
16:25
Test case changes so that they work with both Tcl8.6 and Tcl8.7. check-in: 7b771405 user: drh tags: trunk
13:40
Tweaks to wapptest.tcl: Ensure that the "Debug" checkbox is disabled unless the app is in "config" state, and have Debug variants run "test" instead of "fulltest". check-in: dd248c18 user: dan tags: trunk
12:10
Fix minor problems in tcl test scripts. check-in: 56b66418 user: dan tags: trunk
Changes
Hide Diffs Side-by-Side Diffs Ignore Whitespace Patch

Changes to test/wapptest.tcl.

   131    131         set exclude [list checksymbols valgrindtest fuzzoomtest]
   132    132         if {$G(debug) && !($target in $exclude)} {
   133    133           set debug_idx [lsearch -glob $::Configs($config) -DSQLITE_DEBUG*]
   134    134           set xtarget $target
   135    135           regsub -all {fulltest[a-z]*} $xtarget test xtarget
   136    136           if {$debug_idx<0} {
   137    137             lappend G(test_array) [
   138         -            dict create config $config-(Debug) target $target
          138  +            dict create config $config-(Debug) target $xtarget
   139    139             ]
   140    140           } else {
   141    141             lappend G(test_array) [
   142    142               dict create config $config-(NDebug) target $xtarget
   143    143             ]
   144    144           }
   145    145         }
................................................................................
   604    604       elem = document.getElementById("control_debug");
   605    605       elem.checked = %string($debug);
   606    606     }
   607    607   
   608    608     if {$script != "config.js"} {
   609    609       wapp-subst {
   610    610         var lElem = \["control_platform", "control_test", 
   611         -          "control_tcl", "control_keep", "control_msvc"
          611  +          "control_tcl", "control_keep", "control_msvc", 
          612  +          "control_debug"
   612    613         \];
   613    614         lElem.forEach(function(e) {
   614    615           var elem = document.getElementById(e);
   615    616           elem.disabled = true;
   616    617         })
   617    618       }
   618    619     }