From: Andrea Corallo <andrea_corallo@yahoo.it>
Date: Sun, 16 Jun 2019 13:38:15 +0000 (+0200)
Subject: Bstack_set2 support
X-Git-Tag: emacs-28.0.90~2727^2~1470
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=eefd7d819cbcd4f1996875a6b4932845841eb099;p=emacs.git

Bstack_set2 support
---

diff --git a/src/comp.c b/src/comp.c
index 134d1baabcd..65e480b5daf 100644
--- a/src/comp.c
+++ b/src/comp.c
@@ -1961,7 +1961,12 @@ compile_f (const char *f_name, ptrdiff_t bytestr_length,
 	  break;
 
 	case Bstack_set2:
-	  error ("Bstack_set2 not supported");
+	  op = FETCH2;
+	  POP1;
+	  gcc_jit_block_add_assignment (comp.bblock->gcc_bb,
+					NULL,
+					*(stack - op),
+					args[0]);
 	  break;
 
 	case BdiscardN: