diff src/unexfx2800.c @ 524:79ea818b6aed

entered into RCS
author Jim Blandy <jimb@redhat.com>
date Fri, 31 Jan 1992 21:19:17 +0000
parents
children
line wrap: on
line diff
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/src/unexfx2800.c	Fri Jan 31 21:19:17 1992 +0000
@@ -0,0 +1,16 @@
+/* Unexec for the Alliant FX/2800.  */
+
+#include <stdio.h>
+
+unexec (new_name, a_name, data_start, bss_start, entry_address)
+     char *new_name, *a_name;
+     unsigned data_start, bss_start, entry_address;
+{
+  int stat;
+    
+  stat = elf_write_modified_data (a_name, new_name);
+  if (stat < 0)
+    perror ("emacs: elf_write_modified_data");
+  else if (stat > 0)
+    fprintf (stderr, "Unspecified error from elf_write_modified_data.\n");
+}