From b15f6304249de5ba503bedc9944cb57aa1771cd8 Mon Sep 17 00:00:00 2001
From: Kaz Kylheku <kaz@kylheku.com>
Date: Sat, 15 Jul 2017 08:59:32 -0700
Subject: 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.
---
 ffi.c | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'ffi.c')

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)
-- 
cgit v1.2.3