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.
8 +#if defined(__sgi) && defined(_COMPILER_VERSION)
12 @@ -2166,7 +2166,7 @@ TclInitDoubleConversion(void)
17 +#if defined(__sgi) && defined(_COMPILER_VERSION)
20 mipsCR.fc_word = get_fpc_csr();