aboutsummaryrefslogtreecommitdiffstats
path: root/lang/tclX
diff options
context:
space:
mode:
authormi <mi@FreeBSD.org>2014-08-02 09:00:04 +0800
committermi <mi@FreeBSD.org>2014-08-02 09:00:04 +0800
commit20273b843e2e32d0c181aeab10d4fc5cfa2f9f9e (patch)
treeb7df2884a84871c1e21b0f08fcb5be5ebd11f01e /lang/tclX
parentf12d8aa9f5d0485496f594d65225be3f84ef3e22 (diff)
downloadfreebsd-ports-gnome-20273b843e2e32d0c181aeab10d4fc5cfa2f9f9e.tar.gz
freebsd-ports-gnome-20273b843e2e32d0c181aeab10d4fc5cfa2f9f9e.tar.zst
freebsd-ports-gnome-20273b843e2e32d0c181aeab10d4fc5cfa2f9f9e.zip
Fix the string-test to match today's 8.5 error-messages.
Diffstat (limited to 'lang/tclX')
-rw-r--r--lang/tclX/files/tcl85-test-patch7
1 files changed, 2 insertions, 5 deletions
diff --git a/lang/tclX/files/tcl85-test-patch b/lang/tclX/files/tcl85-test-patch
index e647f20f0231..cfd07de15ec8 100644
--- a/lang/tclX/files/tcl85-test-patch
+++ b/lang/tclX/files/tcl85-test-patch
@@ -56,7 +56,7 @@ Tcl-versions, should still do that...
ERRORCODE]
--- tests/string.test 2002-09-25 20:19:02.000000000 -0400
+++ tests/string.test 2009-10-13 18:25:03.000000000 -0400
-@@ -47,9 +47,21 @@
+@@ -47,9 +47,18 @@
} 0 {E}
+switch $tcl_version {
@@ -64,14 +64,11 @@ Tcl-versions, should still do that...
+ set anticipate "syntax error in expression \"4x-3\""
+} 8.4 {
+ set anticipate "syntax error in expression \"4x-3\": extra tokens at end of expression"
-+} 8.5 {
-+ set anticipate {invalid bareword "x"
-+in expression "4_@_x-3";
-+should be "$x" or "{x}" or "x(...)" or ...}
+} default {
+ set anticipate {invalid bareword "4x"
+in expression "4x-3";
+should be "$4x" or "{4x}" or "4x(...)" or ...}
++}}
+
Test string-1.7 {cindex tests} {
- cindex ABCDEFG lenx-3