/ Check-in [fa8c1292]
Login

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

Overview
Comment:More file pathname normalization.
Downloads: Tarball | ZIP archive | SQL archive
Timelines: family | ancestors | descendants | both | test-in-subdir
Files: files | file ages | folders
SHA1: fa8c12921f8361f1889724bb7c5f7eca9c48b075
User & Date: drh 2016-03-14 14:59:35
Context
2016-03-14
15:03
Run TCL tests in the "testdir" subdirectory. check-in: 90e0cc7b user: drh tags: trunk
14:59
More file pathname normalization. Closed-Leaf check-in: fa8c1292 user: drh tags: test-in-subdir
14:28
Normalize the $testdir and $argv0 paths so that they continue to work in the testing subdirectory. check-in: 19225b81 user: drh tags: test-in-subdir
Changes
Hide Diffs Side-by-Side Diffs Ignore Whitespace Patch

Changes to test/tester.tcl.

   453    453         }
   454    454         {^-+backtrace=.+$} {
   455    455           foreach {dummy cmdlinearg(backtrace)} [split $a =] break
   456    456           sqlite3_memdebug_backtrace $value
   457    457         }
   458    458         {^-+binarylog=.+$} {
   459    459           foreach {dummy cmdlinearg(binarylog)} [split $a =] break
          460  +        set cmdlinearg(binarylog) [file normalize $cmdlinearg(binarylog)]
   460    461         }
   461    462         {^-+soak=.+$} {
   462    463           foreach {dummy cmdlinearg(soak)} [split $a =] break
   463    464           set ::G(issoak) $cmdlinearg(soak)
   464    465         }
   465    466         {^-+file-retries=.+$} {
   466    467           foreach {dummy cmdlinearg(file-retries)} [split $a =] break
................................................................................
   485    486   
   486    487           set ::G(match) $cmdlinearg(match)
   487    488           if {$::G(match) == ""} {unset ::G(match)}
   488    489         }
   489    490   
   490    491         {^-+output=.+$} {
   491    492           foreach {dummy cmdlinearg(output)} [split $a =] break
          493  +        set cmdlinearg(output) [file normalize $cmdlinearg(output)]
   492    494           if {$cmdlinearg(verbose)==""} {
   493    495             set cmdlinearg(verbose) 2
   494    496           }
   495    497         }
   496    498         {^-+verbose=.+$} {
   497    499           foreach {dummy cmdlinearg(verbose)} [split $a =] break
   498    500           if {$cmdlinearg(verbose)=="file"} {