diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2014-07-16 10:02:02 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2014-07-16 10:02:02 (GMT) |
| commit | 54c72fdcab114a768b54bd1dfd06912b79dc0da0 (patch) | |
| tree | 17150e3e7f9f402236d0267308e10b72b4cc438a /tests/parseExpr.test | |
| parent | 19e38811559271a3d6c390847ee1f8a206d65a50 (diff) | |
| download | tcl-54c72fdcab114a768b54bd1dfd06912b79dc0da0.zip tcl-54c72fdcab114a768b54bd1dfd06912b79dc0da0.tar.gz tcl-54c72fdcab114a768b54bd1dfd06912b79dc0da0.tar.bz2 | |
Modify the "gettimes" test-command to use the Tcl_Obj API.
New "testbytestring" command which can be used to replace the (to-be-deprecated) "bytestring" command from tcltest and/or the "indentity" encoding.
Adapt many testcases to use the "testbytestring" command.
Diffstat (limited to 'tests/parseExpr.test')
| -rw-r--r-- | tests/parseExpr.test | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/tests/parseExpr.test b/tests/parseExpr.test index 714c45b..5c7986a 100644 --- a/tests/parseExpr.test +++ b/tests/parseExpr.test @@ -20,6 +20,7 @@ catch [list package require -exact Tcltest [info patchlevel]] # of "<<" are integers. testConstraint testexprparser [llength [info commands testexprparser]] +testConstraint testbytestring [llength [info commands testbytestring]] # Big test for correct ordering of data in [expr] @@ -81,8 +82,8 @@ testConstraint ieeeFloatingPoint [testIEEE] ###################################################################### -test parseExpr-1.1 {Tcl_ParseExpr procedure, computing string length} testexprparser { - testexprparser [bytestring "1+2\0 +3"] -1 +test parseExpr-1.1 {Tcl_ParseExpr procedure, computing string length} {testexprparser testbytestring} { + testexprparser [testbytestring "1+2\0 +3"] -1 } {- {} 0 subexpr 1+2 5 operator + 0 subexpr 1 1 text 1 0 subexpr 2 1 text 2 0 {}} test parseExpr-1.2 {Tcl_ParseExpr procedure, computing string length} testexprparser { testexprparser "1 + 2" -1 |