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, 1 insertions, 1 deletions

diff --git a/ffi.c b/ffi.c
index aa55a39e..cad0376d 100644
--- a/ffi.c
+++ b/ffi.c
@@ -642,7 +642,7 @@ static val ffi_buf_get(struct txr_ffi_type *tft, mem_t *src, val self)
 static mem_t *ffi_buf_alloc(struct txr_ffi_type *tft, val buf, val self)
 {
   (void) tft;
-  return buf_get(buf, self);
+  return coerce(mem_t *, buf_addr_of(buf, self));
 }
 
 static void ffi_ptr_walk(struct txr_ffi_type *tft, mem_t *ctx,