Diff

Differences From Artifact [19da5ec8b9]:

To Artifact [995899b7e1]:


     1      1   #! /usr/bin/env tclsh
     2      2   
     3      3   # Tcl 8.4 doesn't support fetching the system encoding from the environment
     4      4   if {$tcl_version == "8.4"} {
     5      5   	exit 0
     6      6   }
            7  +
            8  +# This test does not yet support when using Win32
            9  +if {$::tcl_platform(platform) == "windows"} {
           10  +	exit 0
           11  +}
     7     12   
     8     13   if {[encoding system] == "utf-8"} {
     9     14   	exit 0
    10     15   }
    11     16   
    12     17   puts "Locale:   [encoding system]"
    13     18   puts "Expected: utf-8"
    14     19   
    15     20   exit 1