From f4265f6c27b42ce61d3189a99cf9d6247304f9fe Mon Sep 17 00:00:00 2001 From: Dan Nicolaescu Date: Wed, 11 Nov 2009 19:25:24 +0000 Subject: * frame.c (make_initial_frame): * buffer.c (init_buffer_once): Use make_pure_c_string instead of build_string. * alloc.c (syms_of_alloc): Build Vmemory_signal_data in pure memory. --- src/ChangeLog | 5 +++++ src/alloc.c | 4 ++-- src/buffer.c | 2 +- src/frame.c | 2 +- 4 files changed, 9 insertions(+), 4 deletions(-) diff --git a/src/ChangeLog b/src/ChangeLog index b174073a82..c3d4e29124 100644 --- a/src/ChangeLog +++ b/src/ChangeLog @@ -1,5 +1,10 @@ 2009-11-11 Dan Nicolaescu + * frame.c (make_initial_frame): + * buffer.c (init_buffer_once): Use make_pure_c_string instead of + build_string. + * alloc.c (syms_of_alloc): Build Vmemory_signal_data in pure memory. + * s/freebsd.h: * s/netbsd.h: Remove code referring to non-existent file: unexsunos4.o. diff --git a/src/alloc.c b/src/alloc.c index 6241cde424..b009157cc3 100644 --- a/src/alloc.c +++ b/src/alloc.c @@ -6401,8 +6401,8 @@ This means that certain objects should be allocated in shared (pure) space. */) /* We build this in advance because if we wait until we need it, we might not be able to allocate the memory to hold it. */ Vmemory_signal_data - = list2 (Qerror, - build_string ("Memory exhausted--use M-x save-some-buffers then exit and restart Emacs")); + = pure_cons (Qerror, + pure_cons (make_pure_c_string ("Memory exhausted--use M-x save-some-buffers then exit and restart Emacs"), Qnil)); DEFVAR_LISP ("memory-full", &Vmemory_full, doc: /* Non-nil means Emacs cannot get much more Lisp memory. */); diff --git a/src/buffer.c b/src/buffer.c index c4e90363c6..8edea2d872 100644 --- a/src/buffer.c +++ b/src/buffer.c @@ -5302,7 +5302,7 @@ init_buffer_once () current_buffer = 0; all_buffers = 0; - QSFundamental = build_string ("Fundamental"); + QSFundamental = make_pure_c_string ("Fundamental"); Qfundamental_mode = intern_c_string ("fundamental-mode"); buffer_defaults.major_mode = Qfundamental_mode; diff --git a/src/frame.c b/src/frame.c index b3c3b83735..467f6bd148 100644 --- a/src/frame.c +++ b/src/frame.c @@ -543,7 +543,7 @@ make_initial_frame (void) Vframe_list = Fcons (frame, Vframe_list); tty_frame_count = 1; - f->name = build_string ("F1"); + f->name = make_pure_c_string ("F1"); f->visible = 1; f->async_visible = 1; -- cgit v1.2.3