From: Andrea Corallo <andrea_corallo@yahoo.it>
Date: Mon, 24 Jun 2019 11:45:08 +0000 (+0200)
Subject: add emit_EQ
X-Git-Tag: emacs-28.0.90~2727^2~1434
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=4d4f2a4efc8fb58d8b3375578b763aee33b6e91a;p=emacs.git

add emit_EQ
---

diff --git a/src/comp.c b/src/comp.c
index 4f3a80572d1..6f5ca5f4ecd 100644
--- a/src/comp.c
+++ b/src/comp.c
@@ -522,6 +522,15 @@ emit_rval_XCONS (gcc_jit_rvalue *a)
 			   LISP_WORD_TAG (Lisp_Cons));
 }
 
+static gcc_jit_rvalue *
+emit_EQ (gcc_jit_rvalue *x, gcc_jit_rvalue *y)
+{
+  return gcc_jit_context_new_comparison (
+	   comp.ctxt,
+	   NULL,
+	   GCC_JIT_COMPARISON_EQ,
+	   emit_rval_XLI (x),
+	   emit_rval_XLI (y));
 }
 
 static gcc_jit_rvalue *