summaryrefslogtreecommitdiffstats
path: root/tests
diff options
context:
space:
mode:
authorjan.nijtmans <nijtmans@users.sourceforge.net>2020-12-04 10:01:50 (GMT)
committerjan.nijtmans <nijtmans@users.sourceforge.net>2020-12-04 10:01:50 (GMT)
commit25084dcd33f266a26bce646b6388334fe6ef6127 (patch)
tree828c0da61de162d69aa7b2f89f3e87d07de1a336 /tests
parentebd7b1edb756eea5aa2bdb46d4634ba80de8fccc (diff)
parent9a3e53bd90302b78155f1fd7a561b3274d54316e (diff)
downloadtcl-25084dcd33f266a26bce646b6388334fe6ef6127.zip
tcl-25084dcd33f266a26bce646b6388334fe6ef6127.tar.gz
tcl-25084dcd33f266a26bce646b6388334fe6ef6127.tar.bz2
Merge 8.5
Diffstat (limited to 'tests')
-rw-r--r--tests/parseOld.test66
1 files changed, 0 insertions, 66 deletions
diff --git a/tests/parseOld.test b/tests/parseOld.test
index 7218092..c2d7c23 100644
--- a/tests/parseOld.test
+++ b/tests/parseOld.test
@@ -460,72 +460,6 @@ expr 1+1
]"
} {2}
-test parseOld-14.1 {TclWordEnd procedure} {testwordend} {
- testwordend " \n abc"
-} {c}
-test parseOld-14.2 {TclWordEnd procedure} {testwordend} {
- testwordend " \\\n"
-} {}
-test parseOld-14.3 {TclWordEnd procedure} {testwordend} {
- testwordend " \\\n "
-} { }
-test parseOld-14.4 {TclWordEnd procedure} {testwordend} {
- testwordend {"abc"}
-} {"}
-#" Emacs formatting :^(
-test parseOld-14.5 {TclWordEnd procedure} {testwordend} {
- testwordend {{xyz}}
-} \}
-test parseOld-14.6 {TclWordEnd procedure} {testwordend} {
- testwordend {{a{}b{}\}} xyz}
-} "\} xyz"
-test parseOld-14.7 {TclWordEnd procedure} {testwordend} {
- testwordend {abc[this is a]def ghi}
-} {f ghi}
-test parseOld-14.8 {TclWordEnd procedure} {testwordend} {
- testwordend "puts\\\n\n "
-} "s\\\n\n "
-test parseOld-14.9 {TclWordEnd procedure} {testwordend} {
- testwordend "puts\\\n "
-} "s\\\n "
-test parseOld-14.10 {TclWordEnd procedure} {testwordend} {
- testwordend "puts\\\n xyz"
-} "s\\\n xyz"
-test parseOld-14.11 {TclWordEnd procedure} {testwordend} {
- testwordend {a$x.$y(a long index) foo}
-} ") foo"
-test parseOld-14.12 {TclWordEnd procedure} {testwordend} {
- testwordend {abc; def}
-} {; def}
-test parseOld-14.13 {TclWordEnd procedure} {testwordend} {
- testwordend {abc def}
-} {c def}
-test parseOld-14.14 {TclWordEnd procedure} {testwordend} {
- testwordend {abc def}
-} {c def}
-test parseOld-14.15 {TclWordEnd procedure} {testwordend} {
- testwordend "abc\ndef"
-} "c\ndef"
-test parseOld-14.16 {TclWordEnd procedure} {testwordend} {
- testwordend "abc"
-} {c}
-test parseOld-14.17 {TclWordEnd procedure} {testwordend} {
- testwordend "a\000bc"
-} {c}
-test parseOld-14.18 {TclWordEnd procedure} {testwordend} {
- testwordend \[a\000\]
-} {]}
-test parseOld-14.19 {TclWordEnd procedure} {testwordend} {
- testwordend \"a\000\"
-} {"}
-#" Emacs formatting :^(
-test parseOld-14.20 {TclWordEnd procedure} {testwordend} {
- testwordend a{\000}b
-} {b}
-test parseOld-14.21 {TclWordEnd procedure} {testwordend} {
- testwordend " \000b"
-} {b}
-
test parseOld-15.1 {TclScriptEnd procedure} {
info complete {puts [
expr 1+1