# HG changeset patch
# User Karl Heuer <kwzh@gnu.org>
# Date 933349750 0
# Node ID 11070f3c5b593f8d35fdd71d6067e2bc07d8145a
# Parent  07b44154638f865164958ea93c64f8b1ac8de485
(allocate_vectorlike): Add missing increment.

diff -r 07b44154638f -r 11070f3c5b59 src/alloc.c
--- a/src/alloc.c	Fri Jul 30 15:46:56 1999 +0000
+++ b/src/alloc.c	Fri Jul 30 15:49:10 1999 +0000
@@ -860,7 +860,7 @@
   consing_since_gc += (sizeof (struct Lisp_Vector)
 		       + (len - 1) * sizeof (Lisp_Object));
   vector_cells_consed += len;
-  n_vectors;
+  n_vectors++;
 
   p->next = all_vectors;
   all_vectors = p;