diff options
author | dgp <dgp@users.sourceforge.net> | 2003-07-24 16:05:22 (GMT) |
---|---|---|
committer | dgp <dgp@users.sourceforge.net> | 2003-07-24 16:05:22 (GMT) |
commit | db3db9df91cdc7d1b0bdac6c9c927765ce9afd95 (patch) | |
tree | 829c6228c7d8db111e9b0b193de20a6c182b21be /tests/parse.test | |
parent | 69bc2d2dcd6bd96a75ea42e0fdb1c23fc1054390 (diff) | |
download | tcl-db3db9df91cdc7d1b0bdac6c9c927765ce9afd95.zip tcl-db3db9df91cdc7d1b0bdac6c9c927765ce9afd95.tar.gz tcl-db3db9df91cdc7d1b0bdac6c9c927765ce9afd95.tar.bz2 |
* tests/async.test: Added several tests that demonstrate Tcl
* tests/basic.test: Bug 489537, Tcl's longstanding failure to
* tests/dict.test: properly quote any leading '#' character
* tests/dstring.test: when generating the string rep of a list
* tests/list.test: so that the comment-power of that character
* tests/parse.test: is hidden from any [eval], in order to
* tests/util.test: satisfy the documentation that [list] does
[eval]-safe quoting.
Diffstat (limited to 'tests/parse.test')
-rw-r--r-- | tests/parse.test | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/tests/parse.test b/tests/parse.test index 9764cf1..ee2a772 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.15 2003/04/01 17:08:16 dgp Exp $ +# RCS: @(#) $Id: parse.test,v 1.16 2003/07/24 16:05:24 dgp Exp $ if {[lsearch [namespace children] ::tcltest] == -1} { package require tcltest @@ -58,10 +58,10 @@ test parse-2.2 {Tcl_ParseCommand procedure, several comments} { } foo 1 simple foo 1 text foo 0 {}} test parse-2.3 {Tcl_ParseCommand procedure, backslash-newline in comments} { testparser " # foo bar\\\ncomment on continuation line\nfoo" 0 -} {#\ foo\ bar\\\ncomment\ on\ continuation\ line\n foo 1 simple foo 1 text foo 0 {}} +} {\#\ foo\ bar\\\ncomment\ on\ continuation\ line\n foo 1 simple foo 1 text foo 0 {}} test parse-2.4 {Tcl_ParseCommand procedure, missing continuation line in comment} { testparser "# \\\n" 0 -} {#\ \ \ \\\n {} 0 {}} +} {\#\ \ \ \\\n {} 0 {}} test parse-2.5 {Tcl_ParseCommand procedure, eof in comment} { testparser " # foo bar\nfoo" 8 } {{# foo b} {} 0 {ar |