From: Richard Henderson <richard.henderson@linaro.org>
To: qemu-devel@nongnu.org
Cc: peter.maydell@linaro.org, Richard Henderson <rth@twiddle.net>
Subject: [Qemu-devel] [PULL 09/14] tcg/s390: Merge muli facilities check to tcg_target_op_def
Date: Wed, 6 Sep 2017 07:49:35 -0700 [thread overview]
Message-ID: <20170906144940.30880-10-richard.henderson@linaro.org> (raw)
In-Reply-To: <20170906144940.30880-1-richard.henderson@linaro.org>
From: Richard Henderson <rth@twiddle.net>
Acked-by: Cornelia Huck <cohuck@redhat.com>
Signed-off-by: Richard Henderson <rth@twiddle.net>
---
tcg/s390/tcg-target.inc.c | 45 +++++++++++++++++++++++++--------------------
1 file changed, 25 insertions(+), 20 deletions(-)
diff --git a/tcg/s390/tcg-target.inc.c b/tcg/s390/tcg-target.inc.c
index e075b4844a..ff3f644f8e 100644
--- a/tcg/s390/tcg-target.inc.c
+++ b/tcg/s390/tcg-target.inc.c
@@ -38,12 +38,13 @@
a 32-bit displacement here Just In Case. */
#define USE_LONG_BRANCHES 0
-#define TCG_CT_CONST_MULI 0x100
-#define TCG_CT_CONST_ORI 0x200
-#define TCG_CT_CONST_XORI 0x400
-#define TCG_CT_CONST_U31 0x800
-#define TCG_CT_CONST_ADLI 0x1000
-#define TCG_CT_CONST_ZERO 0x2000
+#define TCG_CT_CONST_S16 0x100
+#define TCG_CT_CONST_S32 0x200
+#define TCG_CT_CONST_ORI 0x400
+#define TCG_CT_CONST_XORI 0x800
+#define TCG_CT_CONST_U31 0x1000
+#define TCG_CT_CONST_ADLI 0x2000
+#define TCG_CT_CONST_ZERO 0x4000
/* Several places within the instruction set 0 means "no register"
rather than TCG_REG_R0. */
@@ -388,8 +389,11 @@ static const char *target_parse_constraint(TCGArgConstraint *ct,
case 'A':
ct->ct |= TCG_CT_CONST_ADLI;
break;
- case 'K':
- ct->ct |= TCG_CT_CONST_MULI;
+ case 'I':
+ ct->ct |= TCG_CT_CONST_S16;
+ break;
+ case 'J':
+ ct->ct |= TCG_CT_CONST_S32;
break;
case 'O':
ct->ct |= TCG_CT_CONST_ORI;
@@ -503,16 +507,10 @@ static int tcg_target_const_match(tcg_target_long val, TCGType type,
}
/* The following are mutually exclusive. */
- if (ct & TCG_CT_CONST_MULI) {
- /* Immediates that may be used with multiply. If we have the
- general-instruction-extensions, then we have MULTIPLY SINGLE
- IMMEDIATE with a signed 32-bit, otherwise we have only
- MULTIPLY HALFWORD IMMEDIATE, with a signed 16-bit. */
- if (s390_facilities & FACILITY_GEN_INST_EXT) {
- return val == (int32_t)val;
- } else {
- return val == (int16_t)val;
- }
+ if (ct & TCG_CT_CONST_S16) {
+ return val == (int16_t)val;
+ } else if (ct & TCG_CT_CONST_S32) {
+ return val == (int32_t)val;
} else if (ct & TCG_CT_CONST_ADLI) {
return tcg_match_add2i(type, val);
} else if (ct & TCG_CT_CONST_ORI) {
@@ -2239,7 +2237,8 @@ static const TCGTargetOpDef *tcg_target_op_def(TCGOpcode op)
static const TCGTargetOpDef r_rZ = { .args_ct_str = { "r", "rZ" } };
static const TCGTargetOpDef r_r_ri = { .args_ct_str = { "r", "r", "ri" } };
static const TCGTargetOpDef r_0_ri = { .args_ct_str = { "r", "0", "ri" } };
- static const TCGTargetOpDef r_0_rK = { .args_ct_str = { "r", "0", "rK" } };
+ static const TCGTargetOpDef r_0_rI = { .args_ct_str = { "r", "0", "rI" } };
+ static const TCGTargetOpDef r_0_rJ = { .args_ct_str = { "r", "0", "rJ" } };
static const TCGTargetOpDef r_0_rO = { .args_ct_str = { "r", "0", "rO" } };
static const TCGTargetOpDef r_0_rX = { .args_ct_str = { "r", "0", "rX" } };
@@ -2274,9 +2273,15 @@ static const TCGTargetOpDef *tcg_target_op_def(TCGOpcode op)
case INDEX_op_sub_i32:
case INDEX_op_sub_i64:
return &r_0_ri;
+
case INDEX_op_mul_i32:
+ /* If we have the general-instruction-extensions, then we have
+ MULTIPLY SINGLE IMMEDIATE with a signed 32-bit, otherwise we
+ have only MULTIPLY HALFWORD IMMEDIATE, with a signed 16-bit. */
+ return (s390_facilities & FACILITY_GEN_INST_EXT ? &r_0_ri : &r_0_rI);
case INDEX_op_mul_i64:
- return &r_0_rK;
+ return (s390_facilities & FACILITY_GEN_INST_EXT ? &r_0_rJ : &r_0_rI);
+
case INDEX_op_or_i32:
case INDEX_op_or_i64:
return &r_0_rO;
--
2.13.5
next prev parent reply other threads:[~2017-09-06 14:49 UTC|newest]
Thread overview: 16+ messages / expand[flat|nested] mbox.gz Atom feed top
2017-09-06 14:49 [Qemu-devel] [PULL 00/14] TCG misc queued patches Richard Henderson
2017-09-06 14:49 ` [Qemu-devel] [PULL 01/14] tcg: Remove support for ia64 as host Richard Henderson
2017-09-06 14:49 ` [Qemu-devel] [PULL 02/14] tcg: Add tcg target default memory ordering Richard Henderson
2017-09-06 14:49 ` [Qemu-devel] [PULL 03/14] tcg: Implement implicit ordering semantics Richard Henderson
2017-09-06 14:49 ` [Qemu-devel] [PULL 04/14] disas/i386: Fix disassembly of two-byte vex prefixes Richard Henderson
2017-09-06 14:49 ` [Qemu-devel] [PULL 05/14] disas/i386: Add disassembly of vex.0f38.f5 Richard Henderson
2017-09-06 14:49 ` [Qemu-devel] [PULL 06/14] disas/i386: Add disassembly of rorx Richard Henderson
2017-09-06 14:49 ` [Qemu-devel] [PULL 07/14] tcg/s390: Fully convert tcg_target_op_def Richard Henderson
2017-09-06 14:49 ` [Qemu-devel] [PULL 08/14] tcg/s390: Merge cmpi facilities check to tcg_target_op_def Richard Henderson
2017-09-06 14:49 ` Richard Henderson [this message]
2017-09-06 14:49 ` [Qemu-devel] [PULL 10/14] tcg/s390: Merge add2i " Richard Henderson
2017-09-06 14:49 ` [Qemu-devel] [PULL 11/14] tcg/s390: Merge ori+xori " Richard Henderson
2017-09-06 14:49 ` [Qemu-devel] [PULL 12/14] tcg/s390: Use distinct-operands facility Richard Henderson
2017-09-06 14:49 ` [Qemu-devel] [PULL 13/14] tcg/s390: Use load-on-condition-2 facility Richard Henderson
2017-09-06 14:49 ` [Qemu-devel] [PULL 14/14] tcg/s390: Use slbgr for setcond le and leu Richard Henderson
2017-09-07 13:28 ` [Qemu-devel] [PULL 00/14] TCG misc queued patches Peter Maydell
Reply instructions:
You may reply publicly to this message via plain-text email
using any one of the following methods:
* Save the following mbox file, import it into your mail client,
and reply-to-all from there: mbox
Avoid top-posting and favor interleaved quoting:
https://en.wikipedia.org/wiki/Posting_style#Interleaved_style
* Reply using the --to, --cc, and --in-reply-to
switches of git-send-email(1):
git send-email \
--in-reply-to=20170906144940.30880-10-richard.henderson@linaro.org \
--to=richard.henderson@linaro.org \
--cc=peter.maydell@linaro.org \
--cc=qemu-devel@nongnu.org \
--cc=rth@twiddle.net \
/path/to/YOUR_REPLY
https://kernel.org/pub/software/scm/git/docs/git-send-email.html
* If your mail client supports setting the In-Reply-To header
via mailto: links, try the mailto: link
Be sure your reply has a Subject: header at the top and a blank line
before the message body.
This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for NNTP newsgroup(s).