]> code.delx.au - gnu-emacs/blobdiff - src/unexalpha.c
*** empty log message ***
[gnu-emacs] / src / unexalpha.c
index de6c46a83588ffc3a9c1a9b4d220fae5f1a21b19..97f8f383dda3ae9af832a8d78d67a9eae3a2ac83 100644 (file)
@@ -26,7 +26,6 @@ Boston, MA 02111-1307, USA.  */
 #include <sys/stat.h>
 #include <sys/mman.h>
 #include <stdio.h>
-#include <varargs.h>
 #include <errno.h>
 #ifdef HAVE_STRING_H
 #include <string.h>
@@ -81,8 +80,10 @@ Boston, MA 02111-1307, USA.  */
 #define        _SBSS           ".sbss"
 #endif /* __NetBSD__ || __OpenBSD__ */
 
-static void fatal_unexec ();
-static void mark_x ();
+static void fatal_unexec __P ((char *, char *));
+static void mark_x __P ((char *));
+
+static void update_dynamic_symbols __P ((char *, char *, int, struct aouthdr));
 
 #define READ(_fd, _buffer, _size, _error_message, _error_arg) \
        errno = EEOF; \
@@ -142,6 +143,7 @@ struct headers {
 #define DEFAULT_ENTRY_ADDRESS __start
 #endif
 \f
+void
 unexec (new_name, a_name, data_start, bss_start, entry_address)
      char *new_name, *a_name;
      unsigned long data_start, bss_start, entry_address;
@@ -424,7 +426,7 @@ unexec (new_name, a_name, data_start, bss_start, entry_address)
 }
 
 
-
+static void
 update_dynamic_symbols (old, new_name, new, aout)
      char *old;                        /* Pointer to old executable */
      char *new_name;            /* Name of new executable */
@@ -483,12 +485,12 @@ update_dynamic_symbols (old, new_name, new, aout)
       fprintf (stderr, "...relocated\n");
 #endif
 
-      if (rd_base[i].type == R_REFLONG) 
+      if (rd_base[i].type == R_REFLONG)
        len = 4;
-      else if (rd_base[i].type == R_REFQUAD) 
+      else if (rd_base[i].type == R_REFQUAD)
        len = 8;
       else
-       fatal_unexec ("unrecognized relocation type in .dyn.rel section (symbol #%d)", i);
+       fatal_unexec ("unrecognized relocation type in .dyn.rel section (symbol #%d)", (char *) i);
 
       SEEK (new, newref, "seeking to dynamic symbol in %s", new_name);
       WRITE (new, oldref, len, "writing old dynrel info in %s", new_name);
@@ -538,3 +540,6 @@ fatal_unexec (s, arg)
   fputs (".\n", stderr);
   exit (1);
 }
+
+/* arch-tag: 46316c49-ee08-4aa3-942b-00798902f5bd
+   (do not change this comment) */