From acb46fd42a2ebbe48944d0c80bfc21cf5e7bbcd1 Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Sun, 1 Sep 2002 13:45:21 +0000 Subject: [PATCH] Initial version. --- src/unexsol.c | 17 +++++++++++++++++ 1 file changed, 17 insertions(+) create mode 100644 src/unexsol.c diff --git a/src/unexsol.c b/src/unexsol.c new file mode 100644 index 00000000000..ff8a812f279 --- /dev/null +++ b/src/unexsol.c @@ -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; +} -- 2.39.5