From 2cf4b81009eeedd1b441af093c0ca147d0d9bbb9 Mon Sep 17 00:00:00 2001 From: Andrea Corallo Date: Mon, 9 Mar 2020 10:45:51 +0000 Subject: [PATCH] * Fix GC mark for native compiled functions native_intspec and native_doc fields has to be reached by the subr cause are not anymore in the CU. --- src/alloc.c | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/src/alloc.c b/src/alloc.c index 9a01edca3f8..ac173077132 100644 --- a/src/alloc.c +++ b/src/alloc.c @@ -6683,9 +6683,9 @@ mark_object (Lisp_Object arg) { set_vector_marked (ptr); struct Lisp_Subr *subr = XSUBR (obj); - obj = subr->native_comp_u[0]; - eassert (obj); - goto loop; + mark_object (subr->native_intspec); + mark_object (subr->native_doc); + mark_object (subr->native_comp_u[0]); } break; -- 2.39.5