Mercurial > hg > xemacs-beta

diff src/symbols.c @ 207:e45d5e7c476e r20-4b2

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r20-4b2
author cvs
date Mon, 13 Aug 2007 10:03:52 +0200
parents a2f645c6b9f8
children 78478c60bfcd
line wrap: on
line diff
--- a/src/symbols.c	Mon Aug 13 10:02:48 2007 +0200
+++ b/src/symbols.c	Mon Aug 13 10:03:52 2007 +0200
@@ -3103,6 +3103,9 @@
 #ifndef Qzero
 Lisp_Object Qzero;
 #endif
+#ifndef Qnull_pointer
+Lisp_Object Qnull_pointer;
+#endif
 
 /* some losing systems can't have static vars at function scope... */
 static struct symbol_value_magic guts_of_unbound_marker =
@@ -3122,6 +3125,10 @@
   Qzero = make_int (0);	/* Only used if Lisp_Object is a union type */
 #endif
 
+#ifndef Qnull_pointer
+  Qnull_pointer.ui = 0;
+#endif
+
   Vobarray = make_vector (OBARRAY_SIZE, Qzero);
   initial_obarray = Vobarray;
   staticpro (&initial_obarray);