diff options
author | ro <ro@138bc75d-0d04-0410-961f-82ee72b054a4> | 2011-06-03 17:36:21 +0000 |
---|---|---|
committer | ro <ro@138bc75d-0d04-0410-961f-82ee72b054a4> | 2011-06-03 17:36:21 +0000 |
commit | 31510e9d8dedeaa4dcd36d1610bdb77d9226e6eb (patch) | |
tree | 03fddddad6b605215bb09601e9cb08a3577d7380 /libgfortran | |
parent | 8087ae75a8531f278d2ea6deef2a3a1978b72e56 (diff) | |
download | gcc-31510e9d8dedeaa4dcd36d1610bdb77d9226e6eb.tar.gz |
gcc:
* config/i386/crtfastmath.c [!__x86_64__ && __sun__ && __svr4__]
(sigill_hdlr): Correct insn, insn size.
(set_fast_math) [!__x86_64__ && __sun__ && __svr4__]: Use movaps.
gcc/testsuite:
* lib/target-supports.exp (check_sse_os_support_available): Use
movaps.
libgfortran.
* config/fpu-387.h [__sun__ && __svr4__] (sigill_hdlr): Correct
insn, insn size.
(has_sse) [!__x86_64__ && __sun__ && __svr4__]: Use movaps.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@174609 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'libgfortran')
-rw-r--r-- | libgfortran/ChangeLog | 7 | ||||
-rw-r--r-- | libgfortran/config/fpu-387.h | 8 |
2 files changed, 11 insertions, 4 deletions
diff --git a/libgfortran/ChangeLog b/libgfortran/ChangeLog index 90929219d8c..5a22cd32bc7 100644 --- a/libgfortran/ChangeLog +++ b/libgfortran/ChangeLog @@ -1,3 +1,10 @@ +2011-06-03 Richard Henderson <rth@redhat.com> + Rainer Orth <ro@CeBiTec.Uni-Bielefeld.DE> + + * config/fpu-387.h [__sun__ && __svr4__] (sigill_hdlr): Correct + insn, insn size. + (has_sse) [!__x86_64__ && __sun__ && __svr4__]: Use movaps. + 2011-05-29 Janne Blomqvist <jb@gcc.gnu.org> PR libfortran/48931 diff --git a/libgfortran/config/fpu-387.h b/libgfortran/config/fpu-387.h index c3e57cba39b..8bf55b28a61 100644 --- a/libgfortran/config/fpu-387.h +++ b/libgfortran/config/fpu-387.h @@ -1,5 +1,5 @@ /* FPU-related code for x86 and x86_64 processors. - Copyright 2005, 2007, 2009, 2010 Free Software Foundation, Inc. + Copyright 2005, 2007, 2009, 2010, 2011 Free Software Foundation, Inc. Contributed by Francois-Xavier Coudert <coudert@clipper.ens.fr> This file is part of the GNU Fortran 95 runtime library (libgfortran). @@ -40,9 +40,9 @@ sigill_hdlr (int sig __attribute((unused)), { sigill_caught = 1; /* Set PC to the instruction after the faulting one to skip over it, - otherwise we enter an infinite loop. 4 is the size of the stmxcsr + otherwise we enter an infinite loop. 3 is the size of the movaps instruction. */ - ucp->uc_mcontext.gregs[EIP] += 4; + ucp->uc_mcontext.gregs[EIP] += 3; setcontext (ucp); } #endif @@ -73,7 +73,7 @@ has_sse (void) /* We need a single SSE instruction here so the handler can safely skip over it. */ - __asm__ volatile ("movss %xmm2,%xmm1"); + __asm__ volatile ("movaps %xmm0,%xmm0"); sigaction (SIGILL, &oact, NULL); |