Merge GDB 7.5.1

gdb/ppc-sysv-tdep.c

 /* Target-dependent code for PowerPC systems using the SVR4 ABI
    for GDB, the GNU debugger.
 
    Copyright (C) 2000-2003, 2005, 2007-2012 Free Software Foundation,
    Inc.
 
    This file is part of GDB.
 
    This program is free software; you can redistribute it and/or modify
    it under the terms of the GNU General Public License as published by
@@ skipping 1023 matching lines @@
           if (TYPE_LENGTH (type) > tdep->wordsize)
             regcache_cooked_write (regcache, tdep->ppc_gp0_regnum + 4,
                                    regvals + 1 * tdep->wordsize);
         }
       return RETURN_VALUE_REGISTER_CONVENTION;
     }
   return RETURN_VALUE_STRUCT_CONVENTION;
 }
 
 enum return_value_convention
-ppc_sysv_abi_return_value (struct gdbarch *gdbarch, struct type *func_type,
+ppc_sysv_abi_return_value (struct gdbarch *gdbarch, struct value *function,
                            struct type *valtype, struct regcache *regcache,
                            gdb_byte *readbuf, const gdb_byte *writebuf)
 {
-  return do_ppc_sysv_return_value (gdbarch, func_type, valtype, regcache,
-                                   readbuf, writebuf, 0);
+  return do_ppc_sysv_return_value (gdbarch,
+                                   function ? value_type (function) : NULL,
+                                   valtype, regcache, readbuf, writebuf, 0);
 }
 
 enum return_value_convention
 ppc_sysv_abi_broken_return_value (struct gdbarch *gdbarch,
-                                  struct type *func_type,
+                                  struct value *function,
                                   struct type *valtype,
                                   struct regcache *regcache,
                                   gdb_byte *readbuf, const gdb_byte *writebuf)
 {
-  return do_ppc_sysv_return_value (gdbarch, func_type, valtype, regcache,
-                                   readbuf, writebuf, 1);
+  return do_ppc_sysv_return_value (gdbarch,
+                                   function ? value_type (function) : NULL,
+                                   valtype, regcache, readbuf, writebuf, 1);
 }
 
 /* The helper function for 64-bit SYSV push_dummy_call.  Converts the
    function's code address back into the function's descriptor
    address.
 
    Find a value for the TOC register.  Every symbol should have both
    ".FN" and "FN" in the minimal symbol table.  "FN" points at the
    FN's descriptor, while ".FN" points at the entry point (which
    matches FUNC_ADDR).  Need to reverse from FUNC_ADDR back to the
    FN's descriptor address (while at the same time being careful to
    find "FN" in the same object file as ".FN").  */
 
 static int
 convert_code_addr_to_desc_addr (CORE_ADDR code_addr, CORE_ADDR *desc_addr)
 {
   struct obj_section *dot_fn_section;
   struct minimal_symbol *dot_fn;
   struct minimal_symbol *fn;
-  CORE_ADDR toc;
   /* Find the minimal symbol that corresponds to CODE_ADDR (should
      have a name of the form ".FN").  */
   dot_fn = lookup_minimal_symbol_by_pc (code_addr);
   if (dot_fn == NULL || SYMBOL_LINKAGE_NAME (dot_fn)[0] != '.')
     return 0;
   /* Get the section that contains CODE_ADDR.  Need this for the
      "objfile" that it contains.  */
   dot_fn_section = find_pc_section (code_addr);
   if (dot_fn_section == NULL || dot_fn_section->objfile == NULL)
     return 0;
@@ skipping 612 matching lines @@
 
    Return non-zero if the return-value is stored in a register, return
    0 if the return-value is instead stored on the stack (a.k.a.,
    struct return convention).
 
    For a return-value stored in a register: when WRITEBUF is non-NULL,
    copy the buffer to the corresponding register return-value location
    location; when READBUF is non-NULL, fill the buffer from the
    corresponding register return-value location.  */
 enum return_value_convention
-ppc64_sysv_abi_return_value (struct gdbarch *gdbarch, struct type *func_type,
+ppc64_sysv_abi_return_value (struct gdbarch *gdbarch, struct value *function,
                              struct type *valtype, struct regcache *regcache,
                              gdb_byte *readbuf, const gdb_byte *writebuf)
 {
   struct gdbarch_tdep *tdep = gdbarch_tdep (gdbarch);
   enum bfd_endian byte_order = gdbarch_byte_order (gdbarch);
+  struct type *func_type = function ? value_type (function) : NULL;
   int opencl_abi = func_type? ppc_sysv_use_opencl_abi (func_type) : 0;
 
   /* This function exists to support a calling convention that
      requires floating-point registers.  It shouldn't be used on
      processors that lack them.  */
   gdb_assert (ppc_floating_point_unit_p (gdbarch));
 
   /* Floats and doubles in F1.  */
   if (TYPE_CODE (valtype) == TYPE_CODE_FLT && TYPE_LENGTH (valtype) <= 8)
     {
@@ skipping 227 matching lines @@
               if (readbuf != NULL)
                 regcache_cooked_read (regcache, tdep->ppc_fp0_regnum + 1 + i,
                                       (bfd_byte *) readbuf + i * 8);
             }
         }
       return RETURN_VALUE_REGISTER_CONVENTION;
     }
   return RETURN_VALUE_STRUCT_CONVENTION;
 }