Change to arena `realloc' interface, to fix a design bug.

[mLib] / pkbuf.c

diff --git a/pkbuf.c b/pkbuf.c
index 73e2ca520783e6b2818d6b6a547ad85d5c69148a..31830e0e00320e4d8728d3d95d2008da0a8768e1 100644 (file)
--- a/pkbuf.c
+++ b/pkbuf.c
@@ -1,6 +1,6 @@
 /* -*-c-*-
  *
 /* -*-c-*-
  *

- * $Id: pkbuf.c,v 1.1 2000/06/17 10:39:19 mdw Exp $
+ * $Id: pkbuf.c,v 1.2 2000/07/16 12:29:16 mdw Exp $

  *
  * Simple packet buffering
  *
  *
  * Simple packet buffering
  *


@@ -30,6 +30,9 @@
 /*----- Revision history --------------------------------------------------* 
  *
  * $Log: pkbuf.c,v $
 /*----- Revision history --------------------------------------------------* 
  *
  * $Log: pkbuf.c,v $

+ * 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.
  *
  * Revision 1.1  2000/06/17 10:39:19  mdw
  * Experimental new support for packet buffering.
  *


@@ -206,7 +209,7 @@ void pkbuf_want(pkbuf *pk, size_t want)
     do pk->sz <<= 1; while (want < pk->sz);
     if (pk->buf) {
       if (pk->len)
     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;
       else {
        x_free(pk->a, pk->buf);
        pk->buf = 0;