ffi: map (array n bchar) to Lisp string.

* ffi.c (struct txr_ffi_type): New bitfield flag, bchar_conv.
(ffi_array_in, ffi_array_get): Handle bchar_conv.
(ffi_type_compile): Set bchar_conv flag for array of bchar.

* lib.c (string_8bit_size): New function.

* lib.h (string_8bit_size): Declared.

1 files changed, 1 insertions, 0 deletions

diff --git a/lib.h b/lib.h
index 4875ef2a..814b0621 100644
--- a/lib.h
+++ b/lib.h
@@ -726,6 +726,7 @@ val string_own(wchar_t *str);
 val string(const wchar_t *str);
 val string_utf8(const char *str);
 val string_8bit(const unsigned char *str);
+val string_8bit_size(const unsigned char *str, size_t sz);
 val mkstring(val len, val ch);
 val mkustring(val len); /* must initialize immediately with init_str! */
 val init_str(val str, const wchar_t *);