summaryrefslogtreecommitdiffstats
path: root/tests/utf.test
diff options
context:
space:
mode:
authorhobbs <hobbs>2000-01-12 11:13:25 (GMT)
committerhobbs <hobbs>2000-01-12 11:13:25 (GMT)
commitf0c936b8a5365ec18f126e2c15715509d64bb440 (patch)
tree82af689b665b52d5f4be35155ac4d08136341e92 /tests/utf.test
parent406d6b83a7c5904f8364bca9dafa894901281bc2 (diff)
downloadtcl-f0c936b8a5365ec18f126e2c15715509d64bb440.zip
tcl-f0c936b8a5365ec18f126e2c15715509d64bb440.tar.gz
tcl-f0c936b8a5365ec18f126e2c15715509d64bb440.tar.bz2
* tests/info.test:
* generic/tclCmdIL.c: fixed 'info procs ::namesp::*' behavior (Dejong) * tests/unixFCmd.test: * unix/tclUnixFCmd.c: added support for symbolic permissions setting in SetPermissionsAttribute (file attr $file -perm ...) [Bug: 3970] * tests/utf.test: fixed test that allowed \8 as octal value
Diffstat (limited to 'tests/utf.test')
-rw-r--r--tests/utf.test6
1 files changed, 4 insertions, 2 deletions
diff --git a/tests/utf.test b/tests/utf.test
index 3250097..6c8ee89 100644
--- a/tests/utf.test
+++ b/tests/utf.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: utf.test,v 1.5 1999/06/26 20:55:17 rjohnson Exp $
+# RCS: @(#) $Id: utf.test,v 1.6 2000/01/12 11:13:26 hobbs Exp $
if {[lsearch [namespace children] ::tcltest] == -1} {
package require tcltest
@@ -141,7 +141,9 @@ bsCheck \\ 92
bsCheck \Ca 67
bsCheck \Ma 77
bsCheck \CMa 67
-bsCheck \8a 8
+# prior to 8.3, this returned 8, as \8 as accepted as an
+# octal value - but it isn't! [Bug: 3975]
+bsCheck \8a 56
bsCheck \14 12
bsCheck \141 97
bsCheck b\0 98