From: Andrea Corallo <andrea_corallo@yahoo.it>
Date: Mon, 2 Sep 2019 16:01:18 +0000 (+0200)
Subject: simplify condition in emit_ctxt_code
X-Git-Tag: emacs-28.0.90~2727^2~1219
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=6d4d9225afcca63f36b318b11be945146007b00e;p=emacs.git

simplify condition in emit_ctxt_code
---

diff --git a/src/comp.c b/src/comp.c
index d36f239f510..eb6119b1118 100644
--- a/src/comp.c
+++ b/src/comp.c
@@ -1726,10 +1726,10 @@ emit_ctxt_code (void)
   FOR_EACH_TAIL (f_subr)
     {
       Lisp_Object subr_sym = XCAR (f_subr);
+      Lisp_Object subr = Fsymbol_function (subr_sym);
       /* Ignore inliners. This are not real functions to be imported.  */
-      if (NILP (Fgethash (subr_sym, comp.emitter_dispatcher, Qnil)))
+      if (SUBRP (subr))
 	{
-	  Lisp_Object subr = Fsymbol_function (subr_sym);
 	  Lisp_Object maxarg = XCDR (Fsubr_arity (subr));
 	  gcc_jit_field *field =
 	    declare_imported_func (subr_sym, comp.lisp_obj_type,