Fix use of raw null constant in carray implementation.

* ffi.c (carray_cptr): Ref argument in make_carray
call should be specified as nil not 0. The meaning is
the same, but it's wrong style for TXR internals.

1 files changed, 1 insertions, 1 deletions

diff --git a/ffi.c b/ffi.c
index 9d1163f5..4aa67d89 100644
--- a/ffi.c
+++ b/ffi.c
@@ -4803,7 +4803,7 @@ val carray_cptr(val cptr, val type, val len)
   mem_t *data = cptr_get(cptr);
   cnum nelem = c_num(default_arg(len, negone));
   (void) ffi_type_struct(type);
-  return make_carray(type, data, nelem, 0);
+  return make_carray(type, data, nelem, nil);
 }
 
 val vec_carray(val carray, val null_term_p)