diff src/emacs.c @ 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 42b7a798ff79
children 66e0816837a8
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");