[MLton-commit] r6532

[Ville Laurikari]

Fixed AIX architecture detection to work with old AIX versions.

----------------------------------------------------------------------

U   mlton/trunk/bin/platform

----------------------------------------------------------------------

Modified: mlton/trunk/bin/platform
===================================================================
--- mlton/trunk/bin/platform	2008-04-06 22:49:43 UTC (rev 6531)
+++ mlton/trunk/bin/platform	2008-04-07 06:56:07 UTC (rev 6532)
@@ -29,7 +29,10 @@
 case "$uname" in
 AIX)
         HOST_OS='aix'
-        arch=`uname -p`
+        arch=`/usr/sbin/lsattr -a type -F deflt -l proc0`
+        case $arch in
+        POWER) arch=powerpc ;;
+        esac
 ;;
 CYGWIN*)
         HOST_OS='cygwin'