summaryrefslogtreecommitdiff
path: root/libgfortran
diff options
context:
space:
mode:
authorro <ro@138bc75d-0d04-0410-961f-82ee72b054a4>2011-06-03 17:36:21 +0000
committerro <ro@138bc75d-0d04-0410-961f-82ee72b054a4>2011-06-03 17:36:21 +0000
commit31510e9d8dedeaa4dcd36d1610bdb77d9226e6eb (patch)
tree03fddddad6b605215bb09601e9cb08a3577d7380 /libgfortran
parent8087ae75a8531f278d2ea6deef2a3a1978b72e56 (diff)
downloadgcc-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/ChangeLog7
-rw-r--r--libgfortran/config/fpu-387.h8
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);