From: Andrea Corallo <akrl@sdf.org>
Date: Sat, 6 Jun 2020 12:20:47 +0000 (+0200)
Subject: * Clean-up unnecessary lisp_X context definition
X-Git-Tag: emacs-28.0.90~2727^2~587
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=6449a058b150edd2a5997d761a284ad6b9b5aa97;p=emacs.git

* Clean-up unnecessary lisp_X context definition

	* src/comp.c (Fcomp__init_ctxt, comp_t): Remove lisp_X
	definition as is used only locally.
---

diff --git a/src/comp.c b/src/comp.c
index 9171a6a524b..b2dbfe88b3b 100644
--- a/src/comp.c
+++ b/src/comp.c
@@ -489,9 +489,6 @@ typedef struct {
   gcc_jit_type *ptrdiff_type;
   gcc_jit_type *uintptr_type;
   gcc_jit_type *size_t_type;
-#if LISP_WORDS_ARE_POINTERS
-  gcc_jit_type *lisp_X;
-#endif
   gcc_jit_type *lisp_word_type;
   gcc_jit_type *lisp_word_tag_type;
 #ifdef LISP_OBJECT_IS_STRUCT
@@ -3811,11 +3808,12 @@ DEFUN ("comp--init-ctxt", Fcomp__init_ctxt, Scomp__init_ctxt,
 						       sizeof (EMACS_UINT),
 						       false);
 #if LISP_WORDS_ARE_POINTERS
-  comp.lisp_X =
-    gcc_jit_struct_as_type (gcc_jit_context_new_opaque_struct (comp.ctxt,
-							       NULL,
-							       "Lisp_X"));
-  comp.lisp_word_type = gcc_jit_type_get_pointer (comp.lisp_X);
+  comp.lisp_word_type =
+    gcc_jit_type_get_pointer (
+      gcc_jit_struct_as_type (
+	gcc_jit_context_new_opaque_struct (comp.ctxt,
+					   NULL,
+					   "Lisp_X")));
 #else
   comp.lisp_word_type = comp.emacs_int_type;
 #endif