* scm-lang.c: Moved Scheme value printing code to ...

[binutils.git] / gdb / rs6000-nat.c

diff --git a/gdb/rs6000-nat.c b/gdb/rs6000-nat.c
index 18bce296380502e3ae67668a4c8329cc920445be..996cba9fe7001d89f0ea15a80fa8ff866dddb16d 100644 (file)
--- a/gdb/rs6000-nat.c
+++ b/gdb/rs6000-nat.c
@@ -1,5 +1,6 @@
 /* IBM RS/6000 native-dependent code for GDB, the GNU debugger.
-   Copyright 1986, 1987, 1989, 1991, 1992, 1994 Free Software Foundation, Inc.
+   Copyright 1986, 1987, 1989, 1991, 1992, 1994, 1995
+            Free Software Foundation, Inc.
 
 This file is part of GDB.
 
@@ -500,6 +501,16 @@ vmap_ldinfo (ldi)
        if (vp->objfile == NULL)
          got_exec_file = 1;
 
+#ifdef DONT_RELOCATE_SYMFILE_OBJFILE
+       if (vp->objfile == symfile_objfile
+           || vp->objfile == NULL)
+         {
+           ldi->ldinfo_dataorg = 0;
+           vp->dstart = (CORE_ADDR) 0;
+           vp->dend = ldi->ldinfo_datasize;
+         }
+#endif
+
        /* relocate symbol table(s). */
        vmap_symtab (vp);
 
@@ -707,6 +718,14 @@ xcoff_relocate_core (target)
       vp->dstart = (CORE_ADDR) ldip->ldinfo_dataorg;
       vp->dend = vp->dstart + ldip->ldinfo_datasize;
 
+#ifdef DONT_RELOCATE_SYMFILE_OBJFILE
+      if (vp == vmap)
+       {
+         vp->dstart = (CORE_ADDR) 0;
+         vp->dend = ldip->ldinfo_datasize;
+       }
+#endif
+
       if (vp->tadj != 0)
        {
          vp->tstart += vp->tadj;