Commit 331e2d7b authored by Karl Heuer's avatar Karl Heuer
Browse files

(allocate_vectorlike): Add missing increment.

parent 32f532b7
...@@ -860,7 +860,7 @@ allocate_vectorlike (len) ...@@ -860,7 +860,7 @@ allocate_vectorlike (len)
consing_since_gc += (sizeof (struct Lisp_Vector) consing_since_gc += (sizeof (struct Lisp_Vector)
+ (len - 1) * sizeof (Lisp_Object)); + (len - 1) * sizeof (Lisp_Object));
vector_cells_consed += len; vector_cells_consed += len;
n_vectors; n_vectors++;
p->next = all_vectors; p->next = all_vectors;
all_vectors = p; all_vectors = p;
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment