Changeset 655 for trunk/src/tcl/tests/encode.test
- Timestamp:
- Apr 3, 2007, 12:03:26 PM (17 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/src/tcl/tests/encode.test
r652 r655 56 56 #---------------------------------------------------------- 57 57 # encode command 58 # Rappture::encoding::encode ?-as z|b64? <string>58 # Rappture::encoding::encode ?-as z|b64? ?-no-header? <string> 59 59 #---------------------------------------------------------- 60 60 61 61 test encode-2.0.0 {Rappture::encoding::encode, 0 arguments} { 62 62 list [catch {Rappture::encoding::encode} msg] $msg 63 } {1 {wrong # args: should be "Rappture::encoding::encode ?-as z|b64|zb64? <string>"}}63 } {1 {wrong # args: should be "Rappture::encoding::encode ?-as z|b64|zb64? ?-no-header? <string>"}} 64 64 65 65 test encode-2.1.0 {Rappture::encoding::encode, ascii string argument} { … … 87 87 test encode-2.2.2 {Rappture::encoding::encode, -as flag correct value z} { 88 88 list [catch {Rappture::encoding::encode -as z} msg] $msg 89 } {1 {wrong # args: should be "Rappture::encoding::encode ?-as z|b64|zb64? <string>"}}89 } {1 {wrong # args: should be "Rappture::encoding::encode ?-as z|b64|zb64? ?-no-header? <string>"}} 90 90 91 91 test encode-2.2.3 {Rappture::encoding::encode, -as z w/ string} { … … 130 130 test decode-3.2.1 {Rappture::encoding::decode, -as flag, bad value} { 131 131 list [catch {Rappture::encoding::decode -as zz} msg] $msg 132 } {1 { bad value "zz": should be one of z, b64, zb64}}132 } {1 {wrong # args: should be "Rappture::encoding::decode ?-as z|b64|zb64? <string>"}} 133 133 134 134 test decode-3.2.2 {Rappture::encoding::decode, -as flag, zb64 w/ string} {
Note: See TracChangeset
for help on using the changeset viewer.