* s390-tdep.c (s390_gdbarch_init): Set default long double

	type to 128-bit IEEE quad.

diff --git a/gdb/ChangeLog b/gdb/ChangeLog
index ac27b703518d3dffe369fdc5bc4e1430b4177b93..7c1f0a20661d44250ac5bd2db18733e417781603 100644 (file)
--- a/gdb/ChangeLog
+++ b/gdb/ChangeLog
@@ -1,3 +1,8 @@
+2008-01-17  Ulrich Weigand  <uweigand@de.ibm.com>
+
+       * s390-tdep.c (s390_gdbarch_init): Set default long double
+       type to 128-bit IEEE quad.
+
 2008-01-17  Joel Brobecker  <brobecker@adacore.com>
 
        * hpux-thread.c (hpux_thread_resume): Delete commented-out code.

diff --git a/gdb/s390-tdep.c b/gdb/s390-tdep.c
index b448b2291b4f883d006c4967b5744c2ede1a3c84..f25a371eb41c1033d5684ac6193fd5fd3d2c7171 100644 (file)
--- a/gdb/s390-tdep.c
+++ b/gdb/s390-tdep.c
@@ -2328,6 +2328,12 @@ s390_gdbarch_init (struct gdbarch_info info, struct gdbarch_list *arches)
   set_gdbarch_believe_pcc_promotion (gdbarch, 0);
   set_gdbarch_char_signed (gdbarch, 0);
 
+  /* S/390 GNU/Linux uses either 64-bit or 128-bit long doubles.
+     We can safely let them default to 128-bit, since the debug info
+     will give the size of type actually used in each case.  */
+  set_gdbarch_long_double_bit (gdbarch, 128);
+  set_gdbarch_long_double_format (gdbarch, floatformats_ia64_quad);
+
   /* Amount PC must be decremented by after a breakpoint.  This is
      often the number of bytes returned by gdbarch_breakpoint_from_pc but not
      always.  */