summaryrefslogtreecommitdiffstats
path: root/tests/unixInit.test
diff options
context:
space:
mode:
authorjan.nijtmans <nijtmans@users.sourceforge.net>2021-03-30 07:11:18 (GMT)
committerjan.nijtmans <nijtmans@users.sourceforge.net>2021-03-30 07:11:18 (GMT)
commit1f1f43fcd2bfa68c8bff1a9d6dbb8ecab4be43e7 (patch)
tree35749cc38881de41be58b2c55c3e82de9cdc342c /tests/unixInit.test
parentc8617b374b29d14c8be0900f1623ca3120468b62 (diff)
downloadtcl-1f1f43fcd2bfa68c8bff1a9d6dbb8ecab4be43e7.zip
tcl-1f1f43fcd2bfa68c8bff1a9d6dbb8ecab4be43e7.tar.gz
tcl-1f1f43fcd2bfa68c8bff1a9d6dbb8ecab4be43e7.tar.bz2
Thanks to TIP #587, convert many escapes in the testcases into the actual (UTF-8) character.
Diffstat (limited to 'tests/unixInit.test')
-rw-r--r--tests/unixInit.test6
1 files changed, 3 insertions, 3 deletions
diff --git a/tests/unixInit.test b/tests/unixInit.test
index aa3d50a..2ea7d8e 100644
--- a/tests/unixInit.test
+++ b/tests/unixInit.test
@@ -126,7 +126,7 @@ test unixInit-2.2 {TclpInitLibraryPath: TCL_LIBRARY} -setup {
set oldlibrary $env(TCL_LIBRARY)
}
} -body {
- # ((str != NULL) && (str[0] != '\0'))
+ # ((str != NULL) && (str[0] != '\x00'))
set env(TCL_LIBRARY) sparkly
lindex [getlibpath] 0
} -cleanup {
@@ -158,7 +158,7 @@ test unixInit-2.4 {TclpInitLibraryPath: TCL_LIBRARY: INTL} -setup {
}
} -body {
# Child process translates env variable from native encoding.
- set env(TCL_LIBRARY) "\xa7"
+ set env(TCL_LIBRARY) "§"
lindex [getlibpath] 0
} -cleanup {
unset -nocomplain env(TCL_LIBRARY) env(LANG)
@@ -166,7 +166,7 @@ test unixInit-2.4 {TclpInitLibraryPath: TCL_LIBRARY: INTL} -setup {
set env(TCL_LIBRARY) $oldlibrary
unset oldlibrary
}
-} -result "\xa7"
+} -result "§"
test unixInit-2.5 {TclpInitLibraryPath: compiled-in library path} {
# cannot test
} {}