changeset 39803:3be833ec55f7

(empty_string): New var. (syms_of_emacs): Initialize it.
author Stefan Monnier <monnier@iro.umontreal.ca>
date Fri, 12 Oct 2001 02:10:29 +0000
parents efbac46c874c
children b5d09b92489c
files src/emacs.c
diffstat 1 files changed, 6 insertions(+), 0 deletions(-) [+]
line wrap: on
line diff
--- a/src/emacs.c	Fri Oct 12 02:01:23 2001 +0000
+++ b/src/emacs.c	Fri Oct 12 02:10:29 2001 +0000
@@ -108,6 +108,9 @@
 /* Hook run by `kill-emacs' before it does really anything.  */
 Lisp_Object Vkill_emacs_hook;
 
+/* An empty lisp string.  To avoid having to build any other.  */
+Lisp_Object empty_string;
+
 #ifdef SIGUSR1
 /* Hooks for signal USR1 and USR2 handing */
 Lisp_Object Vsignal_USR1_hook;
@@ -2208,6 +2211,9 @@
 see `kill-emacs-query-functions' instead.");
   Vkill_emacs_hook = Qnil;
 
+  empty_string = build_string ("");
+  staticpro (&empty_string);
+
 #ifdef SIGUSR1
   DEFVAR_LISP ("signal-USR1-hook", &Vsignal_USR1_hook,
     "Hook to be run whenever emacs receives a USR1 signal");