Skip to content

R
riscv-gcc-1
Commit 0dfa6c5e by Ulrich Weigand Committed by Ulrich Weigand
Options

s390-protos.h (s390_narrow_logical_operator): Add. 

	* config/s390/s390-protos.h (s390_narrow_logical_operator): Add.
	* config/s390/s390.c (s390_narrow_logical_operator): New function.
	(s390_extra_constraint_str): Add 'A' constraints.
	(s390_const_ok_for_constraint_p): Add 'Nx' constraints.
	* config/s390/s390.h (EXTRA_MEMORY_CONSTRAINT): Add 'A' constraint.
	(CONSTRAINT_LEN): Likewise.
	* config/s390/s390.md ("*anddi3"): Add NI alternative and splitter.
	("*andsi3_zarch", "*andsi3_esa"): Likewise.
	("*andhi3_zarch", "*andhi3_esa"): Likewise.
	("*iordi3"): Add OI alternative and splitter.
	("*iorsi3_zarch", "*iorsi3_esa"): Likewise.
	("*iorhi3_zarch", "*iorhi3_esa"): Likewise.
	("*xordi3"): Add XI alternative and splitter.
	("*xorsi3", "*xorhi3"): Likewise.

From-SVN: r88705
parent 82e79986
Showing with 235 additions and 65 deletions
gcc/ChangeLog
2004-10-07 Ulrich Weigand <uweigand@de.ibm.com>
* config/s390/s390-protos.h (s390_narrow_logical_operator): Add.
* config/s390/s390.c (s390_narrow_logical_operator): New function.
(s390_extra_constraint_str): Add 'A' constraints.
(s390_const_ok_for_constraint_p): Add 'Nx' constraints.
* config/s390/s390.h (EXTRA_MEMORY_CONSTRAINT): Add 'A' constraint.
(CONSTRAINT_LEN): Likewise.
* config/s390/s390.md ("*anddi3"): Add NI alternative and splitter.
("*andsi3_zarch", "*andsi3_esa"): Likewise.
("*andhi3_zarch", "*andhi3_esa"): Likewise.
("*iordi3"): Add OI alternative and splitter.
("*iorsi3_zarch", "*iorsi3_esa"): Likewise.
("*iorhi3_zarch", "*iorhi3_esa"): Likewise.
("*xordi3"): Add XI alternative and splitter.
("*xorsi3", "*xorhi3"): Likewise.
2004-10-07 Richard Sandiford <rsandifo@redhat.com> 2004-10-07 Richard Sandiford <rsandifo@redhat.com>
* config/mips/mips.c (mips_function_rodata_section): New function. * config/mips/mips.c (mips_function_rodata_section): New function.
......
gcc/config/s390/s390-protos.h
...@@ -87,6 +87,7 @@ extern rtx s390_emit_call (rtx, rtx, rtx, rtx); ...@@ -87,6 +87,7 @@ extern rtx s390_emit_call (rtx, rtx, rtx, rtx);
extern void s390_expand_logical_operator (enum rtx_code, extern void s390_expand_logical_operator (enum rtx_code,
enum machine_mode, rtx *); enum machine_mode, rtx *);
extern bool s390_logical_operator_ok_p (rtx *); extern bool s390_logical_operator_ok_p (rtx *);
extern void s390_narrow_logical_operator (enum rtx_code, rtx *, rtx *);
extern bool s390_pool_operand (rtx); extern bool s390_pool_operand (rtx);
extern bool s390_output_addr_const_extra (FILE*, rtx); extern bool s390_output_addr_const_extra (FILE*, rtx);
......
gcc/config/s390/s390.c
...@@ -1166,6 +1166,27 @@ s390_logical_operator_ok_p (rtx *operands) ...@@ -1166,6 +1166,27 @@ s390_logical_operator_ok_p (rtx *operands)
return true; return true;
} }
/* Narrow logical operation CODE of memory operand MEMOP with immediate
operand IMMOP to switch from SS to SI type instructions. */
void
s390_narrow_logical_operator (enum rtx_code code, rtx *memop, rtx *immop)
{
int def = code == AND ? -1 : 0;
HOST_WIDE_INT mask;
int part;
gcc_assert (GET_CODE (*memop) == MEM);
gcc_assert (!MEM_VOLATILE_P (*memop));
mask = s390_extract_part (*immop, QImode, def);
part = s390_single_part (*immop, GET_MODE (*memop), QImode, def);
gcc_assert (part >= 0);
*memop = adjust_address (*memop, QImode, part);
*immop = gen_int_mode (mask, QImode);
}
/* Change optimizations to be performed, depending on the /* Change optimizations to be performed, depending on the
optimization level. optimization level.
...@@ -1564,6 +1585,21 @@ s390_extra_constraint_str (rtx op, int c, const char * str) ...@@ -1564,6 +1585,21 @@ s390_extra_constraint_str (rtx op, int c, const char * str)
if (c != str[0]) if (c != str[0])
abort (); abort ();
/* Check for offsettable variants of memory constraints. */
if (c == 'A')
{
/* Only accept non-volatile MEMs. */
if (!MEM_P (op) || MEM_VOLATILE_P (op))
return 0;
if ((reload_completed || reload_in_progress)
? !offsettable_memref_p (op)
: !offsettable_nonstrict_memref_p (op))
return 0;
c = str[1];
}
switch (c) switch (c)
{ {
case 'Q': case 'Q':
...@@ -1658,7 +1694,7 @@ s390_const_ok_for_constraint_p (HOST_WIDE_INT value, ...@@ -1658,7 +1694,7 @@ s390_const_ok_for_constraint_p (HOST_WIDE_INT value,
{ {
enum machine_mode mode, part_mode; enum machine_mode mode, part_mode;
int def; int def;
unsigned char part; int part, part_goal;
if (c != str[0]) if (c != str[0])
abort (); abort ();
...@@ -1682,7 +1718,10 @@ s390_const_ok_for_constraint_p (HOST_WIDE_INT value, ...@@ -1682,7 +1718,10 @@ s390_const_ok_for_constraint_p (HOST_WIDE_INT value,
return value == 2147483647; return value == 2147483647;
case 'N': case 'N':
part = str[1] - '0'; if (str[1] == 'x')
part_goal = -1;
else
part_goal = str[1] - '0';
switch (str[2]) switch (str[2])
{ {
...@@ -1709,7 +1748,10 @@ s390_const_ok_for_constraint_p (HOST_WIDE_INT value, ...@@ -1709,7 +1748,10 @@ s390_const_ok_for_constraint_p (HOST_WIDE_INT value,
if (GET_MODE_SIZE (mode) <= GET_MODE_SIZE (part_mode)) if (GET_MODE_SIZE (mode) <= GET_MODE_SIZE (part_mode))
return 0; return 0;
if (s390_single_part (GEN_INT (value), mode, part_mode, def) != part) part = s390_single_part (GEN_INT (value), mode, part_mode, def);
if (part < 0)
return 0;
if (part_goal != -1 && part_goal != part)
return 0; return 0;
break; break;
......
gcc/config/s390/s390.h
...@@ -542,13 +542,14 @@ extern const enum reg_class regclass_map[FIRST_PSEUDO_REGISTER]; ...@@ -542,13 +542,14 @@ extern const enum reg_class regclass_map[FIRST_PSEUDO_REGISTER];
#define EXTRA_CONSTRAINT_STR(OP, C, STR) \ #define EXTRA_CONSTRAINT_STR(OP, C, STR) \
s390_extra_constraint_str ((OP), (C), (STR)) s390_extra_constraint_str ((OP), (C), (STR))
#define EXTRA_MEMORY_CONSTRAINT(C, STR) \ #define EXTRA_MEMORY_CONSTRAINT(C, STR) \
((C) == 'Q' || (C) == 'R' || (C) == 'S' || (C) == 'T') ((C) == 'Q' || (C) == 'R' || (C) == 'S' || (C) == 'T' || (C) == 'A')
#define EXTRA_ADDRESS_CONSTRAINT(C, STR) \ #define EXTRA_ADDRESS_CONSTRAINT(C, STR) \
((C) == 'U' || (C) == 'W' || (C) == 'Y') ((C) == 'U' || (C) == 'W' || (C) == 'Y')
#define CONSTRAINT_LEN(C, STR) \ #define CONSTRAINT_LEN(C, STR) \
((C) == 'N' ? 5 : DEFAULT_CONSTRAINT_LEN ((C), (STR))) ((C) == 'N' ? 5 : \
(C) == 'A' ? 2 : DEFAULT_CONSTRAINT_LEN ((C), (STR)))
/* Stack layout and calling conventions. */ /* Stack layout and calling conventions. */
......
gcc/config/s390/s390.md
...@@ -34,17 +34,21 @@ ...@@ -34,17 +34,21 @@
;; (-524288..524287) for long displacement ;; (-524288..524287) for long displacement
;; M -- Constant integer with a value of 0x7fffffff. ;; M -- Constant integer with a value of 0x7fffffff.
;; N -- Multiple letter constraint followed by 4 parameter letters. ;; N -- Multiple letter constraint followed by 4 parameter letters.
;; 0..9: number of the part counting from most to least significant ;; 0..9,x: number of the part counting from most to least significant
;; H,Q: mode of the part ;; H,Q: mode of the part
;; D,S,H: mode of the containing operand ;; D,S,H: mode of the containing operand
;; 0,F: value of the other parts (F - all bits set) ;; 0,F: value of the other parts (F - all bits set)
;; ;;
;; The constraint matches if the specified part of a constant ;; The constraint matches if the specified part of a constant
;; has a value different from its other parts. ;; has a value different from its other parts. If the letter x
;; is specified instead of a part number, the constraint matches
;; if there is any single part with non-default value.
;; Q -- Memory reference without index register and with short displacement. ;; Q -- Memory reference without index register and with short displacement.
;; R -- Memory reference with index register and short displacement. ;; R -- Memory reference with index register and short displacement.
;; S -- Memory reference without index register but with long displacement. ;; S -- Memory reference without index register but with long displacement.
;; T -- Memory reference with index register and long displacement. ;; T -- Memory reference with index register and long displacement.
;; A -- Multiple letter constraint followed by Q, R, S, or T:
;; Offsettable memory reference of type specified by second letter.
;; U -- Pointer with short displacement. ;; U -- Pointer with short displacement.
;; W -- Pointer with long displacement. ;; W -- Pointer with long displacement.
;; Y -- Shift count operand. ;; Y -- Shift count operand.
...@@ -5134,11 +5138,11 @@ ...@@ -5134,11 +5138,11 @@
[(set_attr "op_type" "RRE,RXY")]) [(set_attr "op_type" "RRE,RXY")])
(define_insn "*anddi3" (define_insn "*anddi3"
[(set (match_operand:DI 0 "nonimmediate_operand" "=d,d,d,d,d,d,d,d,Q") [(set (match_operand:DI 0 "nonimmediate_operand" "=d,d,d,d,d,d,d,d,AQ,Q")
(and:DI (match_operand:DI 1 "nonimmediate_operand" (and:DI (match_operand:DI 1 "nonimmediate_operand"
"%d,o,0,0,0,0,0,0,0") "%d,o,0,0,0,0,0,0,0,0")
(match_operand:DI 2 "general_operand" (match_operand:DI 2 "general_operand"
"M,M,N0HDF,N1HDF,N2HDF,N3HDF,d,m,Q"))) "M,M,N0HDF,N1HDF,N2HDF,N3HDF,d,m,NxQDF,Q")))
(clobber (reg:CC 33))] (clobber (reg:CC 33))]
"TARGET_64BIT && s390_logical_operator_ok_p (operands)" "TARGET_64BIT && s390_logical_operator_ok_p (operands)"
"@ "@
...@@ -5150,8 +5154,19 @@ ...@@ -5150,8 +5154,19 @@
nill\t%0,%j2 nill\t%0,%j2
ngr\t%0,%2 ngr\t%0,%2
ng\t%0,%2 ng\t%0,%2
#
nc\t%O0(8,%R0),%2" nc\t%O0(8,%R0),%2"
[(set_attr "op_type" "RRE,RXE,RI,RI,RI,RI,RRE,RXY,SS")]) [(set_attr "op_type" "RRE,RXE,RI,RI,RI,RI,RRE,RXY,SI,SS")])
(define_split
[(set (match_operand:DI 0 "s_operand" "")
(and:DI (match_dup 0) (match_operand:DI 1 "immediate_operand" "")))
(clobber (reg:CC 33))]
"reload_completed"
[(parallel
[(set (match_dup 0) (and:QI (match_dup 0) (match_dup 1)))
(clobber (reg:CC 33))])]
"s390_narrow_logical_operator (AND, &operands[0], &operands[1]);")
(define_expand "anddi3" (define_expand "anddi3"
[(set (match_operand:DI 0 "nonimmediate_operand" "") [(set (match_operand:DI 0 "nonimmediate_operand" "")
...@@ -5195,9 +5210,11 @@ ...@@ -5195,9 +5210,11 @@
[(set_attr "op_type" "RR,RX,RXY")]) [(set_attr "op_type" "RR,RX,RXY")])
(define_insn "*andsi3_zarch" (define_insn "*andsi3_zarch"
[(set (match_operand:SI 0 "nonimmediate_operand" "=d,d,d,d,d,d,d,Q") [(set (match_operand:SI 0 "nonimmediate_operand" "=d,d,d,d,d,d,d,AQ,Q")
(and:SI (match_operand:SI 1 "nonimmediate_operand" "%d,o,0,0,0,0,0,0") (and:SI (match_operand:SI 1 "nonimmediate_operand"
(match_operand:SI 2 "general_operand" "M,M,N0HSF,N1HSF,d,R,T,Q"))) "%d,o,0,0,0,0,0,0,0")
(match_operand:SI 2 "general_operand"
"M,M,N0HSF,N1HSF,d,R,T,NxQSF,Q")))
(clobber (reg:CC 33))] (clobber (reg:CC 33))]
"TARGET_ZARCH && s390_logical_operator_ok_p (operands)" "TARGET_ZARCH && s390_logical_operator_ok_p (operands)"
"@ "@
...@@ -5208,20 +5225,32 @@ ...@@ -5208,20 +5225,32 @@
nr\t%0,%2 nr\t%0,%2
n\t%0,%2 n\t%0,%2
ny\t%0,%2 ny\t%0,%2
#
nc\t%O0(4,%R0),%2" nc\t%O0(4,%R0),%2"
[(set_attr "op_type" "RRE,RXE,RI,RI,RR,RX,RXY,SS")]) [(set_attr "op_type" "RRE,RXE,RI,RI,RR,RX,RXY,SI,SS")])
(define_insn "*andsi3_esa" (define_insn "*andsi3_esa"
[(set (match_operand:SI 0 "nonimmediate_operand" "=d,d,Q") [(set (match_operand:SI 0 "nonimmediate_operand" "=d,d,AQ,Q")
(and:SI (match_operand:SI 1 "nonimmediate_operand" "%0,0,0") (and:SI (match_operand:SI 1 "nonimmediate_operand" "%0,0,0,0")
(match_operand:SI 2 "general_operand" "d,R,Q"))) (match_operand:SI 2 "general_operand" "d,R,NxQSF,Q")))
(clobber (reg:CC 33))] (clobber (reg:CC 33))]
"!TARGET_ZARCH && s390_logical_operator_ok_p (operands)" "!TARGET_ZARCH && s390_logical_operator_ok_p (operands)"
"@ "@
nr\t%0,%2 nr\t%0,%2
n\t%0,%2 n\t%0,%2
#
nc\t%O0(4,%R0),%2" nc\t%O0(4,%R0),%2"
[(set_attr "op_type" "RR,RX,SS")]) [(set_attr "op_type" "RR,RX,SI,SS")])
(define_split
[(set (match_operand:SI 0 "s_operand" "")
(and:SI (match_dup 0) (match_operand:SI 1 "immediate_operand" "")))
(clobber (reg:CC 33))]
"reload_completed"
[(parallel
[(set (match_dup 0) (and:QI (match_dup 0) (match_dup 1)))
(clobber (reg:CC 33))])]
"s390_narrow_logical_operator (AND, &operands[0], &operands[1]);")
(define_expand "andsi3" (define_expand "andsi3"
[(set (match_operand:SI 0 "nonimmediate_operand" "") [(set (match_operand:SI 0 "nonimmediate_operand" "")
...@@ -5236,27 +5265,39 @@ ...@@ -5236,27 +5265,39 @@
; ;
(define_insn "*andhi3_zarch" (define_insn "*andhi3_zarch"
[(set (match_operand:HI 0 "nonimmediate_operand" "=d,d,Q") [(set (match_operand:HI 0 "nonimmediate_operand" "=d,d,AQ,Q")
(and:HI (match_operand:HI 1 "nonimmediate_operand" "%0,0,0") (and:HI (match_operand:HI 1 "nonimmediate_operand" "%0,0,0,0")
(match_operand:HI 2 "general_operand" "d,n,Q"))) (match_operand:HI 2 "general_operand" "d,n,NxQHF,Q")))
(clobber (reg:CC 33))] (clobber (reg:CC 33))]
"TARGET_ZARCH && s390_logical_operator_ok_p (operands)" "TARGET_ZARCH && s390_logical_operator_ok_p (operands)"
"@ "@
nr\t%0,%2 nr\t%0,%2
nill\t%0,%x2 nill\t%0,%x2
#
nc\t%O0(2,%R0),%2" nc\t%O0(2,%R0),%2"
[(set_attr "op_type" "RR,RI,SS")]) [(set_attr "op_type" "RR,RI,SI,SS")])
(define_insn "*andhi3_esa" (define_insn "*andhi3_esa"
[(set (match_operand:HI 0 "nonimmediate_operand" "=d,Q") [(set (match_operand:HI 0 "nonimmediate_operand" "=d,AQ,Q")
(and:HI (match_operand:HI 1 "nonimmediate_operand" "%0,0") (and:HI (match_operand:HI 1 "nonimmediate_operand" "%0,0,0")
(match_operand:HI 2 "general_operand" "d,Q"))) (match_operand:HI 2 "general_operand" "d,NxQHF,Q")))
(clobber (reg:CC 33))] (clobber (reg:CC 33))]
"!TARGET_ZARCH && s390_logical_operator_ok_p (operands)" "!TARGET_ZARCH && s390_logical_operator_ok_p (operands)"
"@ "@
nr\t%0,%2 nr\t%0,%2
#
nc\t%O0(2,%R0),%2" nc\t%O0(2,%R0),%2"
[(set_attr "op_type" "RR,SS")]) [(set_attr "op_type" "RR,SI,SS")])
(define_split
[(set (match_operand:HI 0 "s_operand" "")
(and:HI (match_dup 0) (match_operand:HI 1 "immediate_operand" "")))
(clobber (reg:CC 33))]
"reload_completed"
[(parallel
[(set (match_dup 0) (and:QI (match_dup 0) (match_dup 1)))
(clobber (reg:CC 33))])]
"s390_narrow_logical_operator (AND, &operands[0], &operands[1]);")
(define_expand "andhi3" (define_expand "andhi3"
[(set (match_operand:HI 0 "nonimmediate_operand" "") [(set (match_operand:HI 0 "nonimmediate_operand" "")
...@@ -5339,10 +5380,10 @@ ...@@ -5339,10 +5380,10 @@
[(set_attr "op_type" "RRE,RXY")]) [(set_attr "op_type" "RRE,RXY")])
(define_insn "*iordi3" (define_insn "*iordi3"
[(set (match_operand:DI 0 "nonimmediate_operand" "=d,d,d,d,d,d,Q") [(set (match_operand:DI 0 "nonimmediate_operand" "=d,d,d,d,d,d,AQ,Q")
(ior:DI (match_operand:DI 1 "nonimmediate_operand" "0,0,0,0,0,0,0") (ior:DI (match_operand:DI 1 "nonimmediate_operand" "0,0,0,0,0,0,0,0")
(match_operand:DI 2 "general_operand" (match_operand:DI 2 "general_operand"
"N0HD0,N1HD0,N2HD0,N3HD0,d,m,Q"))) "N0HD0,N1HD0,N2HD0,N3HD0,d,m,NxQD0,Q")))
(clobber (reg:CC 33))] (clobber (reg:CC 33))]
"TARGET_64BIT && s390_logical_operator_ok_p (operands)" "TARGET_64BIT && s390_logical_operator_ok_p (operands)"
"@ "@
...@@ -5352,8 +5393,19 @@ ...@@ -5352,8 +5393,19 @@
oill\t%0,%i2 oill\t%0,%i2
ogr\t%0,%2 ogr\t%0,%2
og\t%0,%2 og\t%0,%2
#
oc\t%O0(8,%R0),%2" oc\t%O0(8,%R0),%2"
[(set_attr "op_type" "RI,RI,RI,RI,RRE,RXY,SS")]) [(set_attr "op_type" "RI,RI,RI,RI,RRE,RXY,SI,SS")])
(define_split
[(set (match_operand:DI 0 "s_operand" "")
(ior:DI (match_dup 0) (match_operand:DI 1 "immediate_operand" "")))
(clobber (reg:CC 33))]
"reload_completed"
[(parallel
[(set (match_dup 0) (ior:QI (match_dup 0) (match_dup 1)))
(clobber (reg:CC 33))])]
"s390_narrow_logical_operator (IOR, &operands[0], &operands[1]);")
(define_expand "iordi3" (define_expand "iordi3"
[(set (match_operand:DI 0 "nonimmediate_operand" "") [(set (match_operand:DI 0 "nonimmediate_operand" "")
...@@ -5395,9 +5447,9 @@ ...@@ -5395,9 +5447,9 @@
[(set_attr "op_type" "RR,RX,RXY")]) [(set_attr "op_type" "RR,RX,RXY")])
(define_insn "*iorsi3_zarch" (define_insn "*iorsi3_zarch"
[(set (match_operand:SI 0 "nonimmediate_operand" "=d,d,d,d,d,Q") [(set (match_operand:SI 0 "nonimmediate_operand" "=d,d,d,d,d,AQ,Q")
(ior:SI (match_operand:SI 1 "nonimmediate_operand" "0,0,0,0,0,0") (ior:SI (match_operand:SI 1 "nonimmediate_operand" "0,0,0,0,0,0,0")
(match_operand:SI 2 "general_operand" "N0HS0,N1HS0,d,R,T,Q"))) (match_operand:SI 2 "general_operand" "N0HS0,N1HS0,d,R,T,NxQS0,Q")))
(clobber (reg:CC 33))] (clobber (reg:CC 33))]
"TARGET_ZARCH && s390_logical_operator_ok_p (operands)" "TARGET_ZARCH && s390_logical_operator_ok_p (operands)"
"@ "@
...@@ -5406,20 +5458,32 @@ ...@@ -5406,20 +5458,32 @@
or\t%0,%2 or\t%0,%2
o\t%0,%2 o\t%0,%2
oy\t%0,%2 oy\t%0,%2
#
oc\t%O0(4,%R0),%2" oc\t%O0(4,%R0),%2"
[(set_attr "op_type" "RI,RI,RR,RX,RXY,SS")]) [(set_attr "op_type" "RI,RI,RR,RX,RXY,SI,SS")])
(define_insn "*iorsi3_esa" (define_insn "*iorsi3_esa"
[(set (match_operand:SI 0 "nonimmediate_operand" "=d,d,Q") [(set (match_operand:SI 0 "nonimmediate_operand" "=d,d,AQ,Q")
(ior:SI (match_operand:SI 1 "nonimmediate_operand" "0,0,0") (ior:SI (match_operand:SI 1 "nonimmediate_operand" "0,0,0,0")
(match_operand:SI 2 "general_operand" "d,R,Q"))) (match_operand:SI 2 "general_operand" "d,R,NxQS0,Q")))
(clobber (reg:CC 33))] (clobber (reg:CC 33))]
"!TARGET_ZARCH && s390_logical_operator_ok_p (operands)" "!TARGET_ZARCH && s390_logical_operator_ok_p (operands)"
"@ "@
or\t%0,%2 or\t%0,%2
o\t%0,%2 o\t%0,%2
#
oc\t%O0(4,%R0),%2" oc\t%O0(4,%R0),%2"
[(set_attr "op_type" "RR,RX,SS")]) [(set_attr "op_type" "RR,RX,SI,SS")])
(define_split
[(set (match_operand:SI 0 "s_operand" "")
(ior:SI (match_dup 0) (match_operand:SI 1 "immediate_operand" "")))
(clobber (reg:CC 33))]
"reload_completed"
[(parallel
[(set (match_dup 0) (ior:QI (match_dup 0) (match_dup 1)))
(clobber (reg:CC 33))])]
"s390_narrow_logical_operator (IOR, &operands[0], &operands[1]);")
(define_expand "iorsi3" (define_expand "iorsi3"
[(set (match_operand:SI 0 "nonimmediate_operand" "") [(set (match_operand:SI 0 "nonimmediate_operand" "")
...@@ -5434,27 +5498,39 @@ ...@@ -5434,27 +5498,39 @@
; ;
(define_insn "*iorhi3_zarch" (define_insn "*iorhi3_zarch"
[(set (match_operand:HI 0 "nonimmediate_operand" "=d,d,Q") [(set (match_operand:HI 0 "nonimmediate_operand" "=d,d,AQ,Q")
(ior:HI (match_operand:HI 1 "nonimmediate_operand" "%0,0,0") (ior:HI (match_operand:HI 1 "nonimmediate_operand" "%0,0,0,0")
(match_operand:HI 2 "general_operand" "d,n,Q"))) (match_operand:HI 2 "general_operand" "d,n,NxQH0,Q")))
(clobber (reg:CC 33))] (clobber (reg:CC 33))]
"TARGET_ZARCH && s390_logical_operator_ok_p (operands)" "TARGET_ZARCH && s390_logical_operator_ok_p (operands)"
"@ "@
or\t%0,%2 or\t%0,%2
oill\t%0,%x2 oill\t%0,%x2
#
oc\t%O0(2,%R0),%2" oc\t%O0(2,%R0),%2"
[(set_attr "op_type" "RR,RI,SS")]) [(set_attr "op_type" "RR,RI,SI,SS")])
(define_insn "*iorhi3_esa" (define_insn "*iorhi3_esa"
[(set (match_operand:HI 0 "nonimmediate_operand" "=d,Q") [(set (match_operand:HI 0 "nonimmediate_operand" "=d,AQ,Q")
(ior:HI (match_operand:HI 1 "nonimmediate_operand" "%0,0") (ior:HI (match_operand:HI 1 "nonimmediate_operand" "%0,0,0")
(match_operand:HI 2 "general_operand" "d,Q"))) (match_operand:HI 2 "general_operand" "d,NxQH0,Q")))
(clobber (reg:CC 33))] (clobber (reg:CC 33))]
"!TARGET_ZARCH && s390_logical_operator_ok_p (operands)" "!TARGET_ZARCH && s390_logical_operator_ok_p (operands)"
"@ "@
or\t%0,%2 or\t%0,%2
#
oc\t%O0(2,%R0),%2" oc\t%O0(2,%R0),%2"
[(set_attr "op_type" "RR,SS")]) [(set_attr "op_type" "RR,SI,SS")])
(define_split
[(set (match_operand:HI 0 "s_operand" "")
(ior:HI (match_dup 0) (match_operand:HI 1 "immediate_operand" "")))
(clobber (reg:CC 33))]
"reload_completed"
[(parallel
[(set (match_dup 0) (ior:QI (match_dup 0) (match_dup 1)))
(clobber (reg:CC 33))])]
"s390_narrow_logical_operator (IOR, &operands[0], &operands[1]);")
(define_expand "iorhi3" (define_expand "iorhi3"
[(set (match_operand:HI 0 "nonimmediate_operand" "") [(set (match_operand:HI 0 "nonimmediate_operand" "")
...@@ -5537,16 +5613,27 @@ ...@@ -5537,16 +5613,27 @@
[(set_attr "op_type" "RRE,RXY")]) [(set_attr "op_type" "RRE,RXY")])
(define_insn "*xordi3" (define_insn "*xordi3"
[(set (match_operand:DI 0 "nonimmediate_operand" "=d,d,Q") [(set (match_operand:DI 0 "nonimmediate_operand" "=d,d,AQ,Q")
(xor:DI (match_operand:DI 1 "nonimmediate_operand" "%0,0,0") (xor:DI (match_operand:DI 1 "nonimmediate_operand" "%0,0,0,0")
(match_operand:DI 2 "general_operand" "d,m,Q"))) (match_operand:DI 2 "general_operand" "d,m,NxQD0,Q")))
(clobber (reg:CC 33))] (clobber (reg:CC 33))]
"TARGET_64BIT && s390_logical_operator_ok_p (operands)" "TARGET_64BIT && s390_logical_operator_ok_p (operands)"
"@ "@
xgr\t%0,%2 xgr\t%0,%2
xg\t%0,%2 xg\t%0,%2
#
xc\t%O0(8,%R0),%2" xc\t%O0(8,%R0),%2"
[(set_attr "op_type" "RRE,RXY,SS")]) [(set_attr "op_type" "RRE,RXY,SI,SS")])
(define_split
[(set (match_operand:DI 0 "s_operand" "")
(xor:DI (match_dup 0) (match_operand:DI 1 "immediate_operand" "")))
(clobber (reg:CC 33))]
"reload_completed"
[(parallel
[(set (match_dup 0) (xor:QI (match_dup 0) (match_dup 1)))
(clobber (reg:CC 33))])]
"s390_narrow_logical_operator (XOR, &operands[0], &operands[1]);")
(define_expand "xordi3" (define_expand "xordi3"
[(set (match_operand:DI 0 "nonimmediate_operand" "") [(set (match_operand:DI 0 "nonimmediate_operand" "")
...@@ -5588,17 +5675,28 @@ ...@@ -5588,17 +5675,28 @@
[(set_attr "op_type" "RR,RX,RXY")]) [(set_attr "op_type" "RR,RX,RXY")])
(define_insn "*xorsi3" (define_insn "*xorsi3"
[(set (match_operand:SI 0 "nonimmediate_operand" "=d,d,d,Q") [(set (match_operand:SI 0 "nonimmediate_operand" "=d,d,d,AQ,Q")
(xor:SI (match_operand:SI 1 "nonimmediate_operand" "%0,0,0,0") (xor:SI (match_operand:SI 1 "nonimmediate_operand" "%0,0,0,0,0")
(match_operand:SI 2 "general_operand" "d,R,T,Q"))) (match_operand:SI 2 "general_operand" "d,R,T,NxQS0,Q")))
(clobber (reg:CC 33))] (clobber (reg:CC 33))]
"s390_logical_operator_ok_p (operands)" "s390_logical_operator_ok_p (operands)"
"@ "@
xr\t%0,%2 xr\t%0,%2
x\t%0,%2 x\t%0,%2
xy\t%0,%2 xy\t%0,%2
#
xc\t%O0(4,%R0),%2" xc\t%O0(4,%R0),%2"
[(set_attr "op_type" "RR,RX,RXY,SS")]) [(set_attr "op_type" "RR,RX,RXY,SI,SS")])
(define_split
[(set (match_operand:SI 0 "s_operand" "")
(xor:SI (match_dup 0) (match_operand:SI 1 "immediate_operand" "")))
(clobber (reg:CC 33))]
"reload_completed"
[(parallel
[(set (match_dup 0) (xor:QI (match_dup 0) (match_dup 1)))
(clobber (reg:CC 33))])]
"s390_narrow_logical_operator (XOR, &operands[0], &operands[1]);")
(define_expand "xorsi3" (define_expand "xorsi3"
[(set (match_operand:SI 0 "nonimmediate_operand" "") [(set (match_operand:SI 0 "nonimmediate_operand" "")
...@@ -5613,15 +5711,26 @@ ...@@ -5613,15 +5711,26 @@
; ;
(define_insn "*xorhi3" (define_insn "*xorhi3"
[(set (match_operand:HI 0 "nonimmediate_operand" "=d,Q") [(set (match_operand:HI 0 "nonimmediate_operand" "=d,AQ,Q")
(xor:HI (match_operand:HI 1 "nonimmediate_operand" "%0,0") (xor:HI (match_operand:HI 1 "nonimmediate_operand" "%0,0,0")
(match_operand:HI 2 "general_operand" "d,Q"))) (match_operand:HI 2 "general_operand" "d,NxQH0,Q")))
(clobber (reg:CC 33))] (clobber (reg:CC 33))]
"s390_logical_operator_ok_p (operands)" "s390_logical_operator_ok_p (operands)"
"@ "@
xr\t%0,%2 xr\t%0,%2
#
xc\t%O0(2,%R0),%2" xc\t%O0(2,%R0),%2"
[(set_attr "op_type" "RR,SS")]) [(set_attr "op_type" "RR,SI,SS")])
(define_split
[(set (match_operand:HI 0 "s_operand" "")
(xor:HI (match_dup 0) (match_operand:HI 1 "immediate_operand" "")))
(clobber (reg:CC 33))]
"reload_completed"
[(parallel
[(set (match_dup 0) (xor:QI (match_dup 0) (match_dup 1)))
(clobber (reg:CC 33))])]
"s390_narrow_logical_operator (XOR, &operands[0], &operands[1]);")
(define_expand "xorhi3" (define_expand "xorhi3"
[(set (match_operand:HI 0 "nonimmediate_operand" "") [(set (match_operand:HI 0 "nonimmediate_operand" "")
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment