X-Git-Url: http://www.chiark.greenend.org.uk/ucgi/~mdw/git/mLib/blobdiff_plain/436fddaa5c6b52604602d7838a832c5d2dfeef10..6075c3ad0f97c1811e50e1dd7fc6ca15f5bcd310:/pkbuf.c

diff --git a/pkbuf.c b/pkbuf.c
index 73e2ca5..ce39d94 100644
--- a/pkbuf.c
+++ b/pkbuf.c
@@ -1,6 +1,6 @@
 /* -*-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
  *
@@ -30,6 +30,12 @@
 /*----- 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.
  *
@@ -126,7 +132,6 @@ void pkbuf_flush(pkbuf *pk, octet *p, size_t len)
 void pkbuf_close(pkbuf *pk)
 {
   if (pk->buf) {
-    fprintf(stderr, "*** destroying buffer, closing down\n");
     x_free(pk->a, pk->buf);
     pk->buf = 0;
   }
@@ -206,7 +211,7 @@ void pkbuf_want(pkbuf *pk, size_t want)
     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;