Differences From Artifact [302e0dfbb0]:
- File build/test/tests/05-locale.tcl — part of check-in [b180e9a80f] at 2010-09-26 04:46:10 on branch trunk — Added internal testing script (user: rkeene, size: 193) [annotate] [blame] [check-ins using]
To Artifact [19da5ec8b9]:
- File
build/test/tests/05-locale.tcl
— part of check-in
[205ad8c75e]
at
2010-09-26 04:48:25
on branch trunk
— Updated to create tests log with PASS/FAIL
Added additional information to Locale test (user: rkeene, size: 252) [annotate] [blame] [check-ins using]
1 2 3 4 5 6 7 8 9 10 11 12 | 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 | + + + |
#! /usr/bin/env tclsh
# Tcl 8.4 doesn't support fetching the system encoding from the environment
if {$tcl_version == "8.4"} {
exit 0
}
if {[encoding system] == "utf-8"} {
exit 0
}
puts "Locale: [encoding system]"
puts "Expected: utf-8"
exit 1
|