src/unexsol.c

   1 /* Trivial unexec for Solaris.  */
   2
   3 #include <config.h>
   4 #include <stdlib.h>
   5 #include <dlfcn.h>
   6
   7 #include "lisp.h"
   8
   9 int
  10 unexec (char *new_name, char *old_name, unsigned int data_start,
  11         unsigned int bss_start, unsigned int entry_address)
  12 {
  13   if (dldump (0, new_name, RTLD_MEMORY))
  14     report_file_error ("Cannot unexec", Fcons (build_string (new_name), Qnil));
  15
  16   return 0;
  17 }