diff options
| author | sebres <sebres@users.sourceforge.net> | 2018-11-22 13:58:37 (GMT) |
|---|---|---|
| committer | sebres <sebres@users.sourceforge.net> | 2018-11-22 13:58:37 (GMT) |
| commit | fb0f0b6c373000a8893904c0eea7580fdc902d20 (patch) | |
| tree | 894d2a54a48709df36b07da83c8ccc7bfa9115cf /tests/cmdAH.test | |
| parent | e537ff7be6133bfccde0c8e2de74610d17c0e94f (diff) | |
| parent | e4f3ce78e3bd0c816cb0a5377ab66a42f9eb7552 (diff) | |
| download | tcl-fb0f0b6c373000a8893904c0eea7580fdc902d20.zip tcl-fb0f0b6c373000a8893904c0eea7580fdc902d20.tar.gz tcl-fb0f0b6c373000a8893904c0eea7580fdc902d20.tar.bz2 | |
merge 8.5: fixes segfault [7a9dc52b29] and wrong normalization (inside TclJoinPath) for pure relative path-segments; test-cases extended and several windows-related are fixed.
Diffstat (limited to 'tests/cmdAH.test')
| -rw-r--r-- | tests/cmdAH.test | 7 |
1 files changed, 7 insertions, 0 deletions
diff --git a/tests/cmdAH.test b/tests/cmdAH.test index e8933d6..88c0367 100644 --- a/tests/cmdAH.test +++ b/tests/cmdAH.test @@ -566,6 +566,13 @@ test cmdAH-9.51 {Tcl_FileObjCmd: tail} testsetplatform { testsetplatform windows file tail {foo\bar} } bar +test cmdAH-9.52 {Tcl_FileObjCmd: tail / normalize, bug 7a9dc52b29} { + list \ + [file tail {~/~foo}] \ + [file tail {~/test/~foo}] \ + [file tail [file normalize {~/~foo}]] \ + [file tail [file normalize {~/test/~foo}]] +} [lrepeat 4 ./~foo] # rootname test cmdAH-10.1 {Tcl_FileObjCmd: rootname} -returnCodes error -body { |