ffi: add carrayp function.

* ffi.c (carrayp): New function.
(ffi_init): Register carrayp intrinsic.

* ffi.h (carrayp): Declared.

* txr.1: Documented.

1 files changed, 1 insertions, 0 deletions

diff --git a/ffi.h b/ffi.h
index 773b0bfd..3995bb03 100644
--- a/ffi.h
+++ b/ffi.h
@@ -87,6 +87,7 @@ val ffi_in(val srcbuf, val obj, val type, val copy_p);
 val ffi_get(val srcbuf, val type);
 val ffi_out(val dstbuf, val obj, val type, val copy_p);
 val make_carray(val type, mem_t *data, cnum nelem, val ref);
+val carrayp(val obj);
 val carray_set_length(val carray, val nelem);
 val carray_dup(val carray);
 val carray_own(val carray);