From 37cfe995711604880217b1e07ee1274819a2b926 Mon Sep 17 00:00:00 2001
From: Kaz Kylheku <kaz@kylheku.com>
Date: Sun, 24 Feb 2019 08:07:51 -0800
Subject: 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.
---
 ffi.c | 1 +
 1 file changed, 1 insertion(+)

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