ffi: correct treatment of (ptr buf).

The buf FFI type's alloc virtual should return a pointer to
the buffer's pointer, not the buffer itself.
What's currently going on is something silly, whereby
the pointer to the buffer is stored into the buffer
itself.

* buf.c (buf_addr_of): New function.

* buf.c (buf_addr_of): Declared.

* ffi.c (ffi_buf_alloc): Use buf_addr_of instead of buf_get.

1 files changed, 6 insertions, 0 deletions

diff --git a/buf.c b/buf.c
index 58cd4177..661514be 100644
--- a/buf.c
+++ b/buf.c
@@ -204,6 +204,12 @@ mem_t *buf_get(val buf, val self)
   return b->data;
 }
 
+mem_t **buf_addr_of(val buf, val self)
+{
+  struct buf *b = buf_handle(buf, self);
+  return &b->data;
+}
+
 void buf_fill(val buf, mem_t *src, val self)
 {
   struct buf *b = buf_handle(buf, self);