# HG changeset patch # User Richard M. Stallman # Date 1030887921 0 # Node ID 85923ab921121731e3c65df8a55c9009620e3439 # Parent 4e4edde4b0a6f8ae5c061dab046b01f2331ae898 Initial version. diff -r 4e4edde4b0a6 -r 85923ab92112 src/unexsol.c --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/src/unexsol.c Sun Sep 01 13:45:21 2002 +0000 @@ -0,0 +1,17 @@ +/* Trivial unexec for Solaris. */ + +#include +#include +#include + +#include "lisp.h" + +int +unexec (char *new_name, char *old_name, unsigned int data_start, + unsigned int bss_start, unsigned int entry_address) +{ + if (dldump (0, new_name, RTLD_MEMORY)) + report_file_error ("Cannot unexec", Fcons (build_string (new_name), Qnil)); + + return 0; +}