lang/tcl/patches/200-fix_mips_build.patch

   1 --- a/generic/tclStrToD.c
   2 +++ b/generic/tclStrToD.c
   3 @@ -73,7 +73,7 @@ typedef unsigned int fpu_control_t __att
   4   * MIPS floating-point units need special settings in control registers
   5   * to use gradual underflow as we expect.
   6   */
   7 -#if defined(__mips)
   8 +#if defined(__sgi) && defined(_COMPILER_VERSION)
   9  #include <sys/fpu.h>
  10  #endif
  11  /*
  12 @@ -2166,7 +2166,7 @@ TclInitDoubleConversion(void)
  13      } bitwhack;
  14  #endif
  15
  16 -#if defined(__mips)
  17 +#if defined(__sgi) && defined(_COMPILER_VERSION)
  18      union fpc_csr mipsCR;
  19
  20      mipsCR.fc_word = get_fpc_csr();