diff options
author | dkf <donal.k.fellows@manchester.ac.uk> | 2014-07-12 16:13:27 (GMT) |
---|---|---|
committer | dkf <donal.k.fellows@manchester.ac.uk> | 2014-07-12 16:13:27 (GMT) |
commit | 7bea42569d8c2ccb8584155f706392d5812ec428 (patch) | |
tree | 4f61b95593d24393fff08344b408215836a58a05 /tests/fileName.test | |
parent | f0bba60202785e634e8e1712db5cc37246d36e32 (diff) | |
download | tcl-7bea42569d8c2ccb8584155f706392d5812ec428.zip tcl-7bea42569d8c2ccb8584155f706392d5812ec428.tar.gz tcl-7bea42569d8c2ccb8584155f706392d5812ec428.tar.bz2 |
whopper change; now passes test suite on OSX
Diffstat (limited to 'tests/fileName.test')
-rw-r--r-- | tests/fileName.test | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/tests/fileName.test b/tests/fileName.test index 51f00d1..4227017 100644 --- a/tests/fileName.test +++ b/tests/fileName.test @@ -701,7 +701,7 @@ test filename-11.1 {Tcl_GlobCmd} -returnCodes error -body { } -result {no files matched glob patterns ""} test filename-11.2 {Tcl_GlobCmd} -returnCodes error -body { glob -gorp -} -result {bad option "-gorp": must be -directory, -join, -nocomplain, -path, -tails, -types, or --} +} -result {bad option "-gorp": should be -directory, -join, -nocomplain, -path, -tails, -types, or --} test filename-11.3 {Tcl_GlobCmd} -body { glob -nocomplai } -result {} @@ -1014,11 +1014,11 @@ test filename-11.34 {Tcl_GlobCmd} -returnCodes error -body { } -result {missing argument to "-directory"} test filename-11.35 {Tcl_GlobCmd} -returnCodes error -body { glob -paths * -} -result {bad option "-paths": must be -directory, -join, -nocomplain, -path, -tails, -types, or --} +} -result {bad option "-paths": should be -directory, -join, -nocomplain, -path, -tails, -types, or --} # Test '-tails' flag to glob. test filename-11.36 {Tcl_GlobCmd} -returnCodes error -body { glob -tails * -} -result {"-tails" must be used with either "-directory" or "-path"} +} -result {"-tails" should be used with either "-directory" or "-path"} test filename-11.37 {Tcl_GlobCmd} { glob -type d -tails -path $globname * } [list $globname] @@ -1043,7 +1043,7 @@ test filename-11.42 {Tcl_GlobCmd} -body { } -match compareWords -result equal test filename-11.43 {Tcl_GlobCmd} -returnCodes error -body { glob -t * -} -result {ambiguous option "-t": must be -directory, -join, -nocomplain, -path, -tails, -types, or --} +} -result {ambiguous option "-t": should be -directory, -join, -nocomplain, -path, -tails, -types, or --} test filename-11.44 {Tcl_GlobCmd} -returnCodes error -body { glob -tails -path hello -directory hello * } -result {"-directory" cannot be used with "-path"} |