Fossil

Check-in [be81a2fd]
Login

Check-in [be81a2fd]

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

Overview
Comment:The test file directory saved by the test suite infrastructure should be normalized.
Downloads: Tarball | ZIP archive | SQL archive
Timelines: family | ancestors | descendants | both | trunk
Files: files | file ages | folders
SHA1: be81a2fd3cd569d044cd94a0be8ce5e3c00448ef
User & Date: mistachkin 2016-01-13 00:38:26
Context
2016-01-13
11:53
Add the ".vfslist" command to "fossil sqlite" ... (check-in: 42c4d8f2 user: jan.nijtmans tags: trunk)
01:31
Add the '--no-repository' option to the 'fossil sqlite3' command and make use of it for the merge5 test. ... (check-in: 56f74a12 user: mistachkin tags: sqlCmdNoRepo)
00:38
The test file directory saved by the test suite infrastructure should be normalized. ... (check-in: be81a2fd user: mistachkin tags: trunk)
2016-01-12
22:44
Fix a typo in a comment in cache.c. ... (check-in: ca1e4ed3 user: drh tags: trunk)
Changes
Unified Diff Ignore Whitespace Patch
Changes to test/tester.tcl.
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
#
#     tclsh ../test/tester.tcl ../bld/fossil
#
# Where ../test/tester.tcl is the name of this file and ../bld/fossil
# is the name of the executable to be tested.
#

set testfiledir [file dirname [info script]]
set testrundir [pwd]
set testdir [file normalize [file dir $argv0]]
set fossilexe [file normalize [lindex $argv 0]]
set argv [lrange $argv 1 end]

set i [lsearch $argv -halt]
if {$i>=0} {
  set HALT 1
  set argv [lreplace $argv $i $i]







|

|







19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
#
#     tclsh ../test/tester.tcl ../bld/fossil
#
# Where ../test/tester.tcl is the name of this file and ../bld/fossil
# is the name of the executable to be tested.
#

set testfiledir [file normalize [file dirname [info script]]]
set testrundir [pwd]
set testdir [file normalize [file dirname $argv0]]
set fossilexe [file normalize [lindex $argv 0]]
set argv [lrange $argv 1 end]

set i [lsearch $argv -halt]
if {$i>=0} {
  set HALT 1
  set argv [lreplace $argv $i $i]