From owner-svn-ports-head@FreeBSD.ORG Sat Aug 2 01:00:05 2014 Return-Path: Delivered-To: svn-ports-head@freebsd.org Received: from mx1.freebsd.org (mx1.freebsd.org [IPv6:2001:1900:2254:206a::19:1]) (using TLSv1 with cipher ADH-AES256-SHA (256/256 bits)) (No client certificate requested) by hub.freebsd.org (Postfix) with ESMTPS id 8E32532A; Sat, 2 Aug 2014 01:00:05 +0000 (UTC) Received: from svn.freebsd.org (svn.freebsd.org [IPv6:2001:1900:2254:2068::e6a:0]) (using TLSv1.2 with cipher ECDHE-RSA-AES256-GCM-SHA384 (256/256 bits)) (Client did not present a certificate) by mx1.freebsd.org (Postfix) with ESMTPS id 7C047209A; Sat, 2 Aug 2014 01:00:05 +0000 (UTC) Received: from svn.freebsd.org ([127.0.1.70]) by svn.freebsd.org (8.14.9/8.14.9) with ESMTP id s72105ol019533; Sat, 2 Aug 2014 01:00:05 GMT (envelope-from mi@svn.freebsd.org) Received: (from mi@localhost) by svn.freebsd.org (8.14.9/8.14.9/Submit) id s72105GZ019532; Sat, 2 Aug 2014 01:00:05 GMT (envelope-from mi@svn.freebsd.org) Message-Id: <201408020100.s72105GZ019532@svn.freebsd.org> From: Mikhail Teterin Date: Sat, 2 Aug 2014 01:00:05 +0000 (UTC) To: ports-committers@freebsd.org, svn-ports-all@freebsd.org, svn-ports-head@freebsd.org Subject: svn commit: r363774 - head/lang/tclX/files X-SVN-Group: ports-head MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit X-BeenThere: svn-ports-head@freebsd.org X-Mailman-Version: 2.1.18 Precedence: list List-Id: SVN commit messages for the ports tree for head List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , X-List-Received-Date: Sat, 02 Aug 2014 01:00:05 -0000 Author: mi Date: Sat Aug 2 01:00:04 2014 New Revision: 363774 URL: http://svnweb.freebsd.org/changeset/ports/363774 QAT: https://qat.redports.org/buildarchive/r363774/ Log: Fix the string-test to match today's 8.5 error-messages. Modified: head/lang/tclX/files/tcl85-test-patch Modified: head/lang/tclX/files/tcl85-test-patch ============================================================================== --- head/lang/tclX/files/tcl85-test-patch Sat Aug 2 00:39:42 2014 (r363773) +++ head/lang/tclX/files/tcl85-test-patch Sat Aug 2 01:00:04 2014 (r363774) @@ -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