54 lines
2.8 KiB
Diff
54 lines
2.8 KiB
Diff
commit ca87ae741fe9c8aad9db1afbf109dc070d0168cf
|
|
Author: Andreas Krebbel <krebbel@linux.vnet.ibm.com>
|
|
Date: Mon May 29 12:38:42 2017 +0200
|
|
|
|
S/390: Fix instruction types of csdtr and csxtr
|
|
|
|
opcodes/ChangeLog:
|
|
|
|
2017-05-30 Andreas Krebbel <krebbel@linux.vnet.ibm.com>
|
|
|
|
* s390-opc.c: Add new instruction types RRF_0URF and RRF_0UREFE.
|
|
* s390-opc.txt: Fix instruction typs of csdtr and csxtr.
|
|
|
|
gas/ChangeLog:
|
|
|
|
2017-05-30 Andreas Krebbel <krebbel@linux.vnet.ibm.com>
|
|
|
|
* testsuite/gas/s390/zarch-z9-ec.d: Adjust csdtr and csxtr.
|
|
* testsuite/gas/s390/zarch-z9-ec.s: Likewise.
|
|
|
|
--- a/opcodes/s390-opc.c
|
|
+++ b/opcodes/s390-opc.c
|
|
@@ -374,6 +374,8 @@ const struct s390_operand s390_operands[] =
|
|
#define INSTR_RRF_U0RER 4, { RE_24,R_28,U4_16,0,0,0 } /* e.g. trte */
|
|
#define INSTR_RRF_U0RERE 4, { RE_24,RE_28,U4_16,0,0,0 } /* e.g. cu24 */
|
|
#define INSTR_RRF_00RR 4, { R_24,R_28,0,0,0,0 } /* e.g. clrtne */
|
|
+#define INSTR_RRF_0URF 4, { R_24,F_28,U4_20,0,0,0 } /* e.g. csdtr */
|
|
+#define INSTR_RRF_0UREFE 4, { RE_24,FE_28,U4_20,0,0,0 } /* e.g. csxtr */
|
|
#define INSTR_RRF_UUFR 4, { F_24,U4_16,R_28,U4_20,0,0 } /* e.g. cdgtra */
|
|
#define INSTR_RRF_UUFER 4, { FE_24,U4_16,R_28,U4_20,0,0 } /* e.g. cxfbra */
|
|
#define INSTR_RRF_UURF 4, { R_24,U4_16,F_28,U4_20,0,0 } /* e.g. cgdtra */
|
|
@@ -590,6 +592,8 @@ const struct s390_operand s390_operands[] =
|
|
#define MASK_RRF_U0RER { 0xff, 0xff, 0x0f, 0x00, 0x00, 0x00 }
|
|
#define MASK_RRF_U0RERE { 0xff, 0xff, 0x0f, 0x00, 0x00, 0x00 }
|
|
#define MASK_RRF_00RR { 0xff, 0xff, 0xff, 0x00, 0x00, 0x00 }
|
|
+#define MASK_RRF_0URF { 0xff, 0xff, 0xf0, 0x00, 0x00, 0x00 }
|
|
+#define MASK_RRF_0UREFE { 0xff, 0xff, 0xf0, 0x00, 0x00, 0x00 }
|
|
#define MASK_RRF_UUFR { 0xff, 0xff, 0x00, 0x00, 0x00, 0x00 }
|
|
#define MASK_RRF_UUFER { 0xff, 0xff, 0x00, 0x00, 0x00, 0x00 }
|
|
#define MASK_RRF_UURF { 0xff, 0xff, 0x00, 0x00, 0x00, 0x00 }
|
|
--- a/opcodes/s390-opc.txt
|
|
+++ b/opcodes/s390-opc.txt
|
|
@@ -817,8 +817,8 @@ b3f2 cdutr RRE_FR "convert from unsigned bcd to long dfp" z9-ec zarch
|
|
b3fa cxutr RRE_FER "convert from unsigned bcd to extended dfp" z9-ec zarch
|
|
b3e1 cgdtr RRF_U0RF "convert from long dfp to fixed" z9-ec zarch
|
|
b3e9 cgxtr RRF_U0RFE "convert from extended dfp to fixed" z9-ec zarch
|
|
-b3e3 csdtr RRE_RF "convert from long dfp to signed bcd" z9-ec zarch
|
|
-b3eb csxtr RRE_RFE "convert from extended dfp to signed bcd" z9-ec zarch
|
|
+b3e3 csdtr RRF_0URF "convert from long dfp to signed bcd" z9-ec zarch
|
|
+b3eb csxtr RRF_0UREFE "convert from extended dfp to signed bcd" z9-ec zarch
|
|
b3e2 cudtr RRE_RF "convert from long dfp to unsigned bcd" z9-ec zarch
|
|
b3ea cuxtr RRE_RFE "convert from extended dfp to unsigned bcd" z9-ec zarch
|
|
b3d1 ddtr RRR_F0FF "divide long dfp" z9-ec zarch
|