From 02054d9cd1f5c6a5ca3555207235522532477e10 Mon Sep 17 00:00:00 2001 From: Andrea Corallo Date: Tue, 1 Feb 2022 17:58:47 +0100 Subject: [PATCH] * Improve 'maybe_defer_native_compilation' * src/comp.c (maybe_defer_native_compilation): Always store the function name in Vcomp_deferred_pending_h if pending for deferred compilation. --- src/comp.c | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/src/comp.c b/src/comp.c index 5efe026b2b2..251613dc3d4 100644 --- a/src/comp.c +++ b/src/comp.c @@ -5127,13 +5127,14 @@ maybe_defer_native_compilation (Lisp_Object function_name, return; } + Fputhash (function_name, definition, Vcomp_deferred_pending_h); + /* This is so deferred compilation is able to compile comp dependencies breaking circularity. */ if (comp__compilable) { /* Startup is done, comp is usable. */ CALL0I (startup--require-comp-safely); - Fputhash (function_name, definition, Vcomp_deferred_pending_h); CALLN (Ffuncall, intern_c_string ("native--compile-async"), src, Qnil, Qlate); } -- 2.39.5