summaryrefslogtreecommitdiffstats
path: root/library/platform/platform.tcl
diff options
context:
space:
mode:
authorandreas_kupries <akupries@shaw.ca>2009-05-29 16:28:03 (GMT)
committerandreas_kupries <akupries@shaw.ca>2009-05-29 16:28:03 (GMT)
commit8b7d58d45372ecb03111fa3d1b23d8d161074295 (patch)
tree9b548d400962a38dc606dc3c70f2ef17192547d3 /library/platform/platform.tcl
parentc928dd4059aa6908a40bcb9e7ce94c163e6abfdf (diff)
downloadtcl-8b7d58d45372ecb03111fa3d1b23d8d161074295.zip
tcl-8b7d58d45372ecb03111fa3d1b23d8d161074295.tar.gz
tcl-8b7d58d45372ecb03111fa3d1b23d8d161074295.tar.bz2
* library/platform/platform.tcl: Fixed handling of cpu ia64,
* library/platform/pkgIndex.tcl: taking ia64_32 into account * unix/Makefile.in: now. Bumped version to 1.0.5. Updated the * win/Makefile.in: installation commands.
Diffstat (limited to 'library/platform/platform.tcl')
-rw-r--r--library/platform/platform.tcl6
1 files changed, 3 insertions, 3 deletions
diff --git a/library/platform/platform.tcl b/library/platform/platform.tcl
index b42c419..1a454cd 100644
--- a/library/platform/platform.tcl
+++ b/library/platform/platform.tcl
@@ -103,7 +103,7 @@ proc ::platform::generic {} {
}
sunos {
set plat solaris
- if {$cpu ne "ia64"} {
+ if {![string match "ia64*" $cpu]} {
if {$tcl_platform(wordSize) == 8} {
append cpu 64
}
@@ -127,7 +127,7 @@ proc ::platform::generic {} {
}
hp-ux {
set plat hpux
- if {$cpu ne "ia64"} {
+ if {![string match "ia64*" $cpu]} {
set cpu parisc
if {$tcl_platform(wordSize) == 8} {
append cpu 64
@@ -289,7 +289,7 @@ proc ::platform::patterns {id} {
# ### ### ### ######### ######### #########
## Ready
-package provide platform 1.0.4
+package provide platform 1.0.5
# ### ### ### ######### ######### #########
## Demo application