From df95115a32034b7c896916df8b068b1e6db796aa Mon Sep 17 00:00:00 2001
From: Kaz Kylheku <kaz@kylheku.com>
Date: Wed, 22 Mar 2023 22:58:21 -0700
Subject: ffi: gc bug in ffi_enum_type.

This is reproducible using

 ./txr --gc-debug tests/017/ffi-misc.tl

* ffi.c (ffi_enum_type_mark): We must mark the tft->eltype
because enumerations use that member.
---
 ffi.c | 1 +
 1 file changed, 1 insertion(+)

diff --git a/ffi.c b/ffi.c
index e97eadb5..f293b59b 100644
--- a/ffi.c
+++ b/ffi.c
@@ -335,6 +335,7 @@ static void ffi_enum_type_mark(val obj)
   ffi_type_common_mark(tft);
   gc_mark(tft->sym_num);
   gc_mark(tft->num_sym);
+  gc_mark(tft->eltype);
 }
 
 static struct cobj_ops ffi_type_builtin_ops =
-- 
cgit v1.2.3