summaryrefslogtreecommitdiffstats
path: root/tests
diff options
context:
space:
mode:
authorstanton <stanton>1999-06-24 03:27:56 (GMT)
committerstanton <stanton>1999-06-24 03:27:56 (GMT)
commit79d36b8166d773a6f2740a59820c30748c102226 (patch)
tree255e71bdabf736a3697e79ffdd09a91136ea7b33 /tests
parent3497f9531e33550bfb1cec92c30b535497e86289 (diff)
downloadtcl-79d36b8166d773a6f2740a59820c30748c102226.zip
tcl-79d36b8166d773a6f2740a59820c30748c102226.tar.gz
tcl-79d36b8166d773a6f2740a59820c30748c102226.tar.bz2
* unix/Makefile.in: Changed install-doc to install-man.
* tools/uniParse.tcl: * tools/uniClass.tcl: * tools/README: * tests/string.test: * generic/regc_locale.c: * generic/tclUniData.c: * generic/tclUtf.c: * doc/string.n: Updated Unicode character tables to reflect latest Unicode 2.1 data. Also rationalized "regexp" and "string is" definitions of character classes.
Diffstat (limited to 'tests')
-rw-r--r--tests/string.test6
1 files changed, 3 insertions, 3 deletions
diff --git a/tests/string.test b/tests/string.test
index 5200b48..6a0bdfd 100644
--- a/tests/string.test
+++ b/tests/string.test
@@ -11,7 +11,7 @@
# See the file "license.terms" for information on usage and redistribution
# of this file, and for a DISCLAIMER OF ALL WARRANTIES.
#
-# RCS: @(#) $Id: string.test,v 1.13 1999/06/10 04:28:52 stanton Exp $
+# RCS: @(#) $Id: string.test,v 1.14 1999/06/24 03:27:57 stanton Exp $
if {[lsearch [namespace children] ::tcltest] == -1} {
source [file join [pwd] [file dirname [info script]] defs.tcl]
@@ -517,8 +517,8 @@ test string-6.87 {string is print} {
} {0 13}
test string-6.88 {string is punct} {
## any graph char that isn't alnum
- list [string is punct -fail var "_=!@#\$\u00beq0"] $var
-} {0 7}
+ list [string is punct -fail var "_!@#\u00beq0"] $var
+} {0 4}
test string-6.89 {string is xdigit} {
list [string is xdigit -fail var 0123456789\u0061bcdefABCDEFg] $var
} {0 22}