diff options
author | Francois-Xavier Coudert <coudert@clipper.ens.fr> | 2006-04-01 23:24:24 +0200 |
---|---|---|
committer | François-Xavier Coudert <fxcoudert@gcc.gnu.org> | 2006-04-01 21:24:24 +0000 |
commit | 24726083a438725ef1f4b2d60f6805c08fa11dff (patch) | |
tree | 8489bd85194f7913f54e4532882f23479256a65a | |
parent | 37da9343f55f4733e6028b9bddc5c1425cecc8eb (diff) | |
download | gcc-24726083a438725ef1f4b2d60f6805c08fa11dff.zip gcc-24726083a438725ef1f4b2d60f6805c08fa11dff.tar.gz gcc-24726083a438725ef1f4b2d60f6805c08fa11dff.tar.bz2 |
fpu-387.h: Use previously added SSE code in all cases, as it really is the right thing to do.
* config/fpu-387.h: Use previously added SSE code in all
cases, as it really is the right thing to do.
From-SVN: r112610
-rw-r--r-- | libgfortran/ChangeLog | 5 | ||||
-rw-r--r-- | libgfortran/config/fpu-387.h | 10 |
2 files changed, 5 insertions, 10 deletions
diff --git a/libgfortran/ChangeLog b/libgfortran/ChangeLog index 33cfb15..e3c5bbb 100644 --- a/libgfortran/ChangeLog +++ b/libgfortran/ChangeLog @@ -1,3 +1,8 @@ +2006-04-01 Francois-Xavier Coudert <coudert@clipper.ens.fr> + + * config/fpu-387.h: Use previously added SSE code in all + cases, as it really is the right thing to do. + 2006-03-30 Jerry DeLisle <jvdelisle@gcc.gnu.org> PR libgfortran/26890 diff --git a/libgfortran/config/fpu-387.h b/libgfortran/config/fpu-387.h index 5e3dec2..5678ade 100644 --- a/libgfortran/config/fpu-387.h +++ b/libgfortran/config/fpu-387.h @@ -93,7 +93,6 @@ void set_fpu (void) /* SSE */ asm volatile ("stmxcsr %0" : "=m" (cw_sse)); cw_sse &= 0xFFFF0000; -#ifdef __APPLE__ cw_sse |= (_FPU_MASK_IM | _FPU_MASK_DM | _FPU_MASK_ZM | _FPU_MASK_OM | _FPU_MASK_UM | _FPU_MASK_PM ) << 7; if (options.fpe & GFC_FPE_INVALID) cw_sse &= ~(_FPU_MASK_IM << 7); @@ -103,14 +102,5 @@ void set_fpu (void) if (options.fpe & GFC_FPE_UNDERFLOW) cw_sse &= ~(_FPU_MASK_UM << 7); if (options.fpe & GFC_FPE_PRECISION) cw_sse &= ~(_FPU_MASK_PM << 7); asm volatile ("ldmxcsr %0" : : "m" (cw_sse)); -#else - if (options.fpe & GFC_FPE_INVALID) cw_sse |= 1 << 7; - if (options.fpe & GFC_FPE_DENORMAL) cw_sse |= 1 << 8; - if (options.fpe & GFC_FPE_ZERO) cw_sse |= 1 << 9; - if (options.fpe & GFC_FPE_OVERFLOW) cw_sse |= 1 << 10; - if (options.fpe & GFC_FPE_UNDERFLOW) cw_sse |= 1 << 11; - if (options.fpe & GFC_FPE_PRECISION) cw_sse |= 1 << 12; - asm volatile ("ldmxcsr %0" : : "m" (cw_sse)); -#endif } } |