ffi: gc bug in cptr type.

* ffi.c (ffi_type_common_mark): We must mark tft->tag field
whih is used by the cptr type and is otherwise nil.

1 files changed, 1 insertions, 0 deletions

diff --git a/ffi.c b/ffi.c
index 9643ac87..b047d859 100644
--- a/ffi.c
+++ b/ffi.c
@@ -244,6 +244,7 @@ static void ffi_type_common_mark(struct txr_ffi_type *tft)
 {
   gc_mark(tft->lt);
   gc_mark(tft->syntax);
+  gc_mark(tft->tag);
 }
 
 static void ffi_type_mark(val obj)