diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2024-04-12 15:16:50 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2024-04-12 15:16:50 (GMT) |
| commit | 4ff3c3cf90b83dde3d417f6aea0e88e8f15009c5 (patch) | |
| tree | bfd56dd8eb0beae4bdf1ce4e2238affd798e3f1b /tests-perf | |
| parent | acd94364f531568551c8f3f8eca58c27f936675f (diff) | |
| download | tcl-4ff3c3cf90b83dde3d417f6aea0e88e8f15009c5.zip tcl-4ff3c3cf90b83dde3d417f6aea0e88e8f15009c5.tar.gz tcl-4ff3c3cf90b83dde3d417f6aea0e88e8f15009c5.tar.bz2 | |
Add lot's of "-encoding utf-8" to our own "source" commands: We are becoming more independant from the system encoding.
Diffstat (limited to 'tests-perf')
| -rw-r--r-- | tests-perf/chan.perf.tcl | 2 | ||||
| -rw-r--r-- | tests-perf/clock.perf.tcl | 2 | ||||
| -rw-r--r-- | tests-perf/list.perf.tcl | 2 | ||||
| -rw-r--r-- | tests-perf/timer-event.perf.tcl | 2 |
4 files changed, 4 insertions, 4 deletions
diff --git a/tests-perf/chan.perf.tcl b/tests-perf/chan.perf.tcl index 2ef87cb..56acccf 100644 --- a/tests-perf/chan.perf.tcl +++ b/tests-perf/chan.perf.tcl @@ -17,7 +17,7 @@ if {![namespace exists ::tclTestPerf]} { - source [file join [file dirname [info script]] test-performance.tcl] + source -encoding utf-8 [file join [file dirname [info script]] test-performance.tcl] } diff --git a/tests-perf/clock.perf.tcl b/tests-perf/clock.perf.tcl index 35fe219..bbfdc67 100644 --- a/tests-perf/clock.perf.tcl +++ b/tests-perf/clock.perf.tcl @@ -22,7 +22,7 @@ if {[info exists ::argv0] && [file tail $::argv0] eq [file tail [info script]]} ## common test performance framework: if {![namespace exists ::tclTestPerf]} { - source [file join [file dirname [info script]] test-performance.tcl] + source -encoding utf-8 [file join [file dirname [info script]] test-performance.tcl] } namespace eval ::tclTestPerf-TclClock { diff --git a/tests-perf/list.perf.tcl b/tests-perf/list.perf.tcl index 121a922..564fad0 100644 --- a/tests-perf/list.perf.tcl +++ b/tests-perf/list.perf.tcl @@ -17,7 +17,7 @@ if {![namespace exists ::tclTestPerf]} { - source [file join [file dirname [info script]] test-performance.tcl] + source -encoding utf-8 [file join [file dirname [info script]] test-performance.tcl] } diff --git a/tests-perf/timer-event.perf.tcl b/tests-perf/timer-event.perf.tcl index f68a56a..8256a0e 100644 --- a/tests-perf/timer-event.perf.tcl +++ b/tests-perf/timer-event.perf.tcl @@ -17,7 +17,7 @@ if {![namespace exists ::tclTestPerf]} { - source [file join [file dirname [info script]] test-performance.tcl] + source -encoding utf-8 [file join [file dirname [info script]] test-performance.tcl] } |