diff options
author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2012-05-08 09:26:53 (GMT) |
---|---|---|
committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2012-05-08 09:26:53 (GMT) |
commit | a55cf4a7e5aa5b506929c232ed2a3c8402a41852 (patch) | |
tree | 3f2b0908268023c30e1adb924e17a6436a2f4d1e /tests | |
parent | 8622e716bb6d347375ac273af7b73c6f7952f223 (diff) | |
download | tcl-a55cf4a7e5aa5b506929c232ed2a3c8402a41852.zip tcl-a55cf4a7e5aa5b506929c232ed2a3c8402a41852.tar.gz tcl-a55cf4a7e5aa5b506929c232ed2a3c8402a41852.tar.bz2 |
another bug: [dde eval -async -binary] didn't work
Diffstat (limited to 'tests')
-rw-r--r-- | tests/winDde.test | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/tests/winDde.test b/tests/winDde.test index d4a3a79..729b05e 100644 --- a/tests/winDde.test +++ b/tests/winDde.test @@ -216,13 +216,13 @@ test winDde-4.4 {DDE eval remotely} {stdio win dde} { test winDde-5.1 {check for bad arguments} -constraints {win dde} -body { dde execute "" "" "" "" -} -returnCodes error -result {ambiguous option "": must be -async or -binary} +} -returnCodes error -result {wrong # args: should be "dde execute ?-async? ?-binary? serviceName topicName value"} test winDde-5.2 {check for bad arguments} -constraints {win dde} -body { dde execute "" "" "" } -returnCodes error -result {cannot execute null data} test winDde-5.3 {check for bad arguments} -constraints {win dde} -body { dde execute -foo "" "" "" -} -returnCodes error -result {bad option "-foo": must be -async or -binary} +} -returnCodes error -result {wrong # args: should be "dde execute ?-async? ?-binary? serviceName topicName value"} test winDde-5.4 {DDE eval bad arguments} -constraints {win dde} -body { dde eval "" "foo" } -returnCodes error -result {invalid service name ""} |