diff src/process.c @ 97650:8b1a761cfe61

[!subprocesses]: Define QCname. (syms_of_process): Intern and staticpro it.
author Eli Zaretskii <eliz@gnu.org>
date Sat, 23 Aug 2008 16:48:55 +0000
parents e4a1b306a650
children 1a81f5db02cf
line wrap: on
line diff
--- a/src/process.c	Sat Aug 23 16:48:24 2008 +0000
+++ b/src/process.c	Sat Aug 23 16:48:55 2008 +0000
@@ -7933,7 +7933,7 @@
 extern EMACS_TIME timer_check ();
 extern int timers_run;
 
-Lisp_Object QCtype;
+Lisp_Object QCtype, QCname;
 
 /* As described above, except assuming that there are no subprocesses:
 
@@ -8273,6 +8273,8 @@
 {
   QCtype = intern (":type");
   staticpro (&QCtype);
+  QCname = intern (":name");
+  staticpro (&QCname);
 
   defsubr (&Sget_buffer_process);
   defsubr (&Sprocess_inherit_coding_system_flag);