* s390-tdep.c (s390_gdbarch_init): Register the function

`standard_coerce_float_to_double', since GCC for the S/390 follows
the standard rules for passing floats.

diff --git a/gdb/ChangeLog b/gdb/ChangeLog
index d5c14c7..5e7641c 100644 (file)
--- a/gdb/ChangeLog
+++ b/gdb/ChangeLog
@@ -1,5 +1,9 @@
 2001-11-13  Jim Blandy  <jimb@redhat.com>
 
+       * s390-tdep.c (s390_gdbarch_init): Register the function
+       `standard_coerce_float_to_double', since GCC for the S/390 follows
+       the standard rules for passing floats.
+
        * valops.c (default_coerce_float_to_double,
        standard_coerce_float_to_double): Doc fixes.
 

diff --git a/gdb/s390-tdep.c b/gdb/s390-tdep.c
index 5f34b39..e682880 100644 (file)
--- a/gdb/s390-tdep.c
+++ b/gdb/s390-tdep.c
@@ -1454,6 +1454,8 @@ s390_gdbarch_init (struct gdbarch_info info, struct gdbarch_list *arches)
   set_gdbarch_sizeof_call_dummy_words (gdbarch,
                                        sizeof (s390_call_dummy_words));
   set_gdbarch_call_dummy_words (gdbarch, s390_call_dummy_words);
+  set_gdbarch_coerce_float_to_double (gdbarch,
+                                      standard_coerce_float_to_double);
 
   switch (info.bfd_arch_info->mach)
     {