Mercurial > hg > xemacs-beta

diff src/alloc.c @ 245:51092a27c943 r20-5b21

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r20-5b21
author cvs
date Mon, 13 Aug 2007 10:17:54 +0200
parents f220cc83d72e
children e70b3a057e12
line wrap: on
line diff
--- a/src/alloc.c	Mon Aug 13 10:17:09 2007 +0200
+++ b/src/alloc.c	Mon Aug 13 10:17:54 2007 +0200
@@ -1194,7 +1194,7 @@
 static unsigned int
 size_vector (CONST void *lheader)
 {
-  struct Lisp_Vector *p = lheader;
+  CONST struct Lisp_Vector *p = lheader;
   /*
    * -1 because struct Lisp_Vector includes 1 slot
    */
@@ -1783,6 +1783,7 @@
   p->plist = Qnil;
   p->value = Qunbound;
   p->function = Qunbound;
+  p->obarray = Qnil;
   symbol_next (p) = 0;
   XSETSYMBOL (val, p);
   return val;