diff options
author | Richard Henderson <rth@redhat.com> | 2011-06-03 10:36:21 -0700 |
---|---|---|
committer | Rainer Orth <ro@gcc.gnu.org> | 2011-06-03 17:36:21 +0000 |
commit | 1b7a0148f070deb07455f06a15ff13834c92f17b (patch) | |
tree | 03fddddad6b605215bb09601e9cb08a3577d7380 /libgfortran | |
parent | 737346fa2420aaa838ad95995d9007f1599ff18b (diff) | |
download | gcc-1b7a0148f070deb07455f06a15ff13834c92f17b.zip gcc-1b7a0148f070deb07455f06a15ff13834c92f17b.tar.gz gcc-1b7a0148f070deb07455f06a15ff13834c92f17b.tar.bz2 |
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.
Co-Authored-By: Rainer Orth <ro@CeBiTec.Uni-Bielefeld.DE>
From-SVN: r174609
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 9092921..5a22cd3 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 c3e57cb..8bf55b2 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); |