mirror of
git://git.sv.gnu.org/emacs.git
synced 2026-01-01 09:51:22 -08:00
e5560ff7d2
(BUF_FETCH_MULTIBYTE_CHAR): Likewise. * character.c (_fetch_multibyte_char_p): Remove. * alloc.c: Include "character.h" before "buffer.h". * bidi.c: Likewise. * buffer.c: Likewise. * bytecode.c: Likewise. * callint.c: Likewise. * callproc.c: Likewise. * casefiddle.c: Likewise. * casetab.c: Likewise. * category.c: Likewise. * cmds.c: Likewise. * coding.c: Likewise. * composite.c: Likewise. * dired.c: Likewise. * dispnew.c: Likewise. * doc.c: Likewise. * dosfns.c: Likewise. * editfns.c: Likewise. * emacs.c: Likewise. * fileio.c: Likewise. * filelock.c: Likewise. * font.c: Likewise. * fontset.c: Likewise. * fringe.c: Likewise. * indent.c: Likewise. * insdel.c: Likewise. * intervals.c: Likewise. * keyboard.c: Likewise. * keymap.c: Likewise. * lread.c: Likewise. * macros.c: Likewise. * marker.c: Likewise. * minibuf.c: Likewise. * nsfns.m: Likewise. * nsmenu.m: Likewise. * print.c: Likewise. * process.c: Likewise. * regex.c: Likewise. * region-cache.c: Likewise. * search.c: Likewise. * syntax.c: Likewise. * term.c: Likewise. * textprop.c: Likewise. * undo.c: Likewise. * unexsol.c: Likewise. * w16select.c: Likewise. * w32fns.c: Likewise. * w32menu.c: Likewise. * window.c: Likewise. * xdisp.c: Likewise. * xfns.c: Likewise. * xmenu.c: Likewise. * xml.c: Likewise. * xselect.c: Likewise.
31 lines
674 B
C
31 lines
674 B
C
/* Trivial unexec for Solaris. */
|
|
|
|
#include <config.h>
|
|
#include "unexec.h"
|
|
|
|
#include <dlfcn.h>
|
|
#include <setjmp.h>
|
|
|
|
#include "lisp.h"
|
|
#include "character.h"
|
|
#include "buffer.h"
|
|
#include "charset.h"
|
|
#include "coding.h"
|
|
|
|
void
|
|
unexec (const char *new_name, const char *old_name)
|
|
{
|
|
Lisp_Object data;
|
|
Lisp_Object errstring;
|
|
|
|
if (! dldump (0, new_name, RTLD_MEMORY))
|
|
return;
|
|
|
|
data = Fcons (build_string (new_name), Qnil);
|
|
synchronize_system_messages_locale ();
|
|
errstring = code_convert_string_norecord (build_string (dlerror ()),
|
|
Vlocale_coding_system, 0);
|
|
|
|
xsignal (Qfile_error,
|
|
Fcons (build_string ("Cannot unexec"), Fcons (errstring, data)));
|
|
}
|