fix: double free problem

1 files changed, 8 insertions, 6 deletions

diff --git a/sys/libbio/test.c b/sys/libbio/test.c
index 3941290..fb79302 100644
--- a/sys/libbio/test.c
+++ b/sys/libbio/test.c
@@ -36,6 +36,7 @@ static mem·Allocator arena = {.alloc = &bio·alloc, .realloc = &bio·realloc, .
 // -----------------------------------------------------------------------
 // Read/writer
 
+/* Static reader thunk */
 static Stream* INPUT;
 
 static 
@@ -52,8 +53,9 @@ unget(byte c)
     return io·ungetbyte(INPUT, c);
 }
 
-static io·Peeker peeker = {.get = &get, .unget = &unget};
+static io·Peeker rdr = {.get = &get, .unget = &unget};
 
+/* Static writer thunk */
 static Stream* OUTPUT;
 
 static 
@@ -70,7 +72,7 @@ putstr(string s)
     return io·putstring(OUTPUT, s);
 }
 
-static io·Putter putter = {.put = &put, .putstr = &putstr};
+static io·Putter wtr = {.put = &put, .putstr = &putstr};
 
 // -----------------------------------------------------------------------
 // Point of entry for testing
@@ -96,13 +98,13 @@ main()
     INPUT  = fd[0];
     OUTPUT = fd[1];
 
-    printf("starting\n");
-    t   = bio·readnewick(peeker, arena);
-    err = bio·writenewick(t, putter);
-    printf("ending\n");
+    t   = bio·readnewick(rdr, arena);
+    err = bio·writenewick(t, wtr);
 
     io·flush(fd[1]);
     io·close(fd[0]); io·close(fd[1]);
+
+    mem·freearena(ARENA);
     return 0;
 }