* elf.c (_bfd_elf_make_section_from_shdr): Only set SEC_DATA if
[deliverable/binutils-gdb.git] / gdb / pyr-tdep.c
index b79ea0c83471443e6404711e9312c18fd915540a..f635b558eddfd096c878d925ec689db9ec4d47c6 100644 (file)
@@ -1,21 +1,23 @@
-/* Low level interface to ptrace, for GDB when running under Unix.
-   Copyright (C) 1988, 1989 Free Software Foundation, Inc.
+/* Pyramid target-dependent code for GDB.
+   Copyright (C) 1988, 1989, 1991 Free Software Foundation, Inc.
 
 This file is part of GDB.
 
-GDB is free software; you can redistribute it and/or modify
+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
-the Free Software Foundation; either version 1, or (at your option)
-any later version.
+the Free Software Foundation; either version 2 of the License, or
+(at your option) any later version.
 
-GDB is distributed in the hope that it will be useful,
+This program is distributed in the hope that it will be useful,
 but WITHOUT ANY WARRANTY; without even the implied warranty of
 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 GNU General Public License for more details.
 
 You should have received a copy of the GNU General Public License
-along with GDB; see the file COPYING.  If not, write to
-the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA.  */
+along with this program; if not, write to the Free Software
+Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.  */
+
+#include "defs.h"
 
 /*** Prettier register printing. ***/
 
@@ -28,28 +30,30 @@ pyr_print_registers(reg_buf, regnum)
   struct user u;
 
   for (regno = 0; regno < 16; regno++) {
-    printf/*_filtered*/ ("%6.6s: %8x  %6.6s: %8x  %6s: %8x  %6s: %8x\n",
+    printf_unfiltered/*_filtered*/ ("%6.6s: %8x  %6.6s: %8x  %6s: %8x  %6s: %8x\n",
                     reg_names[regno], reg_buf[regno],
                     reg_names[regno+16], reg_buf[regno+16],
                     reg_names[regno+32], reg_buf[regno+32],
                     reg_names[regno+48], reg_buf[regno+48]);
   }
   usp = ptrace (3, inferior_pid,
-                     ((char *)&u.u_pcb.pcb_usp) -
-                     ((char *)&u), 0);
+               (PTRACE_ARG3_TYPE) ((char *)&u.u_pcb.pcb_usp) -
+               ((char *)&u), 0);
   ksp = ptrace (3, inferior_pid,
-                     ((char *)&u.u_pcb.pcb_ksp) -
-                     ((char *)&u), 0);
-  printf/*_filtered*/ ("\n%6.6s: %8x  %6.6s: %8x (%08x) %6.6s %8x\n",
+               (PTRACE_ARG3_TYPE) ((char *)&u.u_pcb.pcb_ksp) -
+               ((char *)&u), 0);
+  printf_unfiltered/*_filtered*/ ("\n%6.6s: %8x  %6.6s: %8x (%08x) %6.6s %8x\n",
                   reg_names[CSP_REGNUM],reg_buf[CSP_REGNUM],
                   reg_names[KSP_REGNUM], reg_buf[KSP_REGNUM], ksp,
                   "usp", usp);
 }
 
-/* Print the register regnum, or all registers if regnum is -1. */
+/* Print the register regnum, or all registers if regnum is -1.
+   fpregs is currently ignored.  */
 
-pyr_do_registers_info (regnum)
+pyr_do_registers_info (regnum, fpregs)
     int regnum;
+    int fpregs;
 {
   /* On a pyr, we know a virtual register can always fit in an long.
      Here (and elsewhere) we take advantage of that.  Yuk.  */
@@ -72,7 +76,7 @@ pyr_do_registers_info (regnum)
        if (val == 0)
          printf_filtered ("0");
        else
-         printf_filtered ("0x%08x  %d", val, val);
+         printf_filtered ("%s  %d", local_hex_string_custom(val,"08"), val);
        printf_filtered("\n");
       }
 }
@@ -85,7 +89,7 @@ CORE_ADDR frame_locals_address (frame)
   register int addr = find_saved_register (frame,CFP_REGNUM);
   register int result = read_memory_integer (addr, 4);
 #ifdef PYRAMID_CONTROL_FRAME_DEBUGGING
-  fprintf (stderr,
+  fprintf_unfiltered (stderr,
           "\t[[..frame_locals:%8x, %s= %x @%x fcfp= %x foo= %x\n\t gr13=%x pr13=%x tr13=%x @%x]]\n",
           frame->frame,
           reg_names[CFP_REGNUM],
@@ -111,7 +115,7 @@ CORE_ADDR frame_args_addr (frame)
   register int result = read_memory_integer (addr, 4);
 
 #ifdef PYRAMID_CONTROL_FRAME_DEBUGGING
-  fprintf (stderr,
+  fprintf_unfiltered (stderr,
           "\t[[..frame_args:%8x, %s= %x @%x fcfp= %x r_r= %x\n\t gr13=%x pr13=%x tr13=%x @%x]]\n",
           frame->frame,
           reg_names[CFP_REGNUM],
This page took 0.024829 seconds and 4 git commands to generate.