diff options
author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2021-02-19 09:25:40 (GMT) |
---|---|---|
committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2021-02-19 09:25:40 (GMT) |
commit | 3596c610aa00c36454c971d84c8243f48f62fba4 (patch) | |
tree | 74c009840352f9be3e1bacb853e50a5b9e3163d8 /tests/clock.test | |
parent | c723b685c95a53e925b3b55ff4de8a0793ec26e2 (diff) | |
download | tcl-3596c610aa00c36454c971d84c8243f48f62fba4.zip tcl-3596c610aa00c36454c971d84c8243f48f62fba4.tar.gz tcl-3596c610aa00c36454c971d84c8243f48f62fba4.tar.bz2 |
Fix various compiler warnings
Diffstat (limited to 'tests/clock.test')
-rw-r--r-- | tests/clock.test | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/tests/clock.test b/tests/clock.test index 5183b28..02bc9f7 100644 --- a/tests/clock.test +++ b/tests/clock.test @@ -308,14 +308,14 @@ test clock-0.2 "initial: loading of format/locale does not overwrite interp stat # Test some of the basics of [clock format] -set syntax "clock format clockval|-now ?-format string? ?-gmt boolean? ?-locale LOCALE? ?-timezone ZONE?" +set syntax "clockval|-now ?-format string? ?-gmt boolean? ?-locale LOCALE? ?-timezone ZONE?" test clock-1.0 "clock format - wrong # args" { list [catch {clock format} msg] $msg $::errorCode -} [subst {1 {wrong # args: should be "$syntax"} {CLOCK wrongNumArgs}}] +} [subst {1 {wrong # args: should be "clock format $syntax"} {CLOCK wrongNumArgs}}] test clock-1.0.1 "clock format - wrong # args (compiled ensemble with invalid syntax)" { list [catch {clock format 0 -too-few-options-4-test} msg] $msg $::errorCode -} [subst {1 {wrong # args: should be "$syntax"} {CLOCK wrongNumArgs}}] +} [subst {1 {wrong # args: should be "::tcl::clock::format $syntax"} {CLOCK wrongNumArgs}}] test clock-1.1 "clock format - bad time" { list [catch {clock format foo} msg] $msg |