/* -*-c-*-
*
- * $Id: pkbuf.c,v 1.1 2000/06/17 10:39:19 mdw Exp $
+ * $Id: pkbuf.c,v 1.3 2000/07/16 18:55:45 mdw Exp $
*
* Simple packet buffering
*
/*----- Revision history --------------------------------------------------*
*
* $Log: pkbuf.c,v $
+ * Revision 1.3 2000/07/16 18:55:45 mdw
+ * Remove some stray debugging code.
+ *
+ * Revision 1.2 2000/07/16 12:29:16 mdw
+ * Change to arena `realloc' interface, to fix a design bug.
+ *
* Revision 1.1 2000/06/17 10:39:19 mdw
* Experimental new support for packet buffering.
*
void pkbuf_close(pkbuf *pk)
{
if (pk->buf) {
- fprintf(stderr, "*** destroying buffer, closing down\n");
x_free(pk->a, pk->buf);
pk->buf = 0;
}
do pk->sz <<= 1; while (want < pk->sz);
if (pk->buf) {
if (pk->len)
- pk->buf = x_realloc(pk->a, pk->buf, pk->sz);
+ pk->buf = x_realloc(pk->a, pk->buf, pk->sz, pk->len);
else {
x_free(pk->a, pk->buf);
pk->buf = 0;