Diff

Differences From Artifact [2810807ee8]:

To Artifact [99bcefeb9e]:


    44     44   			foreach ext $failedexts {
    45     45   				puts "  $ext"
    46     46   			}
    47     47   			exit 1
    48     48   		}
    49     49   	}
    50     50   	"list" {
    51         -		set os [string tolower $tcl_platform(os)]
           51  +		if {$tcl_platform(platform) == "unix"} {
           52  +			set os [string tolower $tcl_platform(os)]
           53  +		} else {
           54  +			set os [string tolower $tcl_platform(platform)]
           55  +		}
    52     56   		set cpu [string tolower $tcl_platform(machine)]
    53     57   		if {[llength $argv] > 0} {
    54     58   			set os [lindex $argv 0]
    55     59   		}
    56     60   		if {[llength $argv] > 1} {
    57     61   			set cpu [lindex $argv 1]
    58     62   		}