summaryrefslogtreecommitdiffstats
path: root/library/platform/platform.tcl
diff options
context:
space:
mode:
authorandreas_kupries <akupries@shaw.ca>2010-06-09 20:11:22 (GMT)
committerandreas_kupries <akupries@shaw.ca>2010-06-09 20:11:22 (GMT)
commit81c023bcb0900a37988a5deb611bc4f4aba68545 (patch)
treed3535edbbcc4259f0a8b9c252f7fee50957430dc /library/platform/platform.tcl
parent8a156a221fe2df91c04841eefa6bfcac1700df40 (diff)
downloadtcl-81c023bcb0900a37988a5deb611bc4f4aba68545.zip
tcl-81c023bcb0900a37988a5deb611bc4f4aba68545.tar.gz
tcl-81c023bcb0900a37988a5deb611bc4f4aba68545.tar.bz2
* library/platform/platform.tcl: Added OSX Intel 64bit
* library/platform/pkgIndex.tcl: Package updated to version 1.0.9. * unix/Makefile.in: * win/Makefile.in:
Diffstat (limited to 'library/platform/platform.tcl')
-rw-r--r--library/platform/platform.tcl25
1 files changed, 22 insertions, 3 deletions
diff --git a/library/platform/platform.tcl b/library/platform/platform.tcl
index 370c48a..572a8b4 100644
--- a/library/platform/platform.tcl
+++ b/library/platform/platform.tcl
@@ -281,6 +281,13 @@ proc ::platform::patterns {id} {
macosx*-* {
# 10.5+
if {[regexp {macosx([^-]*)-(.*)} $id -> v cpu]} {
+
+ switch -exact -- $cpu {
+ ix86 -
+ x86_64 { set alt i386-x86_64 }
+ default { set alt {} }
+ }
+
if {$v ne ""} {
foreach {major minor} [split $v .] break
@@ -289,22 +296,34 @@ proc ::platform::patterns {id} {
for {set j $minor} {$j >= 5} {incr j -1} {
lappend res macosx${major}.${j}-${cpu}
lappend res macosx${major}.${j}-universal
+ if {$alt ne {}} {
+ lappend res macosx${major}.${j}-$alt
+ }
}
# Add unversioned patterns for 10.3/10.4 builds.
lappend res macosx-${cpu}
lappend res macosx-universal
+ if {$alt ne {}} {
+ lappend res macosx-$alt
+ }
} else {
lappend res macosx-universal
+ if {$alt ne {}} {
+ lappend res macosx-$alt
+ }
}
} else {
lappend res macosx-universal
}
}
- macosx-powerpc -
- macosx-ix86 {
+ macosx-powerpc {
lappend res macosx-universal
}
+ macosx-x86_64 -
+ macosx-ix86 {
+ lappend res macosx-universal macosx-i386-x86_64
+ }
}
lappend res tcl ; # Pure tcl packages are always compatible.
return $res
@@ -314,7 +333,7 @@ proc ::platform::patterns {id} {
# ### ### ### ######### ######### #########
## Ready
-package provide platform 1.0.8
+package provide platform 1.0.9
# ### ### ### ######### ######### #########
## Demo application