aboutsummaryrefslogtreecommitdiff
path: root/tests/array.test
diff options
context:
space:
mode:
authorSteve Bennett <steveb@workware.net.au>2020-04-17 16:23:37 +1000
committerSteve Bennett <steveb@workware.net.au>2020-04-17 17:36:50 +1000
commitb081ba9fe23cb52fbd17a7f4635244c9ce3ff1fa (patch)
tree3f32b3f3d0fac917ef15817e726617f86d1fce6c /tests/array.test
parent35b0acdccfe58043717b026fa2d86ecd76711c85 (diff)
downloadjimtcl-b081ba9fe23cb52fbd17a7f4635244c9ce3ff1fa.zip
jimtcl-b081ba9fe23cb52fbd17a7f4635244c9ce3ff1fa.tar.gz
jimtcl-b081ba9fe23cb52fbd17a7f4635244c9ce3ff1fa.tar.bz2
tests: improve code coverage
- clock - array - file tempfile - lreverse - string byterange - aio tty Signed-off-by: Steve Bennett <steveb@workware.net.au>
Diffstat (limited to 'tests/array.test')
-rw-r--r--tests/array.test20
1 files changed, 20 insertions, 0 deletions
diff --git a/tests/array.test b/tests/array.test
index 423276b..38494de 100644
--- a/tests/array.test
+++ b/tests/array.test
@@ -131,4 +131,24 @@ test array-1.23 "array exists non-array" -body {
array exists x
} -result {0}
+test array-2.1 {array -help} -constraints jim -body {
+ array -help
+} -match glob -result {Usage: "array command ... ", where command is one of: *}
+
+test array-2.2 {array -help get} -constraints jim -body {
+ array -help get
+} -result {Usage: array get arrayName ?pattern?}
+
+test array-2.3 {array -help ambiguous} -constraints jim -body {
+ array -help s
+} -match glob -result {Usage: "array command ... ", where command is one of: *}
+
+test array-2.3 {array -help nomatch} -constraints jim -body {
+ array -help unknown
+} -match glob -result {Usage: "array command ... ", where command is one of: *}
+
+test array-2.4 {array ambiguous} -constraints jim -body {
+ array s
+} -returnCodes error -match glob -result {array, ambiguous command "s": should be *}
+
testreport