diff options
author | dgp <dgp@users.sourceforge.net> | 2006-03-07 05:30:22 (GMT) |
---|---|---|
committer | dgp <dgp@users.sourceforge.net> | 2006-03-07 05:30:22 (GMT) |
commit | 068750affd769da019d939002317ce85a8dde4a5 (patch) | |
tree | fee9cd2eb53e189dc1ec7908ede6d0a45a9b3f8d /tests/parse.test | |
parent | f04a0f4fc371aae20e1d651be91414b3591fc4a4 (diff) | |
download | tcl-068750affd769da019d939002317ce85a8dde4a5.zip tcl-068750affd769da019d939002317ce85a8dde4a5.tar.gz tcl-068750affd769da019d939002317ce85a8dde4a5.tar.bz2 |
* README: Bump version number to 8.4.13 and update
* changes: changes to start prep for an 8.4.13 release.
* generic/tcl.h:
* tools/tcl.wse.in:
* unix/configure{.in}:
* unix/tcl.spec:
* win/README.binary:
* win/configure{.in}:
* tests/parse.test: Missing constraint
Diffstat (limited to 'tests/parse.test')
-rw-r--r-- | tests/parse.test | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/tests/parse.test b/tests/parse.test index 6820d80..0932776 100644 --- a/tests/parse.test +++ b/tests/parse.test @@ -8,7 +8,7 @@ # See the file "license.terms" for information on usage and redistribution # of this file, and for a DISCLAIMER OF ALL WARRANTIES. # -# RCS: @(#) $Id: parse.test,v 1.11.2.4 2006/03/06 21:56:13 dgp Exp $ +# RCS: @(#) $Id: parse.test,v 1.11.2.5 2006/03/07 05:30:24 dgp Exp $ if {[lsearch [namespace children] ::tcltest] == -1} { package require tcltest 2 @@ -219,6 +219,7 @@ test parse-7.1 {Tcl_FreeParse and ExpandTokenArray procedures} { } {- {$a(b) $a(b) $a(b) $a(b) $a(b) $a(b) $a(b) $a(b) $a(b) $a(b) $a(b) $a(b) $a(b) $a(b) $a(b) $a(b) } 16 word {$a(b)} 3 variable {$a(b)} 2 text a 0 text b 0 word {$a(b)} 3 variable {$a(b)} 2 text a 0 text b 0 word {$a(b)} 3 variable {$a(b)} 2 text a 0 text b 0 word {$a(b)} 3 variable {$a(b)} 2 text a 0 text b 0 word {$a(b)} 3 variable {$a(b)} 2 text a 0 text b 0 word {$a(b)} 3 variable {$a(b)} 2 text a 0 text b 0 word {$a(b)} 3 variable {$a(b)} 2 text a 0 text b 0 word {$a(b)} 3 variable {$a(b)} 2 text a 0 text b 0 word {$a(b)} 3 variable {$a(b)} 2 text a 0 text b 0 word {$a(b)} 3 variable {$a(b)} 2 text a 0 text b 0 word {$a(b)} 3 variable {$a(b)} 2 text a 0 text b 0 word {$a(b)} 3 variable {$a(b)} 2 text a 0 text b 0 word {$a(b)} 3 variable {$a(b)} 2 text a 0 text b 0 word {$a(b)} 3 variable {$a(b)} 2 text a 0 text b 0 word {$a(b)} 3 variable {$a(b)} 2 text a 0 text b 0 word {$a(b)} 3 variable {$a(b)} 2 text a 0 text b 0 {}} testConstraint testevalobjv [llength [info commands testevalobjv]] +testConstraint testevalex [llength [info commands testevalex]] test parse-8.1 {Tcl_EvalObjv procedure} testevalobjv { testevalobjv 0 concat this is a test } {this is a test} |