diff options
author | Steve Bennett <steveb@workware.net.au> | 2023-06-22 15:15:18 +1000 |
---|---|---|
committer | Steve Bennett <steveb@workware.net.au> | 2023-07-04 10:08:32 +1000 |
commit | f8df8ac0f6d418eb33cdd401f01ee6f68571a219 (patch) | |
tree | a202ffbbb586ed38faf60d3cbeee9a186ba1e1a1 /tests | |
parent | 753a7447c168077d833f21dbfc1265e2d8020646 (diff) | |
download | jimtcl-f8df8ac0f6d418eb33cdd401f01ee6f68571a219.zip jimtcl-f8df8ac0f6d418eb33cdd401f01ee6f68571a219.tar.gz jimtcl-f8df8ac0f6d418eb33cdd401f01ee6f68571a219.tar.bz2 |
debug: convert to use subcmd
This means we get -commands and usage via -help
Signed-off-by: Steve Bennett <steveb@workware.net.au>
Diffstat (limited to 'tests')
-rw-r--r-- | tests/debug.test | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/tests/debug.test b/tests/debug.test index dd12a99..a86d472 100644 --- a/tests/debug.test +++ b/tests/debug.test @@ -7,11 +7,11 @@ set x 0 test debug-0.1 {debug too few args} -body { debug -} -returnCodes error -result {wrong # args: should be "debug subcommand ?...?"} +} -returnCodes error -match glob -result {wrong # args: should be "debug command ..."*} test debug-0.2 {debug bad option} -body { debug badoption -} -returnCodes error -result {bad subcommand "badoption": must be exprbc, exprlen, invstr, objcount, objects, refcount, scriptlen, or show} +} -returnCodes error -result {debug, unknown command "badoption": should be exprbc, exprlen, invstr, objcount, objects, refcount, scriptlen, show} test debug-1.1 {debug refcount too few args} -body { debug refcount |