/* -*-c-*-
*
- * $Id: darray.c,v 1.5 2000/06/17 10:37:39 mdw Exp $
+ * $Id: darray.c,v 1.6 2000/07/16 12:29:16 mdw Exp $
*
* Dynamically growing dense arrays
*
/*----- Revision history --------------------------------------------------*
*
* $Log: darray.c,v $
+ * Revision 1.6 2000/07/16 12:29:16 mdw
+ * Change to arena `realloc' interface, to fix a design bug.
+ *
* Revision 1.5 2000/06/17 10:37:39 mdw
* Add support for arena management.
*
*/
if (p && slots == b->off) {
- q = x_realloc(b->a, p - b->off * sz, nsz * sz);
+ q = x_realloc(b->a, p - b->off * sz, nsz * sz, b->sz + b->off);
q += slots * sz;
} else {
q = x_alloc(b->a, nsz * sz);