Index: tcl8.3.3/unix/configure
diff -c tcl8.3.3/unix/configure:1.1.1.1 tcl8.3.3/unix/configure:1.4
*** tcl8.3.3/unix/configure:1.1.1.1	Wed Jun  6 13:24:55 2001
--- tcl8.3.3/unix/configure	Thu Feb 14 10:17:55 2002
***************
*** 4652,4661 ****
  	    # results, and the version is kept in special file).
  	
  	    if test -r /etc/.relid -a "X`uname -n`" = "X`uname -s`" ; then
! 		system=MP-RAS-`awk '{print }' /etc/.relid'`
  	    fi
  	    if test "`uname -s`" = "AIX" ; then
  		system=AIX-`uname -v`.`uname -r`
  	    fi
  	    echo "$ac_t""$system" 1>&6
  	fi
--- 4652,4665 ----
  	    # results, and the version is kept in special file).
  	
  	    if test -r /etc/.relid -a "X`uname -n`" = "X`uname -s`" ; then
! 		system=MP-RAS-`awk '{print }' /etc/.relid`
  	    fi
  	    if test "`uname -s`" = "AIX" ; then
  		system=AIX-`uname -v`.`uname -r`
+                 # Only do the special ELF processing for AIX for ia64:
+                 if test "`uname -s`" = "5"  -a "`uname -m`" = "ia64"; then
+ 		   system="${system}-ia64"
+ 	        fi
  	    fi
  	    echo "$ac_t""$system" 1>&6
  	fi
***************
*** 4738,4744 ****
      TCL_EXP_FILE=""
      STLIB_LD="ar cr"
      case $system in
! 	AIX-5.*)
  	    if test "${TCL_THREADS}" = "1" -a "$using_gcc" = "no" ; then
  		# AIX requires the _r compiler when gcc isn't being used
  		if test "${CC}" != "cc_r" ; then
--- 4742,4748 ----
      TCL_EXP_FILE=""
      STLIB_LD="ar cr"
      case $system in
! 	AIX-5.*-ia64)
  	    if test "${TCL_THREADS}" = "1" -a "$using_gcc" = "no" ; then
  		# AIX requires the _r compiler when gcc isn't being used
  		if test "${CC}" != "cc_r" ; then
Index: tcl8.3.3/unix/configure.in
diff -c tcl8.3.3/unix/configure.in:1.1.1.1 tcl8.3.3/unix/configure.in:1.2
*** tcl8.3.3/unix/configure.in:1.1.1.1	Wed Jun  6 13:24:55 2001
--- tcl8.3.3/unix/configure.in	Thu Feb 14 09:41:06 2002
***************
*** 387,393 ****
          BSD/OS*)
  	    ;;
  
! 	AIX-[[1-4]].*)
              ;;
  
          *)
--- 387,393 ----
          BSD/OS*)
  	    ;;
  
! 	AIX-[[1-5]].*)
              ;;
  
          *)