diff options
| author | sebres <sebres@users.sourceforge.net> | 2019-04-01 14:24:48 (GMT) |
|---|---|---|
| committer | sebres <sebres@users.sourceforge.net> | 2019-04-01 14:24:48 (GMT) |
| commit | 95068d8d48287e6ddc592f0a4992fc6c40437d20 (patch) | |
| tree | b2b891646fac74b6dd01cc192709f2b8b17aebc5 /tests/cmdMZ.test | |
| parent | 0817b5a4ef4f44daedf4a1c82e5f63c0641be1c3 (diff) | |
| parent | 2b8e087252d5342939ea2428e6923ebfb746a177 (diff) | |
| download | tcl-95068d8d48287e6ddc592f0a4992fc6c40437d20.zip tcl-95068d8d48287e6ddc592f0a4992fc6c40437d20.tar.gz tcl-95068d8d48287e6ddc592f0a4992fc6c40437d20.tar.bz2 | |
merge 8.6
Diffstat (limited to 'tests/cmdMZ.test')
| -rw-r--r-- | tests/cmdMZ.test | 7 |
1 files changed, 5 insertions, 2 deletions
diff --git a/tests/cmdMZ.test b/tests/cmdMZ.test index 45231c8..d79e9f6 100644 --- a/tests/cmdMZ.test +++ b/tests/cmdMZ.test @@ -360,8 +360,11 @@ test cmdMZ-6.3 {Tcl_TimeRateObjCmd: basic format of command} { test cmdMZ-6.4 {Tcl_TimeRateObjCmd: compile of script happens even with negative iteration counts} { list [catch {timerate "foreach a {c d e} \{" -12456} msg] $msg } {1 {missing close-brace}} -test cmdMZ-6.5 {Tcl_TimeRateObjCmd: result format and one iteration} { - regexp {^\d+.\d+ \ws/# 1 # \d+ #/sec \d+.\d+ nett-ms$} [timerate {} 0] +test cmdMZ-6.5a {Tcl_TimeRateObjCmd: result format and one iteration} { + regexp {^\d+(?:\.\d+)? \ws/# 1 # \d+(?:\.\d+)? #/sec \d+(?:\.\d+)? nett-ms$} [timerate {} 0] +} 1 +test cmdMZ-6.5b {Tcl_TimeRateObjCmd: result format without iterations} { + regexp {^0 \ws/# 0 # 0 #/sec 0 nett-ms$} [timerate {} 0 0] } 1 test cmdMZ-6.6 {Tcl_TimeRateObjCmd: slower commands take longer, but it remains almost the same time of measument} { set m1 [timerate {after 0} 20] |