public inbox for gcc-cvs@sourceware.org
help / color / mirror / Atom feed
* [gcc(refs/users/acsawdey/heads/fusion-combine)] Test cases for p10 fusion patterns
@ 2020-12-15 0:48 Aaron Sawdey
0 siblings, 0 replies; 11+ messages in thread
From: Aaron Sawdey @ 2020-12-15 0:48 UTC (permalink / raw)
To: gcc-cvs
https://gcc.gnu.org/g:628a95947761ba9ba0336fd585fc2cd3c1dd11ac
commit 628a95947761ba9ba0336fd585fc2cd3c1dd11ac
Author: Aaron Sawdey <acsawdey@linux.ibm.com>
Date: Fri Dec 11 13:47:12 2020 -0600
Test cases for p10 fusion patterns
This adds some test cases to make sure that the combine patterns for p10
fusion are working.
gcc/testsuite/ChangeLog:
* gcc.target/powerpc/fusion-p10-ldcmpi.c: New file.
* gcc.target/powerpc/fusion-p10-2logical.c: New file.
Diff:
---
.../gcc.target/powerpc/fusion-p10-2logical.c | 201 +++++++++++++++++++++
.../gcc.target/powerpc/fusion-p10-ldcmpi.c | 66 +++++++
2 files changed, 267 insertions(+)
diff --git a/gcc/testsuite/gcc.target/powerpc/fusion-p10-2logical.c b/gcc/testsuite/gcc.target/powerpc/fusion-p10-2logical.c
new file mode 100644
index 00000000000..cfe8f6c679a
--- /dev/null
+++ b/gcc/testsuite/gcc.target/powerpc/fusion-p10-2logical.c
@@ -0,0 +1,201 @@
+/* { dg-do compile { target { powerpc*-*-* } } } */
+/* { dg-skip-if "" { powerpc*-*-darwin* } } */
+/* { dg-options "-mdejagnu-cpu=power10 -O3 -dp" } */
+
+#include <altivec.h>
+#include <stdint.h>
+
+/* and/andc/eqv/nand/nor/or/orc/xor */
+#define AND(a,b) ((a)&(b))
+#define ANDC1(a,b) ((a)&((~b)))
+#define ANDC2(a,b) ((~(a))&(b))
+#define EQV(a,b) (~((a)^(b)))
+#define NAND(a,b) (~((a)&(b)))
+#define NOR(a,b) (~((a)|(b)))
+#define OR(a,b) ((a)|(b))
+#define ORC1(a,b) ((a)|((~b)))
+#define ORC2(a,b) ((~(a))|(b))
+#define XOR(a,b) ((a)^(b))
+#define TEST1(type, func) \
+ type func ## _and_T_ ## type (type a, type b, type c) { return AND(func(a,b),c); } \
+ type func ## _andc1_T_ ## type (type a, type b, type c) { return ANDC1(func(a,b),c); } \
+ type func ## _andc2_T_ ## type (type a, type b, type c) { return ANDC2(func(a,b),c); } \
+ type func ## _eqv_T_ ## type (type a, type b, type c) { return EQV(func(a,b),c); } \
+ type func ## _nand_T_ ## type (type a, type b, type c) { return NAND(func(a,b),c); } \
+ type func ## _nor_T_ ## type (type a, type b, type c) { return NOR(func(a,b),c); } \
+ type func ## _or_T_ ## type (type a, type b, type c) { return OR(func(a,b),c); } \
+ type func ## _orc1_T_ ## type (type a, type b, type c) { return ORC1(func(a,b),c); } \
+ type func ## _orc2_T_ ## type (type a, type b, type c) { return ORC2(func(a,b),c); } \
+ type func ## _xor_T_ ## type (type a, type b, type c) { return XOR(func(a,b),c); } \
+ type func ## _rev_and_T_ ## type (type a, type b, type c) { return AND(c,func(a,b)); } \
+ type func ## _rev_andc1_T_ ## type (type a, type b, type c) { return ANDC1(c,func(a,b)); } \
+ type func ## _rev_andc2_T_ ## type (type a, type b, type c) { return ANDC2(c,func(a,b)); } \
+ type func ## _rev_eqv_T_ ## type (type a, type b, type c) { return EQV(c,func(a,b)); } \
+ type func ## _rev_nand_T_ ## type (type a, type b, type c) { return NAND(c,func(a,b)); } \
+ type func ## _rev_nor_T_ ## type (type a, type b, type c) { return NOR(c,func(a,b)); } \
+ type func ## _rev_or_T_ ## type (type a, type b, type c) { return OR(c,func(a,b)); } \
+ type func ## _rev_orc1_T_ ## type (type a, type b, type c) { return ORC1(c,func(a,b)); } \
+ type func ## _rev_orc2_T_ ## type (type a, type b, type c) { return ORC2(c,func(a,b)); } \
+ type func ## _rev_xor_T_ ## type (type a, type b, type c) { return XOR(c,func(a,b)); }
+#define TEST(type) \
+ TEST1(type,AND) \
+ TEST1(type,ANDC1) \
+ TEST1(type,ANDC2) \
+ TEST1(type,EQV) \
+ TEST1(type,NAND) \
+ TEST1(type,NOR) \
+ TEST1(type,OR) \
+ TEST1(type,ORC1) \
+ TEST1(type,ORC2) \
+ TEST1(type,XOR)
+
+typedef vector bool char vboolchar_t;
+typedef vector unsigned int vuint_t;
+
+TEST(uint8_t);
+TEST(int8_t);
+TEST(uint16_t);
+TEST(int16_t);
+TEST(uint32_t);
+TEST(int32_t);
+TEST(uint64_t);
+TEST(int64_t);
+TEST(vboolchar_t);
+TEST(vuint_t);
+
+/* { dg-final { scan-assembler-times "fuse_and_and/0" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_and_and/2" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_andc_and/0" 48 } } */
+/* { dg-final { scan-assembler-times "fuse_andc_and/1" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_andc_and/2" 26 } } */
+/* { dg-final { scan-assembler-times "fuse_andc_and/3" 6 } } */
+/* { dg-final { scan-assembler-times "fuse_andc_or/0" 32 } } */
+/* { dg-final { scan-assembler-times "fuse_andc_or/1" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_andc_or/2" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_andc_orc/0" 48 } } */
+/* { dg-final { scan-assembler-times "fuse_andc_orc/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_andc_orc/2" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_andc_xor/0" 32 } } */
+/* { dg-final { scan-assembler-times "fuse_andc_xor/1" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_andc_xor/2" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_and_eqv/0" 24 } } */
+/* { dg-final { scan-assembler-times "fuse_and_eqv/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_and_or/0" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_and_or/1" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_and_orc/0" 24 } } */
+/* { dg-final { scan-assembler-times "fuse_and_orc/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_and_xor/0" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_and_xor/1" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_eqv_and/0" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_eqv_and/1" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_eqv_andc/0" 24 } } */
+/* { dg-final { scan-assembler-times "fuse_eqv_andc/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_eqv_or/0" 24 } } */
+/* { dg-final { scan-assembler-times "fuse_eqv_or/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_nand_and/0" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_nand_and/1" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_nand_andc/0" 24 } } */
+/* { dg-final { scan-assembler-times "fuse_nand_andc/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_nand_or/0" 72 } } */
+/* { dg-final { scan-assembler-times "fuse_nand_or/1" 14 } } */
+/* { dg-final { scan-assembler-times "fuse_nand_or/2" 2 } } */
+/* { dg-final { scan-assembler-times "fuse_nand_or/3" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_nand_orc/0" 24 } } */
+/* { dg-final { scan-assembler-times "fuse_nand_orc/3" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_nor_and/0" 48 } } */
+/* { dg-final { scan-assembler-times "fuse_nor_and/1" 28 } } */
+/* { dg-final { scan-assembler-times "fuse_nor_and/2" 4 } } */
+/* { dg-final { scan-assembler-times "fuse_nor_and/3" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_nor_andc/0" 24 } } */
+/* { dg-final { scan-assembler-times "fuse_nor_andc/3" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_nor_or/0" 24 } } */
+/* { dg-final { scan-assembler-times "fuse_nor_or/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_nor_orc/0" 24 } } */
+/* { dg-final { scan-assembler-times "fuse_nor_orc/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_or_and/0" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_or_and/1" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_or_andc/0" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_or_andc/1" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_orc_and/0" 32 } } */
+/* { dg-final { scan-assembler-times "fuse_orc_and/1" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_orc_and/2" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_orc_andc/0" 48 } } */
+/* { dg-final { scan-assembler-times "fuse_orc_andc/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_orc_andc/2" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_orc_or/0" 72 } } */
+/* { dg-final { scan-assembler-times "fuse_orc_or/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_orc_or/2" 10 } } */
+/* { dg-final { scan-assembler-times "fuse_orc_or/3" 6 } } */
+/* { dg-final { scan-assembler-times "fuse_orc_xor/0" 48 } } */
+/* { dg-final { scan-assembler-times "fuse_orc_xor/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_orc_xor/2" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_or_eqv/0" 24 } } */
+/* { dg-final { scan-assembler-times "fuse_or_eqv/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_or_or/0" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_or_or/2" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_or_xor/0" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_or_xor/1" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_vandc_vand/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vandc_vand/2" 10 } } */
+/* { dg-final { scan-assembler-times "fuse_vandc_vand/3" 6 } } */
+/* { dg-final { scan-assembler-times "fuse_vandc_vor/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vandc_vor/2" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vandc_vorc/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vandc_vorc/2" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vandc_vxor/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vandc_vxor/2" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vand_vand/2" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vand_veqv/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vand_vor/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vand_vorc/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vand_vxor/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_veqv_vand/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_veqv_vandc/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_veqv_vor/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vnand_vand/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vnand_vandc/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vnand_vor/1" 14 } } */
+/* { dg-final { scan-assembler-times "fuse_vnand_vor/2" 2 } } */
+/* { dg-final { scan-assembler-times "fuse_vnand_vor/3" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vnand_vorc/3" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vnor_vand/1" 14 } } */
+/* { dg-final { scan-assembler-times "fuse_vnor_vand/2" 2 } } */
+/* { dg-final { scan-assembler-times "fuse_vnor_vand/3" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vnor_vandc/3" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vnor_vor/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vnor_vorc/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vorc_vand/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vorc_vand/2" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vorc_vandc/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vorc_vandc/2" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vorc_vor/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vorc_vor/2" 10 } } */
+/* { dg-final { scan-assembler-times "fuse_vorc_vor/3" 6 } } */
+/* { dg-final { scan-assembler-times "fuse_vorc_vxor/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vorc_vxor/2" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vor_vand/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vor_vandc/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vor_veqv/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vor_vor/2" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vor_vxor/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vxor_vand/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vxor_vandc/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vxor_veqv/3" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vxor_vnand/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vxor_vor/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vxor_vorc/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vxor_vxor/2" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_xor_and/0" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_xor_and/1" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_xor_andc/0" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_xor_andc/1" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_xor_eqv/0" 24 } } */
+/* { dg-final { scan-assembler-times "fuse_xor_eqv/3" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_xor_nand/0" 24 } } */
+/* { dg-final { scan-assembler-times "fuse_xor_nand/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_xor_or/0" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_xor_or/1" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_xor_orc/0" 24 } } */
+/* { dg-final { scan-assembler-times "fuse_xor_orc/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_xor_xor/0" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_xor_xor/2" 16 } } */
diff --git a/gcc/testsuite/gcc.target/powerpc/fusion-p10-ldcmpi.c b/gcc/testsuite/gcc.target/powerpc/fusion-p10-ldcmpi.c
new file mode 100644
index 00000000000..3f33f49362e
--- /dev/null
+++ b/gcc/testsuite/gcc.target/powerpc/fusion-p10-ldcmpi.c
@@ -0,0 +1,66 @@
+/* { dg-do compile { target { powerpc*-*-* } } } */
+/* { dg-skip-if "" { powerpc*-*-darwin* } } */
+/* { dg-options "-mdejagnu-cpu=power10 -O3 -dp" } */
+
+#include <stdint.h>
+
+#define TEST(type) \
+ struct t ## type { type x[128],a,b,c; }; \
+ struct s ## type { struct t ## type *p; int d,e,f; uint64_t g,h,i; }; \
+int \
+t ## type (struct s ## type *p) \
+{ \
+ struct t ## type *tp = p->p; \
+ if(!tp || tp->a > ((type)0)) { return p->d; } \
+ if(!tp || tp->b > ((type)1)) { return p->e; } \
+ if(!tp || ( ((type)(-1) < 0) && tp->c < ((type)-1))) { return p->f; } \
+ return 0; \
+} \
+type \
+t ## type ## _ret (struct s ## type *p) \
+{ \
+ struct t ## type *tp = p->p; \
+ if(!tp || tp->a > ((type)0)) { return tp->a; } \
+ if(!tp || tp->b > ((type)1)) { return tp->b; } \
+ if(!tp || ( ((type)(-1) < 0) && tp->c < ((type)-1))) { return tp->c; } \
+ return 0; \
+}\
+int \
+t ## type ## _x (struct s ## type *p) \
+{ \
+ struct t ## type *tp = p->p; \
+ if(!tp || tp->x[p->g] > ((type)0)) { return p->d; } \
+ if(!tp || tp->x[p->h] > ((type)1)) { return p->e; } \
+ if(!tp || ( ((type)(-1) < 0) && tp->x[p->i] < ((type)-1))) { return p->f; } \
+ return 0; \
+} \
+type \
+t ## type ## _x_ret (struct s ## type *p) \
+{ \
+ struct t ## type *tp = p->p; \
+ if(!tp || tp->x[p->g] > ((type)0)) { return tp->x[p->g]; } \
+ if(!tp || tp->x[p->h] > ((type)1)) { return tp->x[p->h]; } \
+ if(!tp || ( ((type)(-1) < 0) && tp->x[p->i] < ((type)-1))) { return tp->x[p->i]; } \
+ return 0; \
+}
+
+TEST(uint64_t)
+TEST(int64_t)
+TEST(uint32_t)
+TEST(int32_t)
+TEST(uint16_t)
+TEST(int16_t)
+TEST(uint8_t)
+TEST(int8_t)
+
+/* { dg-final { scan-assembler-times "lbz_cmpldi_cr0_QI_clobber_CCUNS_zero" 2 } } */
+/* { dg-final { scan-assembler-times "ld_cmpldi_cr0_DI_clobber_CCUNS_none" 2 } } */
+/* { dg-final { scan-assembler-times "ld_cmpldi_cr0_DI_DI_CCUNS_none" 2 } } */
+/* { dg-final { scan-assembler-times "lhz_cmpldi_cr0_HI_clobber_CCUNS_zero" 2 } } */
+/* { dg-final { scan-assembler-times "lwz_cmpldi_cr0_SI_clobber_CCUNS_none" 2 } } */
+/* { dg-final { scan-assembler-times "lwz_cmpldi_cr0_SI_EXTSI_CCUNS_zero" 2 } } */
+/* { dg-final { scan-assembler-times "lwa_cmpdi_cr0_SI_EXTSI_CC_sign" 6 } } */
+/* { dg-final { scan-assembler-times "ld_cmpdi_cr0_DI_clobber_CC_none" 8 } } */
+/* { dg-final { scan-assembler-times "lha_cmpdi_cr0_HI_clobber_CC_sign" 8 } } */
+/* { dg-final { scan-assembler-times "lwa_cmpdi_cr0_SI_clobber_CC_none" 8 } } */
+/* { dg-final { scan-assembler-times "ld_cmpdi_cr0_DI_DI_CC_none" 24 } } */
^ permalink raw reply [flat|nested] 11+ messages in thread
* [gcc(refs/users/acsawdey/heads/fusion-combine)] Test cases for p10 fusion patterns
@ 2021-04-28 17:09 Aaron Sawdey
0 siblings, 0 replies; 11+ messages in thread
From: Aaron Sawdey @ 2021-04-28 17:09 UTC (permalink / raw)
To: gcc-cvs
https://gcc.gnu.org/g:bd0acaa21a15d19bcf202f7e27130761f749d6f9
commit bd0acaa21a15d19bcf202f7e27130761f749d6f9
Author: Aaron Sawdey <acsawdey@linux.ibm.com>
Date: Fri Dec 11 13:47:12 2020 -0600
Test cases for p10 fusion patterns
This adds some test cases to make sure that the combine patterns for p10
fusion are working.
gcc/testsuite/ChangeLog:
* gcc.target/powerpc/fusion-p10-ldcmpi.c: New file.
* gcc.target/powerpc/fusion-p10-2logical.c: New file.
Diff:
---
.../gcc.target/powerpc/fusion-p10-2logical.c | 205 +++++++++++++++++++++
.../gcc.target/powerpc/fusion-p10-ldcmpi.c | 66 +++++++
2 files changed, 271 insertions(+)
diff --git a/gcc/testsuite/gcc.target/powerpc/fusion-p10-2logical.c b/gcc/testsuite/gcc.target/powerpc/fusion-p10-2logical.c
new file mode 100644
index 00000000000..9a205373505
--- /dev/null
+++ b/gcc/testsuite/gcc.target/powerpc/fusion-p10-2logical.c
@@ -0,0 +1,205 @@
+/* { dg-do compile { target { powerpc*-*-* } } } */
+/* { dg-skip-if "" { powerpc*-*-darwin* } } */
+/* { dg-options "-mdejagnu-cpu=power10 -O3 -dp" } */
+
+#include <altivec.h>
+#include <stdint.h>
+
+/* and/andc/eqv/nand/nor/or/orc/xor */
+#define AND(a,b) ((a)&(b))
+#define ANDC1(a,b) ((a)&((~b)))
+#define ANDC2(a,b) ((~(a))&(b))
+#define EQV(a,b) (~((a)^(b)))
+#define NAND(a,b) (~((a)&(b)))
+#define NOR(a,b) (~((a)|(b)))
+#define OR(a,b) ((a)|(b))
+#define ORC1(a,b) ((a)|((~b)))
+#define ORC2(a,b) ((~(a))|(b))
+#define XOR(a,b) ((a)^(b))
+#define TEST1(type, func) \
+ type func ## _and_T_ ## type (type a, type b, type c) { return AND(func(a,b),c); } \
+ type func ## _andc1_T_ ## type (type a, type b, type c) { return ANDC1(func(a,b),c); } \
+ type func ## _andc2_T_ ## type (type a, type b, type c) { return ANDC2(func(a,b),c); } \
+ type func ## _eqv_T_ ## type (type a, type b, type c) { return EQV(func(a,b),c); } \
+ type func ## _nand_T_ ## type (type a, type b, type c) { return NAND(func(a,b),c); } \
+ type func ## _nor_T_ ## type (type a, type b, type c) { return NOR(func(a,b),c); } \
+ type func ## _or_T_ ## type (type a, type b, type c) { return OR(func(a,b),c); } \
+ type func ## _orc1_T_ ## type (type a, type b, type c) { return ORC1(func(a,b),c); } \
+ type func ## _orc2_T_ ## type (type a, type b, type c) { return ORC2(func(a,b),c); } \
+ type func ## _xor_T_ ## type (type a, type b, type c) { return XOR(func(a,b),c); } \
+ type func ## _rev_and_T_ ## type (type a, type b, type c) { return AND(c,func(a,b)); } \
+ type func ## _rev_andc1_T_ ## type (type a, type b, type c) { return ANDC1(c,func(a,b)); } \
+ type func ## _rev_andc2_T_ ## type (type a, type b, type c) { return ANDC2(c,func(a,b)); } \
+ type func ## _rev_eqv_T_ ## type (type a, type b, type c) { return EQV(c,func(a,b)); } \
+ type func ## _rev_nand_T_ ## type (type a, type b, type c) { return NAND(c,func(a,b)); } \
+ type func ## _rev_nor_T_ ## type (type a, type b, type c) { return NOR(c,func(a,b)); } \
+ type func ## _rev_or_T_ ## type (type a, type b, type c) { return OR(c,func(a,b)); } \
+ type func ## _rev_orc1_T_ ## type (type a, type b, type c) { return ORC1(c,func(a,b)); } \
+ type func ## _rev_orc2_T_ ## type (type a, type b, type c) { return ORC2(c,func(a,b)); } \
+ type func ## _rev_xor_T_ ## type (type a, type b, type c) { return XOR(c,func(a,b)); }
+#define TEST(type) \
+ TEST1(type,AND) \
+ TEST1(type,ANDC1) \
+ TEST1(type,ANDC2) \
+ TEST1(type,EQV) \
+ TEST1(type,NAND) \
+ TEST1(type,NOR) \
+ TEST1(type,OR) \
+ TEST1(type,ORC1) \
+ TEST1(type,ORC2) \
+ TEST1(type,XOR)
+
+typedef vector bool char vboolchar_t;
+typedef vector unsigned int vuint_t;
+
+TEST(uint8_t);
+TEST(int8_t);
+TEST(uint16_t);
+TEST(int16_t);
+TEST(uint32_t);
+TEST(int32_t);
+TEST(uint64_t);
+TEST(int64_t);
+TEST(vboolchar_t);
+TEST(vuint_t);
+
+/* Recreate with:
+ grep ' \*fuse_' fusion-p10-2logical.s|sed -e 's,^.*\*,,' |sort -k 7,7 |uniq -c|awk '{l=30-length($2); printf("/%s* { %s { scan-assembler-times \"%s\"%-*s %4d } } *%s/\n","","dg-final",$2,l,"",$1,"");}'
+ */
+
+/* { dg-final { scan-assembler-times "fuse_and_and/1" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_and_and/2" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_andc_and/0" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_andc_and/1" 26 } } */
+/* { dg-final { scan-assembler-times "fuse_andc_and/2" 48 } } */
+/* { dg-final { scan-assembler-times "fuse_andc_and/3" 6 } } */
+/* { dg-final { scan-assembler-times "fuse_andc_or/0" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_andc_or/1" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_andc_or/2" 32 } } */
+/* { dg-final { scan-assembler-times "fuse_andc_orc/0" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_andc_orc/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_andc_orc/2" 48 } } */
+/* { dg-final { scan-assembler-times "fuse_andc_xor/0" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_andc_xor/1" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_andc_xor/2" 32 } } */
+/* { dg-final { scan-assembler-times "fuse_and_eqv/0" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_and_eqv/2" 24 } } */
+/* { dg-final { scan-assembler-times "fuse_and_or/0" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_and_or/2" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_and_orc/0" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_and_orc/2" 24 } } */
+/* { dg-final { scan-assembler-times "fuse_and_xor/0" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_and_xor/2" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_eqv_and/0" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_eqv_and/2" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_eqv_andc/0" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_eqv_andc/2" 24 } } */
+/* { dg-final { scan-assembler-times "fuse_eqv_or/0" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_eqv_or/2" 24 } } */
+/* { dg-final { scan-assembler-times "fuse_nand_and/0" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_nand_and/2" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_nand_andc/0" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_nand_andc/2" 24 } } */
+/* { dg-final { scan-assembler-times "fuse_nand_or/0" 14 } } */
+/* { dg-final { scan-assembler-times "fuse_nand_or/1" 2 } } */
+/* { dg-final { scan-assembler-times "fuse_nand_or/2" 72 } } */
+/* { dg-final { scan-assembler-times "fuse_nand_or/3" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_nand_orc/2" 24 } } */
+/* { dg-final { scan-assembler-times "fuse_nand_orc/3" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_nor_and/0" 28 } } */
+/* { dg-final { scan-assembler-times "fuse_nor_and/1" 4 } } */
+/* { dg-final { scan-assembler-times "fuse_nor_and/2" 48 } } */
+/* { dg-final { scan-assembler-times "fuse_nor_and/3" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_nor_andc/2" 24 } } */
+/* { dg-final { scan-assembler-times "fuse_nor_andc/3" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_nor_or/0" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_nor_or/2" 24 } } */
+/* { dg-final { scan-assembler-times "fuse_nor_orc/0" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_nor_orc/2" 24 } } */
+/* { dg-final { scan-assembler-times "fuse_or_and/0" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_or_and/2" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_or_andc/0" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_or_andc/2" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_orc_and/0" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_orc_and/1" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_orc_and/2" 32 } } */
+/* { dg-final { scan-assembler-times "fuse_orc_andc/0" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_orc_andc/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_orc_andc/2" 48 } } */
+/* { dg-final { scan-assembler-times "fuse_orc_or/0" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_orc_or/1" 10 } } */
+/* { dg-final { scan-assembler-times "fuse_orc_or/2" 72 } } */
+/* { dg-final { scan-assembler-times "fuse_orc_or/3" 6 } } */
+/* { dg-final { scan-assembler-times "fuse_orc_xor/0" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_orc_xor/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_orc_xor/2" 48 } } */
+/* { dg-final { scan-assembler-times "fuse_or_eqv/0" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_or_eqv/2" 24 } } */
+/* { dg-final { scan-assembler-times "fuse_or_or/1" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_or_or/2" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_or_xor/0" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_or_xor/2" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_vandc_vand/0" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vandc_vand/1" 10 } } */
+/* { dg-final { scan-assembler-times "fuse_vandc_vand/3" 6 } } */
+/* { dg-final { scan-assembler-times "fuse_vandc_vor/0" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vandc_vor/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vandc_vorc/0" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vandc_vorc/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vandc_vxor/0" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vandc_vxor/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vand_vand/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vand_veqv/0" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vand_vor/0" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vand_vorc/0" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vand_vxor/0" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_veqv_vand/0" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_veqv_vandc/0" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_veqv_vor/0" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vnand_vand/0" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vnand_vandc/0" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vnand_vor/0" 14 } } */
+/* { dg-final { scan-assembler-times "fuse_vnand_vor/1" 2 } } */
+/* { dg-final { scan-assembler-times "fuse_vnand_vor/3" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vnand_vorc/3" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vnor_vand/0" 14 } } */
+/* { dg-final { scan-assembler-times "fuse_vnor_vand/1" 2 } } */
+/* { dg-final { scan-assembler-times "fuse_vnor_vand/3" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vnor_vandc/3" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vnor_vor/0" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vnor_vorc/0" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vorc_vand/0" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vorc_vand/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vorc_vandc/0" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vorc_vandc/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vorc_vor/0" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vorc_vor/1" 10 } } */
+/* { dg-final { scan-assembler-times "fuse_vorc_vor/3" 6 } } */
+/* { dg-final { scan-assembler-times "fuse_vorc_vxor/0" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vorc_vxor/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vor_vand/0" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vor_vandc/0" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vor_veqv/0" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vor_vor/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vor_vxor/0" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vxor_vand/0" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vxor_vandc/0" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vxor_veqv/3" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vxor_vnand/0" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vxor_vor/0" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vxor_vorc/0" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vxor_vxor/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_xor_and/0" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_xor_and/2" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_xor_andc/0" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_xor_andc/2" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_xor_eqv/2" 24 } } */
+/* { dg-final { scan-assembler-times "fuse_xor_eqv/3" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_xor_nand/0" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_xor_nand/2" 24 } } */
+/* { dg-final { scan-assembler-times "fuse_xor_or/0" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_xor_or/2" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_xor_orc/0" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_xor_orc/2" 24 } } */
+/* { dg-final { scan-assembler-times "fuse_xor_xor/1" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_xor_xor/2" 16 } } */
diff --git a/gcc/testsuite/gcc.target/powerpc/fusion-p10-ldcmpi.c b/gcc/testsuite/gcc.target/powerpc/fusion-p10-ldcmpi.c
new file mode 100644
index 00000000000..99f9e92eeaf
--- /dev/null
+++ b/gcc/testsuite/gcc.target/powerpc/fusion-p10-ldcmpi.c
@@ -0,0 +1,66 @@
+/* { dg-do compile { target { powerpc*-*-* } } } */
+/* { dg-skip-if "" { powerpc*-*-darwin* } } */
+/* { dg-options "-mdejagnu-cpu=power10 -O3 -dp" } */
+
+#include <stdint.h>
+
+#define TEST(type) \
+ struct t ## type { type x[128],a,b,c; }; \
+ struct s ## type { struct t ## type *p; int d,e,f; uint64_t g,h,i; }; \
+int \
+t ## type (struct s ## type *p) \
+{ \
+ struct t ## type *tp = p->p; \
+ if(!tp || tp->a > ((type)0)) { return p->d; } \
+ if(!tp || tp->b > ((type)1)) { return p->e; } \
+ if(!tp || ( ((type)(-1) < 0) && tp->c < ((type)-1))) { return p->f; } \
+ return 0; \
+} \
+type \
+t ## type ## _ret (struct s ## type *p) \
+{ \
+ struct t ## type *tp = p->p; \
+ if(!tp || tp->a > ((type)0)) { return tp->a; } \
+ if(!tp || tp->b > ((type)1)) { return tp->b; } \
+ if(!tp || ( ((type)(-1) < 0) && tp->c < ((type)-1))) { return tp->c; } \
+ return 0; \
+}\
+int \
+t ## type ## _x (struct s ## type *p) \
+{ \
+ struct t ## type *tp = p->p; \
+ if(!tp || tp->x[p->g] > ((type)0)) { return p->d; } \
+ if(!tp || tp->x[p->h] > ((type)1)) { return p->e; } \
+ if(!tp || ( ((type)(-1) < 0) && tp->x[p->i] < ((type)-1))) { return p->f; } \
+ return 0; \
+} \
+type \
+t ## type ## _x_ret (struct s ## type *p) \
+{ \
+ struct t ## type *tp = p->p; \
+ if(!tp || tp->x[p->g] > ((type)0)) { return tp->x[p->g]; } \
+ if(!tp || tp->x[p->h] > ((type)1)) { return tp->x[p->h]; } \
+ if(!tp || ( ((type)(-1) < 0) && tp->x[p->i] < ((type)-1))) { return tp->x[p->i]; } \
+ return 0; \
+}
+
+TEST(uint64_t)
+TEST(int64_t)
+TEST(uint32_t)
+TEST(int32_t)
+TEST(uint16_t)
+TEST(int16_t)
+TEST(uint8_t)
+TEST(int8_t)
+
+/* { dg-final { scan-assembler-times "lbz_cmpldi_cr0_QI_clobber_CCUNS_zero" 2 } } */
+/* { dg-final { scan-assembler-times "ld_cmpdi_cr0_DI_DI_CC_none" 4 } } */
+/* { dg-final { scan-assembler-times "ld_cmpdi_cr0_DI_clobber_CC_none" 4 } } */
+/* { dg-final { scan-assembler-times "ld_cmpldi_cr0_DI_DI_CCUNS_none" 1 } } */
+/* { dg-final { scan-assembler-times "ld_cmpldi_cr0_DI_clobber_CCUNS_none" 1 } } */
+/* { dg-final { scan-assembler-times "lha_cmpdi_cr0_HI_clobber_CC_sign" 8 } } */
+/* { dg-final { scan-assembler-times "lhz_cmpldi_cr0_HI_clobber_CCUNS_zero" 2 } } */
+/* { dg-final { scan-assembler-times "lwa_cmpdi_cr0_SI_EXTSI_CC_sign" 3 } } */
+/* { dg-final { scan-assembler-times "lwa_cmpdi_cr0_SI_clobber_CC_none" 4 } } */
+/* { dg-final { scan-assembler-times "lwz_cmpldi_cr0_SI_EXTSI_CCUNS_zero" 2 } } */
+/* { dg-final { scan-assembler-times "lwz_cmpldi_cr0_SI_clobber_CCUNS_none" 2 } } */
^ permalink raw reply [flat|nested] 11+ messages in thread
* [gcc(refs/users/acsawdey/heads/fusion-combine)] Test cases for p10 fusion patterns
@ 2021-03-05 18:14 Aaron Sawdey
0 siblings, 0 replies; 11+ messages in thread
From: Aaron Sawdey @ 2021-03-05 18:14 UTC (permalink / raw)
To: gcc-cvs
https://gcc.gnu.org/g:b83335b3f02bceb3e1878972fdbb2d9f74045037
commit b83335b3f02bceb3e1878972fdbb2d9f74045037
Author: Aaron Sawdey <acsawdey@linux.ibm.com>
Date: Fri Dec 11 13:47:12 2020 -0600
Test cases for p10 fusion patterns
This adds some test cases to make sure that the combine patterns for p10
fusion are working.
gcc/testsuite/ChangeLog:
* gcc.target/powerpc/fusion-p10-ldcmpi.c: New file.
* gcc.target/powerpc/fusion-p10-2logical.c: New file.
Diff:
---
.../gcc.target/powerpc/fusion-p10-2logical.c | 205 +++++++++++++++++++++
.../gcc.target/powerpc/fusion-p10-ldcmpi.c | 66 +++++++
2 files changed, 271 insertions(+)
diff --git a/gcc/testsuite/gcc.target/powerpc/fusion-p10-2logical.c b/gcc/testsuite/gcc.target/powerpc/fusion-p10-2logical.c
new file mode 100644
index 00000000000..9a205373505
--- /dev/null
+++ b/gcc/testsuite/gcc.target/powerpc/fusion-p10-2logical.c
@@ -0,0 +1,205 @@
+/* { dg-do compile { target { powerpc*-*-* } } } */
+/* { dg-skip-if "" { powerpc*-*-darwin* } } */
+/* { dg-options "-mdejagnu-cpu=power10 -O3 -dp" } */
+
+#include <altivec.h>
+#include <stdint.h>
+
+/* and/andc/eqv/nand/nor/or/orc/xor */
+#define AND(a,b) ((a)&(b))
+#define ANDC1(a,b) ((a)&((~b)))
+#define ANDC2(a,b) ((~(a))&(b))
+#define EQV(a,b) (~((a)^(b)))
+#define NAND(a,b) (~((a)&(b)))
+#define NOR(a,b) (~((a)|(b)))
+#define OR(a,b) ((a)|(b))
+#define ORC1(a,b) ((a)|((~b)))
+#define ORC2(a,b) ((~(a))|(b))
+#define XOR(a,b) ((a)^(b))
+#define TEST1(type, func) \
+ type func ## _and_T_ ## type (type a, type b, type c) { return AND(func(a,b),c); } \
+ type func ## _andc1_T_ ## type (type a, type b, type c) { return ANDC1(func(a,b),c); } \
+ type func ## _andc2_T_ ## type (type a, type b, type c) { return ANDC2(func(a,b),c); } \
+ type func ## _eqv_T_ ## type (type a, type b, type c) { return EQV(func(a,b),c); } \
+ type func ## _nand_T_ ## type (type a, type b, type c) { return NAND(func(a,b),c); } \
+ type func ## _nor_T_ ## type (type a, type b, type c) { return NOR(func(a,b),c); } \
+ type func ## _or_T_ ## type (type a, type b, type c) { return OR(func(a,b),c); } \
+ type func ## _orc1_T_ ## type (type a, type b, type c) { return ORC1(func(a,b),c); } \
+ type func ## _orc2_T_ ## type (type a, type b, type c) { return ORC2(func(a,b),c); } \
+ type func ## _xor_T_ ## type (type a, type b, type c) { return XOR(func(a,b),c); } \
+ type func ## _rev_and_T_ ## type (type a, type b, type c) { return AND(c,func(a,b)); } \
+ type func ## _rev_andc1_T_ ## type (type a, type b, type c) { return ANDC1(c,func(a,b)); } \
+ type func ## _rev_andc2_T_ ## type (type a, type b, type c) { return ANDC2(c,func(a,b)); } \
+ type func ## _rev_eqv_T_ ## type (type a, type b, type c) { return EQV(c,func(a,b)); } \
+ type func ## _rev_nand_T_ ## type (type a, type b, type c) { return NAND(c,func(a,b)); } \
+ type func ## _rev_nor_T_ ## type (type a, type b, type c) { return NOR(c,func(a,b)); } \
+ type func ## _rev_or_T_ ## type (type a, type b, type c) { return OR(c,func(a,b)); } \
+ type func ## _rev_orc1_T_ ## type (type a, type b, type c) { return ORC1(c,func(a,b)); } \
+ type func ## _rev_orc2_T_ ## type (type a, type b, type c) { return ORC2(c,func(a,b)); } \
+ type func ## _rev_xor_T_ ## type (type a, type b, type c) { return XOR(c,func(a,b)); }
+#define TEST(type) \
+ TEST1(type,AND) \
+ TEST1(type,ANDC1) \
+ TEST1(type,ANDC2) \
+ TEST1(type,EQV) \
+ TEST1(type,NAND) \
+ TEST1(type,NOR) \
+ TEST1(type,OR) \
+ TEST1(type,ORC1) \
+ TEST1(type,ORC2) \
+ TEST1(type,XOR)
+
+typedef vector bool char vboolchar_t;
+typedef vector unsigned int vuint_t;
+
+TEST(uint8_t);
+TEST(int8_t);
+TEST(uint16_t);
+TEST(int16_t);
+TEST(uint32_t);
+TEST(int32_t);
+TEST(uint64_t);
+TEST(int64_t);
+TEST(vboolchar_t);
+TEST(vuint_t);
+
+/* Recreate with:
+ grep ' \*fuse_' fusion-p10-2logical.s|sed -e 's,^.*\*,,' |sort -k 7,7 |uniq -c|awk '{l=30-length($2); printf("/%s* { %s { scan-assembler-times \"%s\"%-*s %4d } } *%s/\n","","dg-final",$2,l,"",$1,"");}'
+ */
+
+/* { dg-final { scan-assembler-times "fuse_and_and/1" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_and_and/2" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_andc_and/0" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_andc_and/1" 26 } } */
+/* { dg-final { scan-assembler-times "fuse_andc_and/2" 48 } } */
+/* { dg-final { scan-assembler-times "fuse_andc_and/3" 6 } } */
+/* { dg-final { scan-assembler-times "fuse_andc_or/0" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_andc_or/1" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_andc_or/2" 32 } } */
+/* { dg-final { scan-assembler-times "fuse_andc_orc/0" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_andc_orc/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_andc_orc/2" 48 } } */
+/* { dg-final { scan-assembler-times "fuse_andc_xor/0" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_andc_xor/1" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_andc_xor/2" 32 } } */
+/* { dg-final { scan-assembler-times "fuse_and_eqv/0" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_and_eqv/2" 24 } } */
+/* { dg-final { scan-assembler-times "fuse_and_or/0" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_and_or/2" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_and_orc/0" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_and_orc/2" 24 } } */
+/* { dg-final { scan-assembler-times "fuse_and_xor/0" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_and_xor/2" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_eqv_and/0" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_eqv_and/2" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_eqv_andc/0" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_eqv_andc/2" 24 } } */
+/* { dg-final { scan-assembler-times "fuse_eqv_or/0" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_eqv_or/2" 24 } } */
+/* { dg-final { scan-assembler-times "fuse_nand_and/0" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_nand_and/2" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_nand_andc/0" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_nand_andc/2" 24 } } */
+/* { dg-final { scan-assembler-times "fuse_nand_or/0" 14 } } */
+/* { dg-final { scan-assembler-times "fuse_nand_or/1" 2 } } */
+/* { dg-final { scan-assembler-times "fuse_nand_or/2" 72 } } */
+/* { dg-final { scan-assembler-times "fuse_nand_or/3" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_nand_orc/2" 24 } } */
+/* { dg-final { scan-assembler-times "fuse_nand_orc/3" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_nor_and/0" 28 } } */
+/* { dg-final { scan-assembler-times "fuse_nor_and/1" 4 } } */
+/* { dg-final { scan-assembler-times "fuse_nor_and/2" 48 } } */
+/* { dg-final { scan-assembler-times "fuse_nor_and/3" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_nor_andc/2" 24 } } */
+/* { dg-final { scan-assembler-times "fuse_nor_andc/3" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_nor_or/0" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_nor_or/2" 24 } } */
+/* { dg-final { scan-assembler-times "fuse_nor_orc/0" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_nor_orc/2" 24 } } */
+/* { dg-final { scan-assembler-times "fuse_or_and/0" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_or_and/2" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_or_andc/0" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_or_andc/2" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_orc_and/0" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_orc_and/1" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_orc_and/2" 32 } } */
+/* { dg-final { scan-assembler-times "fuse_orc_andc/0" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_orc_andc/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_orc_andc/2" 48 } } */
+/* { dg-final { scan-assembler-times "fuse_orc_or/0" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_orc_or/1" 10 } } */
+/* { dg-final { scan-assembler-times "fuse_orc_or/2" 72 } } */
+/* { dg-final { scan-assembler-times "fuse_orc_or/3" 6 } } */
+/* { dg-final { scan-assembler-times "fuse_orc_xor/0" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_orc_xor/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_orc_xor/2" 48 } } */
+/* { dg-final { scan-assembler-times "fuse_or_eqv/0" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_or_eqv/2" 24 } } */
+/* { dg-final { scan-assembler-times "fuse_or_or/1" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_or_or/2" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_or_xor/0" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_or_xor/2" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_vandc_vand/0" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vandc_vand/1" 10 } } */
+/* { dg-final { scan-assembler-times "fuse_vandc_vand/3" 6 } } */
+/* { dg-final { scan-assembler-times "fuse_vandc_vor/0" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vandc_vor/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vandc_vorc/0" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vandc_vorc/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vandc_vxor/0" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vandc_vxor/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vand_vand/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vand_veqv/0" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vand_vor/0" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vand_vorc/0" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vand_vxor/0" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_veqv_vand/0" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_veqv_vandc/0" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_veqv_vor/0" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vnand_vand/0" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vnand_vandc/0" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vnand_vor/0" 14 } } */
+/* { dg-final { scan-assembler-times "fuse_vnand_vor/1" 2 } } */
+/* { dg-final { scan-assembler-times "fuse_vnand_vor/3" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vnand_vorc/3" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vnor_vand/0" 14 } } */
+/* { dg-final { scan-assembler-times "fuse_vnor_vand/1" 2 } } */
+/* { dg-final { scan-assembler-times "fuse_vnor_vand/3" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vnor_vandc/3" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vnor_vor/0" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vnor_vorc/0" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vorc_vand/0" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vorc_vand/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vorc_vandc/0" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vorc_vandc/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vorc_vor/0" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vorc_vor/1" 10 } } */
+/* { dg-final { scan-assembler-times "fuse_vorc_vor/3" 6 } } */
+/* { dg-final { scan-assembler-times "fuse_vorc_vxor/0" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vorc_vxor/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vor_vand/0" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vor_vandc/0" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vor_veqv/0" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vor_vor/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vor_vxor/0" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vxor_vand/0" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vxor_vandc/0" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vxor_veqv/3" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vxor_vnand/0" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vxor_vor/0" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vxor_vorc/0" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vxor_vxor/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_xor_and/0" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_xor_and/2" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_xor_andc/0" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_xor_andc/2" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_xor_eqv/2" 24 } } */
+/* { dg-final { scan-assembler-times "fuse_xor_eqv/3" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_xor_nand/0" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_xor_nand/2" 24 } } */
+/* { dg-final { scan-assembler-times "fuse_xor_or/0" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_xor_or/2" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_xor_orc/0" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_xor_orc/2" 24 } } */
+/* { dg-final { scan-assembler-times "fuse_xor_xor/1" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_xor_xor/2" 16 } } */
diff --git a/gcc/testsuite/gcc.target/powerpc/fusion-p10-ldcmpi.c b/gcc/testsuite/gcc.target/powerpc/fusion-p10-ldcmpi.c
new file mode 100644
index 00000000000..3f33f49362e
--- /dev/null
+++ b/gcc/testsuite/gcc.target/powerpc/fusion-p10-ldcmpi.c
@@ -0,0 +1,66 @@
+/* { dg-do compile { target { powerpc*-*-* } } } */
+/* { dg-skip-if "" { powerpc*-*-darwin* } } */
+/* { dg-options "-mdejagnu-cpu=power10 -O3 -dp" } */
+
+#include <stdint.h>
+
+#define TEST(type) \
+ struct t ## type { type x[128],a,b,c; }; \
+ struct s ## type { struct t ## type *p; int d,e,f; uint64_t g,h,i; }; \
+int \
+t ## type (struct s ## type *p) \
+{ \
+ struct t ## type *tp = p->p; \
+ if(!tp || tp->a > ((type)0)) { return p->d; } \
+ if(!tp || tp->b > ((type)1)) { return p->e; } \
+ if(!tp || ( ((type)(-1) < 0) && tp->c < ((type)-1))) { return p->f; } \
+ return 0; \
+} \
+type \
+t ## type ## _ret (struct s ## type *p) \
+{ \
+ struct t ## type *tp = p->p; \
+ if(!tp || tp->a > ((type)0)) { return tp->a; } \
+ if(!tp || tp->b > ((type)1)) { return tp->b; } \
+ if(!tp || ( ((type)(-1) < 0) && tp->c < ((type)-1))) { return tp->c; } \
+ return 0; \
+}\
+int \
+t ## type ## _x (struct s ## type *p) \
+{ \
+ struct t ## type *tp = p->p; \
+ if(!tp || tp->x[p->g] > ((type)0)) { return p->d; } \
+ if(!tp || tp->x[p->h] > ((type)1)) { return p->e; } \
+ if(!tp || ( ((type)(-1) < 0) && tp->x[p->i] < ((type)-1))) { return p->f; } \
+ return 0; \
+} \
+type \
+t ## type ## _x_ret (struct s ## type *p) \
+{ \
+ struct t ## type *tp = p->p; \
+ if(!tp || tp->x[p->g] > ((type)0)) { return tp->x[p->g]; } \
+ if(!tp || tp->x[p->h] > ((type)1)) { return tp->x[p->h]; } \
+ if(!tp || ( ((type)(-1) < 0) && tp->x[p->i] < ((type)-1))) { return tp->x[p->i]; } \
+ return 0; \
+}
+
+TEST(uint64_t)
+TEST(int64_t)
+TEST(uint32_t)
+TEST(int32_t)
+TEST(uint16_t)
+TEST(int16_t)
+TEST(uint8_t)
+TEST(int8_t)
+
+/* { dg-final { scan-assembler-times "lbz_cmpldi_cr0_QI_clobber_CCUNS_zero" 2 } } */
+/* { dg-final { scan-assembler-times "ld_cmpldi_cr0_DI_clobber_CCUNS_none" 2 } } */
+/* { dg-final { scan-assembler-times "ld_cmpldi_cr0_DI_DI_CCUNS_none" 2 } } */
+/* { dg-final { scan-assembler-times "lhz_cmpldi_cr0_HI_clobber_CCUNS_zero" 2 } } */
+/* { dg-final { scan-assembler-times "lwz_cmpldi_cr0_SI_clobber_CCUNS_none" 2 } } */
+/* { dg-final { scan-assembler-times "lwz_cmpldi_cr0_SI_EXTSI_CCUNS_zero" 2 } } */
+/* { dg-final { scan-assembler-times "lwa_cmpdi_cr0_SI_EXTSI_CC_sign" 6 } } */
+/* { dg-final { scan-assembler-times "ld_cmpdi_cr0_DI_clobber_CC_none" 8 } } */
+/* { dg-final { scan-assembler-times "lha_cmpdi_cr0_HI_clobber_CC_sign" 8 } } */
+/* { dg-final { scan-assembler-times "lwa_cmpdi_cr0_SI_clobber_CC_none" 8 } } */
+/* { dg-final { scan-assembler-times "ld_cmpdi_cr0_DI_DI_CC_none" 24 } } */
^ permalink raw reply [flat|nested] 11+ messages in thread
* [gcc(refs/users/acsawdey/heads/fusion-combine)] Test cases for p10 fusion patterns
@ 2021-02-09 0:35 Aaron Sawdey
0 siblings, 0 replies; 11+ messages in thread
From: Aaron Sawdey @ 2021-02-09 0:35 UTC (permalink / raw)
To: gcc-cvs
https://gcc.gnu.org/g:7dbf8e37bcfa43bd9bca2305d6eb1eafc7b51d74
commit 7dbf8e37bcfa43bd9bca2305d6eb1eafc7b51d74
Author: Aaron Sawdey <acsawdey@linux.ibm.com>
Date: Fri Dec 11 13:47:12 2020 -0600
Test cases for p10 fusion patterns
This adds some test cases to make sure that the combine patterns for p10
fusion are working.
gcc/testsuite/ChangeLog:
* gcc.target/powerpc/fusion-p10-ldcmpi.c: New file.
* gcc.target/powerpc/fusion-p10-2logical.c: New file.
Diff:
---
.../gcc.target/powerpc/fusion-p10-2logical.c | 201 +++++++++++++++++++++
.../gcc.target/powerpc/fusion-p10-ldcmpi.c | 66 +++++++
2 files changed, 267 insertions(+)
diff --git a/gcc/testsuite/gcc.target/powerpc/fusion-p10-2logical.c b/gcc/testsuite/gcc.target/powerpc/fusion-p10-2logical.c
new file mode 100644
index 00000000000..cfe8f6c679a
--- /dev/null
+++ b/gcc/testsuite/gcc.target/powerpc/fusion-p10-2logical.c
@@ -0,0 +1,201 @@
+/* { dg-do compile { target { powerpc*-*-* } } } */
+/* { dg-skip-if "" { powerpc*-*-darwin* } } */
+/* { dg-options "-mdejagnu-cpu=power10 -O3 -dp" } */
+
+#include <altivec.h>
+#include <stdint.h>
+
+/* and/andc/eqv/nand/nor/or/orc/xor */
+#define AND(a,b) ((a)&(b))
+#define ANDC1(a,b) ((a)&((~b)))
+#define ANDC2(a,b) ((~(a))&(b))
+#define EQV(a,b) (~((a)^(b)))
+#define NAND(a,b) (~((a)&(b)))
+#define NOR(a,b) (~((a)|(b)))
+#define OR(a,b) ((a)|(b))
+#define ORC1(a,b) ((a)|((~b)))
+#define ORC2(a,b) ((~(a))|(b))
+#define XOR(a,b) ((a)^(b))
+#define TEST1(type, func) \
+ type func ## _and_T_ ## type (type a, type b, type c) { return AND(func(a,b),c); } \
+ type func ## _andc1_T_ ## type (type a, type b, type c) { return ANDC1(func(a,b),c); } \
+ type func ## _andc2_T_ ## type (type a, type b, type c) { return ANDC2(func(a,b),c); } \
+ type func ## _eqv_T_ ## type (type a, type b, type c) { return EQV(func(a,b),c); } \
+ type func ## _nand_T_ ## type (type a, type b, type c) { return NAND(func(a,b),c); } \
+ type func ## _nor_T_ ## type (type a, type b, type c) { return NOR(func(a,b),c); } \
+ type func ## _or_T_ ## type (type a, type b, type c) { return OR(func(a,b),c); } \
+ type func ## _orc1_T_ ## type (type a, type b, type c) { return ORC1(func(a,b),c); } \
+ type func ## _orc2_T_ ## type (type a, type b, type c) { return ORC2(func(a,b),c); } \
+ type func ## _xor_T_ ## type (type a, type b, type c) { return XOR(func(a,b),c); } \
+ type func ## _rev_and_T_ ## type (type a, type b, type c) { return AND(c,func(a,b)); } \
+ type func ## _rev_andc1_T_ ## type (type a, type b, type c) { return ANDC1(c,func(a,b)); } \
+ type func ## _rev_andc2_T_ ## type (type a, type b, type c) { return ANDC2(c,func(a,b)); } \
+ type func ## _rev_eqv_T_ ## type (type a, type b, type c) { return EQV(c,func(a,b)); } \
+ type func ## _rev_nand_T_ ## type (type a, type b, type c) { return NAND(c,func(a,b)); } \
+ type func ## _rev_nor_T_ ## type (type a, type b, type c) { return NOR(c,func(a,b)); } \
+ type func ## _rev_or_T_ ## type (type a, type b, type c) { return OR(c,func(a,b)); } \
+ type func ## _rev_orc1_T_ ## type (type a, type b, type c) { return ORC1(c,func(a,b)); } \
+ type func ## _rev_orc2_T_ ## type (type a, type b, type c) { return ORC2(c,func(a,b)); } \
+ type func ## _rev_xor_T_ ## type (type a, type b, type c) { return XOR(c,func(a,b)); }
+#define TEST(type) \
+ TEST1(type,AND) \
+ TEST1(type,ANDC1) \
+ TEST1(type,ANDC2) \
+ TEST1(type,EQV) \
+ TEST1(type,NAND) \
+ TEST1(type,NOR) \
+ TEST1(type,OR) \
+ TEST1(type,ORC1) \
+ TEST1(type,ORC2) \
+ TEST1(type,XOR)
+
+typedef vector bool char vboolchar_t;
+typedef vector unsigned int vuint_t;
+
+TEST(uint8_t);
+TEST(int8_t);
+TEST(uint16_t);
+TEST(int16_t);
+TEST(uint32_t);
+TEST(int32_t);
+TEST(uint64_t);
+TEST(int64_t);
+TEST(vboolchar_t);
+TEST(vuint_t);
+
+/* { dg-final { scan-assembler-times "fuse_and_and/0" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_and_and/2" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_andc_and/0" 48 } } */
+/* { dg-final { scan-assembler-times "fuse_andc_and/1" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_andc_and/2" 26 } } */
+/* { dg-final { scan-assembler-times "fuse_andc_and/3" 6 } } */
+/* { dg-final { scan-assembler-times "fuse_andc_or/0" 32 } } */
+/* { dg-final { scan-assembler-times "fuse_andc_or/1" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_andc_or/2" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_andc_orc/0" 48 } } */
+/* { dg-final { scan-assembler-times "fuse_andc_orc/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_andc_orc/2" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_andc_xor/0" 32 } } */
+/* { dg-final { scan-assembler-times "fuse_andc_xor/1" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_andc_xor/2" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_and_eqv/0" 24 } } */
+/* { dg-final { scan-assembler-times "fuse_and_eqv/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_and_or/0" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_and_or/1" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_and_orc/0" 24 } } */
+/* { dg-final { scan-assembler-times "fuse_and_orc/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_and_xor/0" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_and_xor/1" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_eqv_and/0" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_eqv_and/1" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_eqv_andc/0" 24 } } */
+/* { dg-final { scan-assembler-times "fuse_eqv_andc/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_eqv_or/0" 24 } } */
+/* { dg-final { scan-assembler-times "fuse_eqv_or/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_nand_and/0" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_nand_and/1" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_nand_andc/0" 24 } } */
+/* { dg-final { scan-assembler-times "fuse_nand_andc/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_nand_or/0" 72 } } */
+/* { dg-final { scan-assembler-times "fuse_nand_or/1" 14 } } */
+/* { dg-final { scan-assembler-times "fuse_nand_or/2" 2 } } */
+/* { dg-final { scan-assembler-times "fuse_nand_or/3" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_nand_orc/0" 24 } } */
+/* { dg-final { scan-assembler-times "fuse_nand_orc/3" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_nor_and/0" 48 } } */
+/* { dg-final { scan-assembler-times "fuse_nor_and/1" 28 } } */
+/* { dg-final { scan-assembler-times "fuse_nor_and/2" 4 } } */
+/* { dg-final { scan-assembler-times "fuse_nor_and/3" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_nor_andc/0" 24 } } */
+/* { dg-final { scan-assembler-times "fuse_nor_andc/3" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_nor_or/0" 24 } } */
+/* { dg-final { scan-assembler-times "fuse_nor_or/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_nor_orc/0" 24 } } */
+/* { dg-final { scan-assembler-times "fuse_nor_orc/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_or_and/0" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_or_and/1" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_or_andc/0" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_or_andc/1" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_orc_and/0" 32 } } */
+/* { dg-final { scan-assembler-times "fuse_orc_and/1" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_orc_and/2" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_orc_andc/0" 48 } } */
+/* { dg-final { scan-assembler-times "fuse_orc_andc/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_orc_andc/2" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_orc_or/0" 72 } } */
+/* { dg-final { scan-assembler-times "fuse_orc_or/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_orc_or/2" 10 } } */
+/* { dg-final { scan-assembler-times "fuse_orc_or/3" 6 } } */
+/* { dg-final { scan-assembler-times "fuse_orc_xor/0" 48 } } */
+/* { dg-final { scan-assembler-times "fuse_orc_xor/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_orc_xor/2" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_or_eqv/0" 24 } } */
+/* { dg-final { scan-assembler-times "fuse_or_eqv/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_or_or/0" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_or_or/2" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_or_xor/0" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_or_xor/1" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_vandc_vand/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vandc_vand/2" 10 } } */
+/* { dg-final { scan-assembler-times "fuse_vandc_vand/3" 6 } } */
+/* { dg-final { scan-assembler-times "fuse_vandc_vor/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vandc_vor/2" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vandc_vorc/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vandc_vorc/2" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vandc_vxor/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vandc_vxor/2" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vand_vand/2" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vand_veqv/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vand_vor/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vand_vorc/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vand_vxor/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_veqv_vand/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_veqv_vandc/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_veqv_vor/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vnand_vand/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vnand_vandc/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vnand_vor/1" 14 } } */
+/* { dg-final { scan-assembler-times "fuse_vnand_vor/2" 2 } } */
+/* { dg-final { scan-assembler-times "fuse_vnand_vor/3" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vnand_vorc/3" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vnor_vand/1" 14 } } */
+/* { dg-final { scan-assembler-times "fuse_vnor_vand/2" 2 } } */
+/* { dg-final { scan-assembler-times "fuse_vnor_vand/3" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vnor_vandc/3" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vnor_vor/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vnor_vorc/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vorc_vand/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vorc_vand/2" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vorc_vandc/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vorc_vandc/2" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vorc_vor/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vorc_vor/2" 10 } } */
+/* { dg-final { scan-assembler-times "fuse_vorc_vor/3" 6 } } */
+/* { dg-final { scan-assembler-times "fuse_vorc_vxor/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vorc_vxor/2" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vor_vand/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vor_vandc/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vor_veqv/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vor_vor/2" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vor_vxor/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vxor_vand/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vxor_vandc/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vxor_veqv/3" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vxor_vnand/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vxor_vor/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vxor_vorc/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vxor_vxor/2" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_xor_and/0" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_xor_and/1" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_xor_andc/0" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_xor_andc/1" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_xor_eqv/0" 24 } } */
+/* { dg-final { scan-assembler-times "fuse_xor_eqv/3" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_xor_nand/0" 24 } } */
+/* { dg-final { scan-assembler-times "fuse_xor_nand/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_xor_or/0" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_xor_or/1" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_xor_orc/0" 24 } } */
+/* { dg-final { scan-assembler-times "fuse_xor_orc/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_xor_xor/0" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_xor_xor/2" 16 } } */
diff --git a/gcc/testsuite/gcc.target/powerpc/fusion-p10-ldcmpi.c b/gcc/testsuite/gcc.target/powerpc/fusion-p10-ldcmpi.c
new file mode 100644
index 00000000000..3f33f49362e
--- /dev/null
+++ b/gcc/testsuite/gcc.target/powerpc/fusion-p10-ldcmpi.c
@@ -0,0 +1,66 @@
+/* { dg-do compile { target { powerpc*-*-* } } } */
+/* { dg-skip-if "" { powerpc*-*-darwin* } } */
+/* { dg-options "-mdejagnu-cpu=power10 -O3 -dp" } */
+
+#include <stdint.h>
+
+#define TEST(type) \
+ struct t ## type { type x[128],a,b,c; }; \
+ struct s ## type { struct t ## type *p; int d,e,f; uint64_t g,h,i; }; \
+int \
+t ## type (struct s ## type *p) \
+{ \
+ struct t ## type *tp = p->p; \
+ if(!tp || tp->a > ((type)0)) { return p->d; } \
+ if(!tp || tp->b > ((type)1)) { return p->e; } \
+ if(!tp || ( ((type)(-1) < 0) && tp->c < ((type)-1))) { return p->f; } \
+ return 0; \
+} \
+type \
+t ## type ## _ret (struct s ## type *p) \
+{ \
+ struct t ## type *tp = p->p; \
+ if(!tp || tp->a > ((type)0)) { return tp->a; } \
+ if(!tp || tp->b > ((type)1)) { return tp->b; } \
+ if(!tp || ( ((type)(-1) < 0) && tp->c < ((type)-1))) { return tp->c; } \
+ return 0; \
+}\
+int \
+t ## type ## _x (struct s ## type *p) \
+{ \
+ struct t ## type *tp = p->p; \
+ if(!tp || tp->x[p->g] > ((type)0)) { return p->d; } \
+ if(!tp || tp->x[p->h] > ((type)1)) { return p->e; } \
+ if(!tp || ( ((type)(-1) < 0) && tp->x[p->i] < ((type)-1))) { return p->f; } \
+ return 0; \
+} \
+type \
+t ## type ## _x_ret (struct s ## type *p) \
+{ \
+ struct t ## type *tp = p->p; \
+ if(!tp || tp->x[p->g] > ((type)0)) { return tp->x[p->g]; } \
+ if(!tp || tp->x[p->h] > ((type)1)) { return tp->x[p->h]; } \
+ if(!tp || ( ((type)(-1) < 0) && tp->x[p->i] < ((type)-1))) { return tp->x[p->i]; } \
+ return 0; \
+}
+
+TEST(uint64_t)
+TEST(int64_t)
+TEST(uint32_t)
+TEST(int32_t)
+TEST(uint16_t)
+TEST(int16_t)
+TEST(uint8_t)
+TEST(int8_t)
+
+/* { dg-final { scan-assembler-times "lbz_cmpldi_cr0_QI_clobber_CCUNS_zero" 2 } } */
+/* { dg-final { scan-assembler-times "ld_cmpldi_cr0_DI_clobber_CCUNS_none" 2 } } */
+/* { dg-final { scan-assembler-times "ld_cmpldi_cr0_DI_DI_CCUNS_none" 2 } } */
+/* { dg-final { scan-assembler-times "lhz_cmpldi_cr0_HI_clobber_CCUNS_zero" 2 } } */
+/* { dg-final { scan-assembler-times "lwz_cmpldi_cr0_SI_clobber_CCUNS_none" 2 } } */
+/* { dg-final { scan-assembler-times "lwz_cmpldi_cr0_SI_EXTSI_CCUNS_zero" 2 } } */
+/* { dg-final { scan-assembler-times "lwa_cmpdi_cr0_SI_EXTSI_CC_sign" 6 } } */
+/* { dg-final { scan-assembler-times "ld_cmpdi_cr0_DI_clobber_CC_none" 8 } } */
+/* { dg-final { scan-assembler-times "lha_cmpdi_cr0_HI_clobber_CC_sign" 8 } } */
+/* { dg-final { scan-assembler-times "lwa_cmpdi_cr0_SI_clobber_CC_none" 8 } } */
+/* { dg-final { scan-assembler-times "ld_cmpdi_cr0_DI_DI_CC_none" 24 } } */
^ permalink raw reply [flat|nested] 11+ messages in thread
* [gcc(refs/users/acsawdey/heads/fusion-combine)] Test cases for p10 fusion patterns
@ 2021-01-30 21:54 Aaron Sawdey
0 siblings, 0 replies; 11+ messages in thread
From: Aaron Sawdey @ 2021-01-30 21:54 UTC (permalink / raw)
To: gcc-cvs
https://gcc.gnu.org/g:dee8750bdd38abff76c3611e4663e8d4e44c7836
commit dee8750bdd38abff76c3611e4663e8d4e44c7836
Author: Aaron Sawdey <acsawdey@linux.ibm.com>
Date: Fri Dec 11 13:47:12 2020 -0600
Test cases for p10 fusion patterns
This adds some test cases to make sure that the combine patterns for p10
fusion are working.
gcc/testsuite/ChangeLog:
* gcc.target/powerpc/fusion-p10-ldcmpi.c: New file.
* gcc.target/powerpc/fusion-p10-2logical.c: New file.
Diff:
---
.../gcc.target/powerpc/fusion-p10-2logical.c | 201 +++++++++++++++++++++
.../gcc.target/powerpc/fusion-p10-ldcmpi.c | 66 +++++++
2 files changed, 267 insertions(+)
diff --git a/gcc/testsuite/gcc.target/powerpc/fusion-p10-2logical.c b/gcc/testsuite/gcc.target/powerpc/fusion-p10-2logical.c
new file mode 100644
index 00000000000..cfe8f6c679a
--- /dev/null
+++ b/gcc/testsuite/gcc.target/powerpc/fusion-p10-2logical.c
@@ -0,0 +1,201 @@
+/* { dg-do compile { target { powerpc*-*-* } } } */
+/* { dg-skip-if "" { powerpc*-*-darwin* } } */
+/* { dg-options "-mdejagnu-cpu=power10 -O3 -dp" } */
+
+#include <altivec.h>
+#include <stdint.h>
+
+/* and/andc/eqv/nand/nor/or/orc/xor */
+#define AND(a,b) ((a)&(b))
+#define ANDC1(a,b) ((a)&((~b)))
+#define ANDC2(a,b) ((~(a))&(b))
+#define EQV(a,b) (~((a)^(b)))
+#define NAND(a,b) (~((a)&(b)))
+#define NOR(a,b) (~((a)|(b)))
+#define OR(a,b) ((a)|(b))
+#define ORC1(a,b) ((a)|((~b)))
+#define ORC2(a,b) ((~(a))|(b))
+#define XOR(a,b) ((a)^(b))
+#define TEST1(type, func) \
+ type func ## _and_T_ ## type (type a, type b, type c) { return AND(func(a,b),c); } \
+ type func ## _andc1_T_ ## type (type a, type b, type c) { return ANDC1(func(a,b),c); } \
+ type func ## _andc2_T_ ## type (type a, type b, type c) { return ANDC2(func(a,b),c); } \
+ type func ## _eqv_T_ ## type (type a, type b, type c) { return EQV(func(a,b),c); } \
+ type func ## _nand_T_ ## type (type a, type b, type c) { return NAND(func(a,b),c); } \
+ type func ## _nor_T_ ## type (type a, type b, type c) { return NOR(func(a,b),c); } \
+ type func ## _or_T_ ## type (type a, type b, type c) { return OR(func(a,b),c); } \
+ type func ## _orc1_T_ ## type (type a, type b, type c) { return ORC1(func(a,b),c); } \
+ type func ## _orc2_T_ ## type (type a, type b, type c) { return ORC2(func(a,b),c); } \
+ type func ## _xor_T_ ## type (type a, type b, type c) { return XOR(func(a,b),c); } \
+ type func ## _rev_and_T_ ## type (type a, type b, type c) { return AND(c,func(a,b)); } \
+ type func ## _rev_andc1_T_ ## type (type a, type b, type c) { return ANDC1(c,func(a,b)); } \
+ type func ## _rev_andc2_T_ ## type (type a, type b, type c) { return ANDC2(c,func(a,b)); } \
+ type func ## _rev_eqv_T_ ## type (type a, type b, type c) { return EQV(c,func(a,b)); } \
+ type func ## _rev_nand_T_ ## type (type a, type b, type c) { return NAND(c,func(a,b)); } \
+ type func ## _rev_nor_T_ ## type (type a, type b, type c) { return NOR(c,func(a,b)); } \
+ type func ## _rev_or_T_ ## type (type a, type b, type c) { return OR(c,func(a,b)); } \
+ type func ## _rev_orc1_T_ ## type (type a, type b, type c) { return ORC1(c,func(a,b)); } \
+ type func ## _rev_orc2_T_ ## type (type a, type b, type c) { return ORC2(c,func(a,b)); } \
+ type func ## _rev_xor_T_ ## type (type a, type b, type c) { return XOR(c,func(a,b)); }
+#define TEST(type) \
+ TEST1(type,AND) \
+ TEST1(type,ANDC1) \
+ TEST1(type,ANDC2) \
+ TEST1(type,EQV) \
+ TEST1(type,NAND) \
+ TEST1(type,NOR) \
+ TEST1(type,OR) \
+ TEST1(type,ORC1) \
+ TEST1(type,ORC2) \
+ TEST1(type,XOR)
+
+typedef vector bool char vboolchar_t;
+typedef vector unsigned int vuint_t;
+
+TEST(uint8_t);
+TEST(int8_t);
+TEST(uint16_t);
+TEST(int16_t);
+TEST(uint32_t);
+TEST(int32_t);
+TEST(uint64_t);
+TEST(int64_t);
+TEST(vboolchar_t);
+TEST(vuint_t);
+
+/* { dg-final { scan-assembler-times "fuse_and_and/0" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_and_and/2" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_andc_and/0" 48 } } */
+/* { dg-final { scan-assembler-times "fuse_andc_and/1" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_andc_and/2" 26 } } */
+/* { dg-final { scan-assembler-times "fuse_andc_and/3" 6 } } */
+/* { dg-final { scan-assembler-times "fuse_andc_or/0" 32 } } */
+/* { dg-final { scan-assembler-times "fuse_andc_or/1" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_andc_or/2" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_andc_orc/0" 48 } } */
+/* { dg-final { scan-assembler-times "fuse_andc_orc/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_andc_orc/2" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_andc_xor/0" 32 } } */
+/* { dg-final { scan-assembler-times "fuse_andc_xor/1" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_andc_xor/2" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_and_eqv/0" 24 } } */
+/* { dg-final { scan-assembler-times "fuse_and_eqv/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_and_or/0" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_and_or/1" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_and_orc/0" 24 } } */
+/* { dg-final { scan-assembler-times "fuse_and_orc/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_and_xor/0" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_and_xor/1" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_eqv_and/0" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_eqv_and/1" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_eqv_andc/0" 24 } } */
+/* { dg-final { scan-assembler-times "fuse_eqv_andc/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_eqv_or/0" 24 } } */
+/* { dg-final { scan-assembler-times "fuse_eqv_or/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_nand_and/0" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_nand_and/1" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_nand_andc/0" 24 } } */
+/* { dg-final { scan-assembler-times "fuse_nand_andc/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_nand_or/0" 72 } } */
+/* { dg-final { scan-assembler-times "fuse_nand_or/1" 14 } } */
+/* { dg-final { scan-assembler-times "fuse_nand_or/2" 2 } } */
+/* { dg-final { scan-assembler-times "fuse_nand_or/3" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_nand_orc/0" 24 } } */
+/* { dg-final { scan-assembler-times "fuse_nand_orc/3" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_nor_and/0" 48 } } */
+/* { dg-final { scan-assembler-times "fuse_nor_and/1" 28 } } */
+/* { dg-final { scan-assembler-times "fuse_nor_and/2" 4 } } */
+/* { dg-final { scan-assembler-times "fuse_nor_and/3" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_nor_andc/0" 24 } } */
+/* { dg-final { scan-assembler-times "fuse_nor_andc/3" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_nor_or/0" 24 } } */
+/* { dg-final { scan-assembler-times "fuse_nor_or/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_nor_orc/0" 24 } } */
+/* { dg-final { scan-assembler-times "fuse_nor_orc/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_or_and/0" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_or_and/1" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_or_andc/0" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_or_andc/1" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_orc_and/0" 32 } } */
+/* { dg-final { scan-assembler-times "fuse_orc_and/1" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_orc_and/2" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_orc_andc/0" 48 } } */
+/* { dg-final { scan-assembler-times "fuse_orc_andc/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_orc_andc/2" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_orc_or/0" 72 } } */
+/* { dg-final { scan-assembler-times "fuse_orc_or/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_orc_or/2" 10 } } */
+/* { dg-final { scan-assembler-times "fuse_orc_or/3" 6 } } */
+/* { dg-final { scan-assembler-times "fuse_orc_xor/0" 48 } } */
+/* { dg-final { scan-assembler-times "fuse_orc_xor/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_orc_xor/2" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_or_eqv/0" 24 } } */
+/* { dg-final { scan-assembler-times "fuse_or_eqv/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_or_or/0" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_or_or/2" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_or_xor/0" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_or_xor/1" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_vandc_vand/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vandc_vand/2" 10 } } */
+/* { dg-final { scan-assembler-times "fuse_vandc_vand/3" 6 } } */
+/* { dg-final { scan-assembler-times "fuse_vandc_vor/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vandc_vor/2" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vandc_vorc/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vandc_vorc/2" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vandc_vxor/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vandc_vxor/2" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vand_vand/2" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vand_veqv/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vand_vor/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vand_vorc/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vand_vxor/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_veqv_vand/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_veqv_vandc/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_veqv_vor/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vnand_vand/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vnand_vandc/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vnand_vor/1" 14 } } */
+/* { dg-final { scan-assembler-times "fuse_vnand_vor/2" 2 } } */
+/* { dg-final { scan-assembler-times "fuse_vnand_vor/3" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vnand_vorc/3" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vnor_vand/1" 14 } } */
+/* { dg-final { scan-assembler-times "fuse_vnor_vand/2" 2 } } */
+/* { dg-final { scan-assembler-times "fuse_vnor_vand/3" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vnor_vandc/3" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vnor_vor/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vnor_vorc/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vorc_vand/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vorc_vand/2" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vorc_vandc/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vorc_vandc/2" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vorc_vor/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vorc_vor/2" 10 } } */
+/* { dg-final { scan-assembler-times "fuse_vorc_vor/3" 6 } } */
+/* { dg-final { scan-assembler-times "fuse_vorc_vxor/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vorc_vxor/2" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vor_vand/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vor_vandc/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vor_veqv/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vor_vor/2" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vor_vxor/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vxor_vand/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vxor_vandc/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vxor_veqv/3" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vxor_vnand/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vxor_vor/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vxor_vorc/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vxor_vxor/2" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_xor_and/0" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_xor_and/1" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_xor_andc/0" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_xor_andc/1" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_xor_eqv/0" 24 } } */
+/* { dg-final { scan-assembler-times "fuse_xor_eqv/3" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_xor_nand/0" 24 } } */
+/* { dg-final { scan-assembler-times "fuse_xor_nand/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_xor_or/0" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_xor_or/1" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_xor_orc/0" 24 } } */
+/* { dg-final { scan-assembler-times "fuse_xor_orc/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_xor_xor/0" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_xor_xor/2" 16 } } */
diff --git a/gcc/testsuite/gcc.target/powerpc/fusion-p10-ldcmpi.c b/gcc/testsuite/gcc.target/powerpc/fusion-p10-ldcmpi.c
new file mode 100644
index 00000000000..3f33f49362e
--- /dev/null
+++ b/gcc/testsuite/gcc.target/powerpc/fusion-p10-ldcmpi.c
@@ -0,0 +1,66 @@
+/* { dg-do compile { target { powerpc*-*-* } } } */
+/* { dg-skip-if "" { powerpc*-*-darwin* } } */
+/* { dg-options "-mdejagnu-cpu=power10 -O3 -dp" } */
+
+#include <stdint.h>
+
+#define TEST(type) \
+ struct t ## type { type x[128],a,b,c; }; \
+ struct s ## type { struct t ## type *p; int d,e,f; uint64_t g,h,i; }; \
+int \
+t ## type (struct s ## type *p) \
+{ \
+ struct t ## type *tp = p->p; \
+ if(!tp || tp->a > ((type)0)) { return p->d; } \
+ if(!tp || tp->b > ((type)1)) { return p->e; } \
+ if(!tp || ( ((type)(-1) < 0) && tp->c < ((type)-1))) { return p->f; } \
+ return 0; \
+} \
+type \
+t ## type ## _ret (struct s ## type *p) \
+{ \
+ struct t ## type *tp = p->p; \
+ if(!tp || tp->a > ((type)0)) { return tp->a; } \
+ if(!tp || tp->b > ((type)1)) { return tp->b; } \
+ if(!tp || ( ((type)(-1) < 0) && tp->c < ((type)-1))) { return tp->c; } \
+ return 0; \
+}\
+int \
+t ## type ## _x (struct s ## type *p) \
+{ \
+ struct t ## type *tp = p->p; \
+ if(!tp || tp->x[p->g] > ((type)0)) { return p->d; } \
+ if(!tp || tp->x[p->h] > ((type)1)) { return p->e; } \
+ if(!tp || ( ((type)(-1) < 0) && tp->x[p->i] < ((type)-1))) { return p->f; } \
+ return 0; \
+} \
+type \
+t ## type ## _x_ret (struct s ## type *p) \
+{ \
+ struct t ## type *tp = p->p; \
+ if(!tp || tp->x[p->g] > ((type)0)) { return tp->x[p->g]; } \
+ if(!tp || tp->x[p->h] > ((type)1)) { return tp->x[p->h]; } \
+ if(!tp || ( ((type)(-1) < 0) && tp->x[p->i] < ((type)-1))) { return tp->x[p->i]; } \
+ return 0; \
+}
+
+TEST(uint64_t)
+TEST(int64_t)
+TEST(uint32_t)
+TEST(int32_t)
+TEST(uint16_t)
+TEST(int16_t)
+TEST(uint8_t)
+TEST(int8_t)
+
+/* { dg-final { scan-assembler-times "lbz_cmpldi_cr0_QI_clobber_CCUNS_zero" 2 } } */
+/* { dg-final { scan-assembler-times "ld_cmpldi_cr0_DI_clobber_CCUNS_none" 2 } } */
+/* { dg-final { scan-assembler-times "ld_cmpldi_cr0_DI_DI_CCUNS_none" 2 } } */
+/* { dg-final { scan-assembler-times "lhz_cmpldi_cr0_HI_clobber_CCUNS_zero" 2 } } */
+/* { dg-final { scan-assembler-times "lwz_cmpldi_cr0_SI_clobber_CCUNS_none" 2 } } */
+/* { dg-final { scan-assembler-times "lwz_cmpldi_cr0_SI_EXTSI_CCUNS_zero" 2 } } */
+/* { dg-final { scan-assembler-times "lwa_cmpdi_cr0_SI_EXTSI_CC_sign" 6 } } */
+/* { dg-final { scan-assembler-times "ld_cmpdi_cr0_DI_clobber_CC_none" 8 } } */
+/* { dg-final { scan-assembler-times "lha_cmpdi_cr0_HI_clobber_CC_sign" 8 } } */
+/* { dg-final { scan-assembler-times "lwa_cmpdi_cr0_SI_clobber_CC_none" 8 } } */
+/* { dg-final { scan-assembler-times "ld_cmpdi_cr0_DI_DI_CC_none" 24 } } */
^ permalink raw reply [flat|nested] 11+ messages in thread
* [gcc(refs/users/acsawdey/heads/fusion-combine)] Test cases for p10 fusion patterns
@ 2021-01-27 18:26 Aaron Sawdey
0 siblings, 0 replies; 11+ messages in thread
From: Aaron Sawdey @ 2021-01-27 18:26 UTC (permalink / raw)
To: gcc-cvs
https://gcc.gnu.org/g:5e53aca15aa2645d2dea08349785ed83c8dc2f8f
commit 5e53aca15aa2645d2dea08349785ed83c8dc2f8f
Author: Aaron Sawdey <acsawdey@linux.ibm.com>
Date: Fri Dec 11 13:47:12 2020 -0600
Test cases for p10 fusion patterns
This adds some test cases to make sure that the combine patterns for p10
fusion are working.
gcc/testsuite/ChangeLog:
* gcc.target/powerpc/fusion-p10-ldcmpi.c: New file.
* gcc.target/powerpc/fusion-p10-2logical.c: New file.
Diff:
---
.../gcc.target/powerpc/fusion-p10-2logical.c | 201 +++++++++++++++++++++
.../gcc.target/powerpc/fusion-p10-ldcmpi.c | 66 +++++++
2 files changed, 267 insertions(+)
diff --git a/gcc/testsuite/gcc.target/powerpc/fusion-p10-2logical.c b/gcc/testsuite/gcc.target/powerpc/fusion-p10-2logical.c
new file mode 100644
index 00000000000..cfe8f6c679a
--- /dev/null
+++ b/gcc/testsuite/gcc.target/powerpc/fusion-p10-2logical.c
@@ -0,0 +1,201 @@
+/* { dg-do compile { target { powerpc*-*-* } } } */
+/* { dg-skip-if "" { powerpc*-*-darwin* } } */
+/* { dg-options "-mdejagnu-cpu=power10 -O3 -dp" } */
+
+#include <altivec.h>
+#include <stdint.h>
+
+/* and/andc/eqv/nand/nor/or/orc/xor */
+#define AND(a,b) ((a)&(b))
+#define ANDC1(a,b) ((a)&((~b)))
+#define ANDC2(a,b) ((~(a))&(b))
+#define EQV(a,b) (~((a)^(b)))
+#define NAND(a,b) (~((a)&(b)))
+#define NOR(a,b) (~((a)|(b)))
+#define OR(a,b) ((a)|(b))
+#define ORC1(a,b) ((a)|((~b)))
+#define ORC2(a,b) ((~(a))|(b))
+#define XOR(a,b) ((a)^(b))
+#define TEST1(type, func) \
+ type func ## _and_T_ ## type (type a, type b, type c) { return AND(func(a,b),c); } \
+ type func ## _andc1_T_ ## type (type a, type b, type c) { return ANDC1(func(a,b),c); } \
+ type func ## _andc2_T_ ## type (type a, type b, type c) { return ANDC2(func(a,b),c); } \
+ type func ## _eqv_T_ ## type (type a, type b, type c) { return EQV(func(a,b),c); } \
+ type func ## _nand_T_ ## type (type a, type b, type c) { return NAND(func(a,b),c); } \
+ type func ## _nor_T_ ## type (type a, type b, type c) { return NOR(func(a,b),c); } \
+ type func ## _or_T_ ## type (type a, type b, type c) { return OR(func(a,b),c); } \
+ type func ## _orc1_T_ ## type (type a, type b, type c) { return ORC1(func(a,b),c); } \
+ type func ## _orc2_T_ ## type (type a, type b, type c) { return ORC2(func(a,b),c); } \
+ type func ## _xor_T_ ## type (type a, type b, type c) { return XOR(func(a,b),c); } \
+ type func ## _rev_and_T_ ## type (type a, type b, type c) { return AND(c,func(a,b)); } \
+ type func ## _rev_andc1_T_ ## type (type a, type b, type c) { return ANDC1(c,func(a,b)); } \
+ type func ## _rev_andc2_T_ ## type (type a, type b, type c) { return ANDC2(c,func(a,b)); } \
+ type func ## _rev_eqv_T_ ## type (type a, type b, type c) { return EQV(c,func(a,b)); } \
+ type func ## _rev_nand_T_ ## type (type a, type b, type c) { return NAND(c,func(a,b)); } \
+ type func ## _rev_nor_T_ ## type (type a, type b, type c) { return NOR(c,func(a,b)); } \
+ type func ## _rev_or_T_ ## type (type a, type b, type c) { return OR(c,func(a,b)); } \
+ type func ## _rev_orc1_T_ ## type (type a, type b, type c) { return ORC1(c,func(a,b)); } \
+ type func ## _rev_orc2_T_ ## type (type a, type b, type c) { return ORC2(c,func(a,b)); } \
+ type func ## _rev_xor_T_ ## type (type a, type b, type c) { return XOR(c,func(a,b)); }
+#define TEST(type) \
+ TEST1(type,AND) \
+ TEST1(type,ANDC1) \
+ TEST1(type,ANDC2) \
+ TEST1(type,EQV) \
+ TEST1(type,NAND) \
+ TEST1(type,NOR) \
+ TEST1(type,OR) \
+ TEST1(type,ORC1) \
+ TEST1(type,ORC2) \
+ TEST1(type,XOR)
+
+typedef vector bool char vboolchar_t;
+typedef vector unsigned int vuint_t;
+
+TEST(uint8_t);
+TEST(int8_t);
+TEST(uint16_t);
+TEST(int16_t);
+TEST(uint32_t);
+TEST(int32_t);
+TEST(uint64_t);
+TEST(int64_t);
+TEST(vboolchar_t);
+TEST(vuint_t);
+
+/* { dg-final { scan-assembler-times "fuse_and_and/0" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_and_and/2" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_andc_and/0" 48 } } */
+/* { dg-final { scan-assembler-times "fuse_andc_and/1" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_andc_and/2" 26 } } */
+/* { dg-final { scan-assembler-times "fuse_andc_and/3" 6 } } */
+/* { dg-final { scan-assembler-times "fuse_andc_or/0" 32 } } */
+/* { dg-final { scan-assembler-times "fuse_andc_or/1" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_andc_or/2" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_andc_orc/0" 48 } } */
+/* { dg-final { scan-assembler-times "fuse_andc_orc/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_andc_orc/2" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_andc_xor/0" 32 } } */
+/* { dg-final { scan-assembler-times "fuse_andc_xor/1" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_andc_xor/2" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_and_eqv/0" 24 } } */
+/* { dg-final { scan-assembler-times "fuse_and_eqv/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_and_or/0" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_and_or/1" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_and_orc/0" 24 } } */
+/* { dg-final { scan-assembler-times "fuse_and_orc/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_and_xor/0" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_and_xor/1" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_eqv_and/0" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_eqv_and/1" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_eqv_andc/0" 24 } } */
+/* { dg-final { scan-assembler-times "fuse_eqv_andc/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_eqv_or/0" 24 } } */
+/* { dg-final { scan-assembler-times "fuse_eqv_or/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_nand_and/0" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_nand_and/1" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_nand_andc/0" 24 } } */
+/* { dg-final { scan-assembler-times "fuse_nand_andc/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_nand_or/0" 72 } } */
+/* { dg-final { scan-assembler-times "fuse_nand_or/1" 14 } } */
+/* { dg-final { scan-assembler-times "fuse_nand_or/2" 2 } } */
+/* { dg-final { scan-assembler-times "fuse_nand_or/3" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_nand_orc/0" 24 } } */
+/* { dg-final { scan-assembler-times "fuse_nand_orc/3" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_nor_and/0" 48 } } */
+/* { dg-final { scan-assembler-times "fuse_nor_and/1" 28 } } */
+/* { dg-final { scan-assembler-times "fuse_nor_and/2" 4 } } */
+/* { dg-final { scan-assembler-times "fuse_nor_and/3" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_nor_andc/0" 24 } } */
+/* { dg-final { scan-assembler-times "fuse_nor_andc/3" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_nor_or/0" 24 } } */
+/* { dg-final { scan-assembler-times "fuse_nor_or/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_nor_orc/0" 24 } } */
+/* { dg-final { scan-assembler-times "fuse_nor_orc/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_or_and/0" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_or_and/1" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_or_andc/0" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_or_andc/1" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_orc_and/0" 32 } } */
+/* { dg-final { scan-assembler-times "fuse_orc_and/1" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_orc_and/2" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_orc_andc/0" 48 } } */
+/* { dg-final { scan-assembler-times "fuse_orc_andc/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_orc_andc/2" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_orc_or/0" 72 } } */
+/* { dg-final { scan-assembler-times "fuse_orc_or/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_orc_or/2" 10 } } */
+/* { dg-final { scan-assembler-times "fuse_orc_or/3" 6 } } */
+/* { dg-final { scan-assembler-times "fuse_orc_xor/0" 48 } } */
+/* { dg-final { scan-assembler-times "fuse_orc_xor/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_orc_xor/2" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_or_eqv/0" 24 } } */
+/* { dg-final { scan-assembler-times "fuse_or_eqv/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_or_or/0" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_or_or/2" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_or_xor/0" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_or_xor/1" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_vandc_vand/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vandc_vand/2" 10 } } */
+/* { dg-final { scan-assembler-times "fuse_vandc_vand/3" 6 } } */
+/* { dg-final { scan-assembler-times "fuse_vandc_vor/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vandc_vor/2" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vandc_vorc/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vandc_vorc/2" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vandc_vxor/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vandc_vxor/2" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vand_vand/2" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vand_veqv/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vand_vor/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vand_vorc/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vand_vxor/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_veqv_vand/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_veqv_vandc/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_veqv_vor/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vnand_vand/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vnand_vandc/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vnand_vor/1" 14 } } */
+/* { dg-final { scan-assembler-times "fuse_vnand_vor/2" 2 } } */
+/* { dg-final { scan-assembler-times "fuse_vnand_vor/3" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vnand_vorc/3" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vnor_vand/1" 14 } } */
+/* { dg-final { scan-assembler-times "fuse_vnor_vand/2" 2 } } */
+/* { dg-final { scan-assembler-times "fuse_vnor_vand/3" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vnor_vandc/3" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vnor_vor/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vnor_vorc/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vorc_vand/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vorc_vand/2" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vorc_vandc/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vorc_vandc/2" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vorc_vor/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vorc_vor/2" 10 } } */
+/* { dg-final { scan-assembler-times "fuse_vorc_vor/3" 6 } } */
+/* { dg-final { scan-assembler-times "fuse_vorc_vxor/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vorc_vxor/2" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vor_vand/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vor_vandc/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vor_veqv/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vor_vor/2" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vor_vxor/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vxor_vand/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vxor_vandc/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vxor_veqv/3" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vxor_vnand/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vxor_vor/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vxor_vorc/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vxor_vxor/2" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_xor_and/0" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_xor_and/1" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_xor_andc/0" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_xor_andc/1" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_xor_eqv/0" 24 } } */
+/* { dg-final { scan-assembler-times "fuse_xor_eqv/3" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_xor_nand/0" 24 } } */
+/* { dg-final { scan-assembler-times "fuse_xor_nand/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_xor_or/0" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_xor_or/1" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_xor_orc/0" 24 } } */
+/* { dg-final { scan-assembler-times "fuse_xor_orc/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_xor_xor/0" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_xor_xor/2" 16 } } */
diff --git a/gcc/testsuite/gcc.target/powerpc/fusion-p10-ldcmpi.c b/gcc/testsuite/gcc.target/powerpc/fusion-p10-ldcmpi.c
new file mode 100644
index 00000000000..3f33f49362e
--- /dev/null
+++ b/gcc/testsuite/gcc.target/powerpc/fusion-p10-ldcmpi.c
@@ -0,0 +1,66 @@
+/* { dg-do compile { target { powerpc*-*-* } } } */
+/* { dg-skip-if "" { powerpc*-*-darwin* } } */
+/* { dg-options "-mdejagnu-cpu=power10 -O3 -dp" } */
+
+#include <stdint.h>
+
+#define TEST(type) \
+ struct t ## type { type x[128],a,b,c; }; \
+ struct s ## type { struct t ## type *p; int d,e,f; uint64_t g,h,i; }; \
+int \
+t ## type (struct s ## type *p) \
+{ \
+ struct t ## type *tp = p->p; \
+ if(!tp || tp->a > ((type)0)) { return p->d; } \
+ if(!tp || tp->b > ((type)1)) { return p->e; } \
+ if(!tp || ( ((type)(-1) < 0) && tp->c < ((type)-1))) { return p->f; } \
+ return 0; \
+} \
+type \
+t ## type ## _ret (struct s ## type *p) \
+{ \
+ struct t ## type *tp = p->p; \
+ if(!tp || tp->a > ((type)0)) { return tp->a; } \
+ if(!tp || tp->b > ((type)1)) { return tp->b; } \
+ if(!tp || ( ((type)(-1) < 0) && tp->c < ((type)-1))) { return tp->c; } \
+ return 0; \
+}\
+int \
+t ## type ## _x (struct s ## type *p) \
+{ \
+ struct t ## type *tp = p->p; \
+ if(!tp || tp->x[p->g] > ((type)0)) { return p->d; } \
+ if(!tp || tp->x[p->h] > ((type)1)) { return p->e; } \
+ if(!tp || ( ((type)(-1) < 0) && tp->x[p->i] < ((type)-1))) { return p->f; } \
+ return 0; \
+} \
+type \
+t ## type ## _x_ret (struct s ## type *p) \
+{ \
+ struct t ## type *tp = p->p; \
+ if(!tp || tp->x[p->g] > ((type)0)) { return tp->x[p->g]; } \
+ if(!tp || tp->x[p->h] > ((type)1)) { return tp->x[p->h]; } \
+ if(!tp || ( ((type)(-1) < 0) && tp->x[p->i] < ((type)-1))) { return tp->x[p->i]; } \
+ return 0; \
+}
+
+TEST(uint64_t)
+TEST(int64_t)
+TEST(uint32_t)
+TEST(int32_t)
+TEST(uint16_t)
+TEST(int16_t)
+TEST(uint8_t)
+TEST(int8_t)
+
+/* { dg-final { scan-assembler-times "lbz_cmpldi_cr0_QI_clobber_CCUNS_zero" 2 } } */
+/* { dg-final { scan-assembler-times "ld_cmpldi_cr0_DI_clobber_CCUNS_none" 2 } } */
+/* { dg-final { scan-assembler-times "ld_cmpldi_cr0_DI_DI_CCUNS_none" 2 } } */
+/* { dg-final { scan-assembler-times "lhz_cmpldi_cr0_HI_clobber_CCUNS_zero" 2 } } */
+/* { dg-final { scan-assembler-times "lwz_cmpldi_cr0_SI_clobber_CCUNS_none" 2 } } */
+/* { dg-final { scan-assembler-times "lwz_cmpldi_cr0_SI_EXTSI_CCUNS_zero" 2 } } */
+/* { dg-final { scan-assembler-times "lwa_cmpdi_cr0_SI_EXTSI_CC_sign" 6 } } */
+/* { dg-final { scan-assembler-times "ld_cmpdi_cr0_DI_clobber_CC_none" 8 } } */
+/* { dg-final { scan-assembler-times "lha_cmpdi_cr0_HI_clobber_CC_sign" 8 } } */
+/* { dg-final { scan-assembler-times "lwa_cmpdi_cr0_SI_clobber_CC_none" 8 } } */
+/* { dg-final { scan-assembler-times "ld_cmpdi_cr0_DI_DI_CC_none" 24 } } */
^ permalink raw reply [flat|nested] 11+ messages in thread
* [gcc(refs/users/acsawdey/heads/fusion-combine)] Test cases for p10 fusion patterns
@ 2021-01-26 22:48 Aaron Sawdey
0 siblings, 0 replies; 11+ messages in thread
From: Aaron Sawdey @ 2021-01-26 22:48 UTC (permalink / raw)
To: gcc-cvs
https://gcc.gnu.org/g:b9f31865bdb12e75eefd724e8efa6fa7b05b6266
commit b9f31865bdb12e75eefd724e8efa6fa7b05b6266
Author: Aaron Sawdey <acsawdey@linux.ibm.com>
Date: Fri Dec 11 13:47:12 2020 -0600
Test cases for p10 fusion patterns
This adds some test cases to make sure that the combine patterns for p10
fusion are working.
gcc/testsuite/ChangeLog:
* gcc.target/powerpc/fusion-p10-ldcmpi.c: New file.
* gcc.target/powerpc/fusion-p10-2logical.c: New file.
Diff:
---
.../gcc.target/powerpc/fusion-p10-2logical.c | 201 +++++++++++++++++++++
.../gcc.target/powerpc/fusion-p10-ldcmpi.c | 66 +++++++
2 files changed, 267 insertions(+)
diff --git a/gcc/testsuite/gcc.target/powerpc/fusion-p10-2logical.c b/gcc/testsuite/gcc.target/powerpc/fusion-p10-2logical.c
new file mode 100644
index 00000000000..cfe8f6c679a
--- /dev/null
+++ b/gcc/testsuite/gcc.target/powerpc/fusion-p10-2logical.c
@@ -0,0 +1,201 @@
+/* { dg-do compile { target { powerpc*-*-* } } } */
+/* { dg-skip-if "" { powerpc*-*-darwin* } } */
+/* { dg-options "-mdejagnu-cpu=power10 -O3 -dp" } */
+
+#include <altivec.h>
+#include <stdint.h>
+
+/* and/andc/eqv/nand/nor/or/orc/xor */
+#define AND(a,b) ((a)&(b))
+#define ANDC1(a,b) ((a)&((~b)))
+#define ANDC2(a,b) ((~(a))&(b))
+#define EQV(a,b) (~((a)^(b)))
+#define NAND(a,b) (~((a)&(b)))
+#define NOR(a,b) (~((a)|(b)))
+#define OR(a,b) ((a)|(b))
+#define ORC1(a,b) ((a)|((~b)))
+#define ORC2(a,b) ((~(a))|(b))
+#define XOR(a,b) ((a)^(b))
+#define TEST1(type, func) \
+ type func ## _and_T_ ## type (type a, type b, type c) { return AND(func(a,b),c); } \
+ type func ## _andc1_T_ ## type (type a, type b, type c) { return ANDC1(func(a,b),c); } \
+ type func ## _andc2_T_ ## type (type a, type b, type c) { return ANDC2(func(a,b),c); } \
+ type func ## _eqv_T_ ## type (type a, type b, type c) { return EQV(func(a,b),c); } \
+ type func ## _nand_T_ ## type (type a, type b, type c) { return NAND(func(a,b),c); } \
+ type func ## _nor_T_ ## type (type a, type b, type c) { return NOR(func(a,b),c); } \
+ type func ## _or_T_ ## type (type a, type b, type c) { return OR(func(a,b),c); } \
+ type func ## _orc1_T_ ## type (type a, type b, type c) { return ORC1(func(a,b),c); } \
+ type func ## _orc2_T_ ## type (type a, type b, type c) { return ORC2(func(a,b),c); } \
+ type func ## _xor_T_ ## type (type a, type b, type c) { return XOR(func(a,b),c); } \
+ type func ## _rev_and_T_ ## type (type a, type b, type c) { return AND(c,func(a,b)); } \
+ type func ## _rev_andc1_T_ ## type (type a, type b, type c) { return ANDC1(c,func(a,b)); } \
+ type func ## _rev_andc2_T_ ## type (type a, type b, type c) { return ANDC2(c,func(a,b)); } \
+ type func ## _rev_eqv_T_ ## type (type a, type b, type c) { return EQV(c,func(a,b)); } \
+ type func ## _rev_nand_T_ ## type (type a, type b, type c) { return NAND(c,func(a,b)); } \
+ type func ## _rev_nor_T_ ## type (type a, type b, type c) { return NOR(c,func(a,b)); } \
+ type func ## _rev_or_T_ ## type (type a, type b, type c) { return OR(c,func(a,b)); } \
+ type func ## _rev_orc1_T_ ## type (type a, type b, type c) { return ORC1(c,func(a,b)); } \
+ type func ## _rev_orc2_T_ ## type (type a, type b, type c) { return ORC2(c,func(a,b)); } \
+ type func ## _rev_xor_T_ ## type (type a, type b, type c) { return XOR(c,func(a,b)); }
+#define TEST(type) \
+ TEST1(type,AND) \
+ TEST1(type,ANDC1) \
+ TEST1(type,ANDC2) \
+ TEST1(type,EQV) \
+ TEST1(type,NAND) \
+ TEST1(type,NOR) \
+ TEST1(type,OR) \
+ TEST1(type,ORC1) \
+ TEST1(type,ORC2) \
+ TEST1(type,XOR)
+
+typedef vector bool char vboolchar_t;
+typedef vector unsigned int vuint_t;
+
+TEST(uint8_t);
+TEST(int8_t);
+TEST(uint16_t);
+TEST(int16_t);
+TEST(uint32_t);
+TEST(int32_t);
+TEST(uint64_t);
+TEST(int64_t);
+TEST(vboolchar_t);
+TEST(vuint_t);
+
+/* { dg-final { scan-assembler-times "fuse_and_and/0" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_and_and/2" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_andc_and/0" 48 } } */
+/* { dg-final { scan-assembler-times "fuse_andc_and/1" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_andc_and/2" 26 } } */
+/* { dg-final { scan-assembler-times "fuse_andc_and/3" 6 } } */
+/* { dg-final { scan-assembler-times "fuse_andc_or/0" 32 } } */
+/* { dg-final { scan-assembler-times "fuse_andc_or/1" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_andc_or/2" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_andc_orc/0" 48 } } */
+/* { dg-final { scan-assembler-times "fuse_andc_orc/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_andc_orc/2" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_andc_xor/0" 32 } } */
+/* { dg-final { scan-assembler-times "fuse_andc_xor/1" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_andc_xor/2" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_and_eqv/0" 24 } } */
+/* { dg-final { scan-assembler-times "fuse_and_eqv/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_and_or/0" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_and_or/1" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_and_orc/0" 24 } } */
+/* { dg-final { scan-assembler-times "fuse_and_orc/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_and_xor/0" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_and_xor/1" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_eqv_and/0" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_eqv_and/1" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_eqv_andc/0" 24 } } */
+/* { dg-final { scan-assembler-times "fuse_eqv_andc/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_eqv_or/0" 24 } } */
+/* { dg-final { scan-assembler-times "fuse_eqv_or/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_nand_and/0" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_nand_and/1" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_nand_andc/0" 24 } } */
+/* { dg-final { scan-assembler-times "fuse_nand_andc/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_nand_or/0" 72 } } */
+/* { dg-final { scan-assembler-times "fuse_nand_or/1" 14 } } */
+/* { dg-final { scan-assembler-times "fuse_nand_or/2" 2 } } */
+/* { dg-final { scan-assembler-times "fuse_nand_or/3" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_nand_orc/0" 24 } } */
+/* { dg-final { scan-assembler-times "fuse_nand_orc/3" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_nor_and/0" 48 } } */
+/* { dg-final { scan-assembler-times "fuse_nor_and/1" 28 } } */
+/* { dg-final { scan-assembler-times "fuse_nor_and/2" 4 } } */
+/* { dg-final { scan-assembler-times "fuse_nor_and/3" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_nor_andc/0" 24 } } */
+/* { dg-final { scan-assembler-times "fuse_nor_andc/3" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_nor_or/0" 24 } } */
+/* { dg-final { scan-assembler-times "fuse_nor_or/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_nor_orc/0" 24 } } */
+/* { dg-final { scan-assembler-times "fuse_nor_orc/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_or_and/0" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_or_and/1" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_or_andc/0" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_or_andc/1" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_orc_and/0" 32 } } */
+/* { dg-final { scan-assembler-times "fuse_orc_and/1" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_orc_and/2" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_orc_andc/0" 48 } } */
+/* { dg-final { scan-assembler-times "fuse_orc_andc/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_orc_andc/2" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_orc_or/0" 72 } } */
+/* { dg-final { scan-assembler-times "fuse_orc_or/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_orc_or/2" 10 } } */
+/* { dg-final { scan-assembler-times "fuse_orc_or/3" 6 } } */
+/* { dg-final { scan-assembler-times "fuse_orc_xor/0" 48 } } */
+/* { dg-final { scan-assembler-times "fuse_orc_xor/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_orc_xor/2" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_or_eqv/0" 24 } } */
+/* { dg-final { scan-assembler-times "fuse_or_eqv/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_or_or/0" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_or_or/2" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_or_xor/0" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_or_xor/1" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_vandc_vand/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vandc_vand/2" 10 } } */
+/* { dg-final { scan-assembler-times "fuse_vandc_vand/3" 6 } } */
+/* { dg-final { scan-assembler-times "fuse_vandc_vor/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vandc_vor/2" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vandc_vorc/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vandc_vorc/2" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vandc_vxor/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vandc_vxor/2" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vand_vand/2" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vand_veqv/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vand_vor/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vand_vorc/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vand_vxor/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_veqv_vand/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_veqv_vandc/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_veqv_vor/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vnand_vand/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vnand_vandc/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vnand_vor/1" 14 } } */
+/* { dg-final { scan-assembler-times "fuse_vnand_vor/2" 2 } } */
+/* { dg-final { scan-assembler-times "fuse_vnand_vor/3" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vnand_vorc/3" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vnor_vand/1" 14 } } */
+/* { dg-final { scan-assembler-times "fuse_vnor_vand/2" 2 } } */
+/* { dg-final { scan-assembler-times "fuse_vnor_vand/3" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vnor_vandc/3" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vnor_vor/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vnor_vorc/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vorc_vand/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vorc_vand/2" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vorc_vandc/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vorc_vandc/2" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vorc_vor/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vorc_vor/2" 10 } } */
+/* { dg-final { scan-assembler-times "fuse_vorc_vor/3" 6 } } */
+/* { dg-final { scan-assembler-times "fuse_vorc_vxor/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vorc_vxor/2" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vor_vand/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vor_vandc/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vor_veqv/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vor_vor/2" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vor_vxor/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vxor_vand/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vxor_vandc/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vxor_veqv/3" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vxor_vnand/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vxor_vor/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vxor_vorc/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vxor_vxor/2" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_xor_and/0" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_xor_and/1" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_xor_andc/0" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_xor_andc/1" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_xor_eqv/0" 24 } } */
+/* { dg-final { scan-assembler-times "fuse_xor_eqv/3" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_xor_nand/0" 24 } } */
+/* { dg-final { scan-assembler-times "fuse_xor_nand/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_xor_or/0" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_xor_or/1" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_xor_orc/0" 24 } } */
+/* { dg-final { scan-assembler-times "fuse_xor_orc/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_xor_xor/0" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_xor_xor/2" 16 } } */
diff --git a/gcc/testsuite/gcc.target/powerpc/fusion-p10-ldcmpi.c b/gcc/testsuite/gcc.target/powerpc/fusion-p10-ldcmpi.c
new file mode 100644
index 00000000000..3f33f49362e
--- /dev/null
+++ b/gcc/testsuite/gcc.target/powerpc/fusion-p10-ldcmpi.c
@@ -0,0 +1,66 @@
+/* { dg-do compile { target { powerpc*-*-* } } } */
+/* { dg-skip-if "" { powerpc*-*-darwin* } } */
+/* { dg-options "-mdejagnu-cpu=power10 -O3 -dp" } */
+
+#include <stdint.h>
+
+#define TEST(type) \
+ struct t ## type { type x[128],a,b,c; }; \
+ struct s ## type { struct t ## type *p; int d,e,f; uint64_t g,h,i; }; \
+int \
+t ## type (struct s ## type *p) \
+{ \
+ struct t ## type *tp = p->p; \
+ if(!tp || tp->a > ((type)0)) { return p->d; } \
+ if(!tp || tp->b > ((type)1)) { return p->e; } \
+ if(!tp || ( ((type)(-1) < 0) && tp->c < ((type)-1))) { return p->f; } \
+ return 0; \
+} \
+type \
+t ## type ## _ret (struct s ## type *p) \
+{ \
+ struct t ## type *tp = p->p; \
+ if(!tp || tp->a > ((type)0)) { return tp->a; } \
+ if(!tp || tp->b > ((type)1)) { return tp->b; } \
+ if(!tp || ( ((type)(-1) < 0) && tp->c < ((type)-1))) { return tp->c; } \
+ return 0; \
+}\
+int \
+t ## type ## _x (struct s ## type *p) \
+{ \
+ struct t ## type *tp = p->p; \
+ if(!tp || tp->x[p->g] > ((type)0)) { return p->d; } \
+ if(!tp || tp->x[p->h] > ((type)1)) { return p->e; } \
+ if(!tp || ( ((type)(-1) < 0) && tp->x[p->i] < ((type)-1))) { return p->f; } \
+ return 0; \
+} \
+type \
+t ## type ## _x_ret (struct s ## type *p) \
+{ \
+ struct t ## type *tp = p->p; \
+ if(!tp || tp->x[p->g] > ((type)0)) { return tp->x[p->g]; } \
+ if(!tp || tp->x[p->h] > ((type)1)) { return tp->x[p->h]; } \
+ if(!tp || ( ((type)(-1) < 0) && tp->x[p->i] < ((type)-1))) { return tp->x[p->i]; } \
+ return 0; \
+}
+
+TEST(uint64_t)
+TEST(int64_t)
+TEST(uint32_t)
+TEST(int32_t)
+TEST(uint16_t)
+TEST(int16_t)
+TEST(uint8_t)
+TEST(int8_t)
+
+/* { dg-final { scan-assembler-times "lbz_cmpldi_cr0_QI_clobber_CCUNS_zero" 2 } } */
+/* { dg-final { scan-assembler-times "ld_cmpldi_cr0_DI_clobber_CCUNS_none" 2 } } */
+/* { dg-final { scan-assembler-times "ld_cmpldi_cr0_DI_DI_CCUNS_none" 2 } } */
+/* { dg-final { scan-assembler-times "lhz_cmpldi_cr0_HI_clobber_CCUNS_zero" 2 } } */
+/* { dg-final { scan-assembler-times "lwz_cmpldi_cr0_SI_clobber_CCUNS_none" 2 } } */
+/* { dg-final { scan-assembler-times "lwz_cmpldi_cr0_SI_EXTSI_CCUNS_zero" 2 } } */
+/* { dg-final { scan-assembler-times "lwa_cmpdi_cr0_SI_EXTSI_CC_sign" 6 } } */
+/* { dg-final { scan-assembler-times "ld_cmpdi_cr0_DI_clobber_CC_none" 8 } } */
+/* { dg-final { scan-assembler-times "lha_cmpdi_cr0_HI_clobber_CC_sign" 8 } } */
+/* { dg-final { scan-assembler-times "lwa_cmpdi_cr0_SI_clobber_CC_none" 8 } } */
+/* { dg-final { scan-assembler-times "ld_cmpdi_cr0_DI_DI_CC_none" 24 } } */
^ permalink raw reply [flat|nested] 11+ messages in thread
* [gcc(refs/users/acsawdey/heads/fusion-combine)] Test cases for p10 fusion patterns
@ 2021-01-26 22:42 Aaron Sawdey
0 siblings, 0 replies; 11+ messages in thread
From: Aaron Sawdey @ 2021-01-26 22:42 UTC (permalink / raw)
To: gcc-cvs
https://gcc.gnu.org/g:f393b2b7446c6536d72514c369dfe5b404ff25c5
commit f393b2b7446c6536d72514c369dfe5b404ff25c5
Author: Aaron Sawdey <acsawdey@linux.ibm.com>
Date: Fri Dec 11 13:47:12 2020 -0600
Test cases for p10 fusion patterns
This adds some test cases to make sure that the combine patterns for p10
fusion are working.
gcc/testsuite/ChangeLog:
* gcc.target/powerpc/fusion-p10-ldcmpi.c: New file.
* gcc.target/powerpc/fusion-p10-2logical.c: New file.
Diff:
---
.../gcc.target/powerpc/fusion-p10-2logical.c | 201 +++++++++++++++++++++
.../gcc.target/powerpc/fusion-p10-ldcmpi.c | 66 +++++++
2 files changed, 267 insertions(+)
diff --git a/gcc/testsuite/gcc.target/powerpc/fusion-p10-2logical.c b/gcc/testsuite/gcc.target/powerpc/fusion-p10-2logical.c
new file mode 100644
index 00000000000..cfe8f6c679a
--- /dev/null
+++ b/gcc/testsuite/gcc.target/powerpc/fusion-p10-2logical.c
@@ -0,0 +1,201 @@
+/* { dg-do compile { target { powerpc*-*-* } } } */
+/* { dg-skip-if "" { powerpc*-*-darwin* } } */
+/* { dg-options "-mdejagnu-cpu=power10 -O3 -dp" } */
+
+#include <altivec.h>
+#include <stdint.h>
+
+/* and/andc/eqv/nand/nor/or/orc/xor */
+#define AND(a,b) ((a)&(b))
+#define ANDC1(a,b) ((a)&((~b)))
+#define ANDC2(a,b) ((~(a))&(b))
+#define EQV(a,b) (~((a)^(b)))
+#define NAND(a,b) (~((a)&(b)))
+#define NOR(a,b) (~((a)|(b)))
+#define OR(a,b) ((a)|(b))
+#define ORC1(a,b) ((a)|((~b)))
+#define ORC2(a,b) ((~(a))|(b))
+#define XOR(a,b) ((a)^(b))
+#define TEST1(type, func) \
+ type func ## _and_T_ ## type (type a, type b, type c) { return AND(func(a,b),c); } \
+ type func ## _andc1_T_ ## type (type a, type b, type c) { return ANDC1(func(a,b),c); } \
+ type func ## _andc2_T_ ## type (type a, type b, type c) { return ANDC2(func(a,b),c); } \
+ type func ## _eqv_T_ ## type (type a, type b, type c) { return EQV(func(a,b),c); } \
+ type func ## _nand_T_ ## type (type a, type b, type c) { return NAND(func(a,b),c); } \
+ type func ## _nor_T_ ## type (type a, type b, type c) { return NOR(func(a,b),c); } \
+ type func ## _or_T_ ## type (type a, type b, type c) { return OR(func(a,b),c); } \
+ type func ## _orc1_T_ ## type (type a, type b, type c) { return ORC1(func(a,b),c); } \
+ type func ## _orc2_T_ ## type (type a, type b, type c) { return ORC2(func(a,b),c); } \
+ type func ## _xor_T_ ## type (type a, type b, type c) { return XOR(func(a,b),c); } \
+ type func ## _rev_and_T_ ## type (type a, type b, type c) { return AND(c,func(a,b)); } \
+ type func ## _rev_andc1_T_ ## type (type a, type b, type c) { return ANDC1(c,func(a,b)); } \
+ type func ## _rev_andc2_T_ ## type (type a, type b, type c) { return ANDC2(c,func(a,b)); } \
+ type func ## _rev_eqv_T_ ## type (type a, type b, type c) { return EQV(c,func(a,b)); } \
+ type func ## _rev_nand_T_ ## type (type a, type b, type c) { return NAND(c,func(a,b)); } \
+ type func ## _rev_nor_T_ ## type (type a, type b, type c) { return NOR(c,func(a,b)); } \
+ type func ## _rev_or_T_ ## type (type a, type b, type c) { return OR(c,func(a,b)); } \
+ type func ## _rev_orc1_T_ ## type (type a, type b, type c) { return ORC1(c,func(a,b)); } \
+ type func ## _rev_orc2_T_ ## type (type a, type b, type c) { return ORC2(c,func(a,b)); } \
+ type func ## _rev_xor_T_ ## type (type a, type b, type c) { return XOR(c,func(a,b)); }
+#define TEST(type) \
+ TEST1(type,AND) \
+ TEST1(type,ANDC1) \
+ TEST1(type,ANDC2) \
+ TEST1(type,EQV) \
+ TEST1(type,NAND) \
+ TEST1(type,NOR) \
+ TEST1(type,OR) \
+ TEST1(type,ORC1) \
+ TEST1(type,ORC2) \
+ TEST1(type,XOR)
+
+typedef vector bool char vboolchar_t;
+typedef vector unsigned int vuint_t;
+
+TEST(uint8_t);
+TEST(int8_t);
+TEST(uint16_t);
+TEST(int16_t);
+TEST(uint32_t);
+TEST(int32_t);
+TEST(uint64_t);
+TEST(int64_t);
+TEST(vboolchar_t);
+TEST(vuint_t);
+
+/* { dg-final { scan-assembler-times "fuse_and_and/0" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_and_and/2" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_andc_and/0" 48 } } */
+/* { dg-final { scan-assembler-times "fuse_andc_and/1" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_andc_and/2" 26 } } */
+/* { dg-final { scan-assembler-times "fuse_andc_and/3" 6 } } */
+/* { dg-final { scan-assembler-times "fuse_andc_or/0" 32 } } */
+/* { dg-final { scan-assembler-times "fuse_andc_or/1" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_andc_or/2" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_andc_orc/0" 48 } } */
+/* { dg-final { scan-assembler-times "fuse_andc_orc/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_andc_orc/2" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_andc_xor/0" 32 } } */
+/* { dg-final { scan-assembler-times "fuse_andc_xor/1" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_andc_xor/2" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_and_eqv/0" 24 } } */
+/* { dg-final { scan-assembler-times "fuse_and_eqv/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_and_or/0" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_and_or/1" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_and_orc/0" 24 } } */
+/* { dg-final { scan-assembler-times "fuse_and_orc/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_and_xor/0" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_and_xor/1" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_eqv_and/0" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_eqv_and/1" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_eqv_andc/0" 24 } } */
+/* { dg-final { scan-assembler-times "fuse_eqv_andc/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_eqv_or/0" 24 } } */
+/* { dg-final { scan-assembler-times "fuse_eqv_or/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_nand_and/0" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_nand_and/1" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_nand_andc/0" 24 } } */
+/* { dg-final { scan-assembler-times "fuse_nand_andc/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_nand_or/0" 72 } } */
+/* { dg-final { scan-assembler-times "fuse_nand_or/1" 14 } } */
+/* { dg-final { scan-assembler-times "fuse_nand_or/2" 2 } } */
+/* { dg-final { scan-assembler-times "fuse_nand_or/3" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_nand_orc/0" 24 } } */
+/* { dg-final { scan-assembler-times "fuse_nand_orc/3" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_nor_and/0" 48 } } */
+/* { dg-final { scan-assembler-times "fuse_nor_and/1" 28 } } */
+/* { dg-final { scan-assembler-times "fuse_nor_and/2" 4 } } */
+/* { dg-final { scan-assembler-times "fuse_nor_and/3" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_nor_andc/0" 24 } } */
+/* { dg-final { scan-assembler-times "fuse_nor_andc/3" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_nor_or/0" 24 } } */
+/* { dg-final { scan-assembler-times "fuse_nor_or/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_nor_orc/0" 24 } } */
+/* { dg-final { scan-assembler-times "fuse_nor_orc/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_or_and/0" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_or_and/1" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_or_andc/0" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_or_andc/1" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_orc_and/0" 32 } } */
+/* { dg-final { scan-assembler-times "fuse_orc_and/1" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_orc_and/2" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_orc_andc/0" 48 } } */
+/* { dg-final { scan-assembler-times "fuse_orc_andc/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_orc_andc/2" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_orc_or/0" 72 } } */
+/* { dg-final { scan-assembler-times "fuse_orc_or/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_orc_or/2" 10 } } */
+/* { dg-final { scan-assembler-times "fuse_orc_or/3" 6 } } */
+/* { dg-final { scan-assembler-times "fuse_orc_xor/0" 48 } } */
+/* { dg-final { scan-assembler-times "fuse_orc_xor/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_orc_xor/2" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_or_eqv/0" 24 } } */
+/* { dg-final { scan-assembler-times "fuse_or_eqv/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_or_or/0" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_or_or/2" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_or_xor/0" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_or_xor/1" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_vandc_vand/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vandc_vand/2" 10 } } */
+/* { dg-final { scan-assembler-times "fuse_vandc_vand/3" 6 } } */
+/* { dg-final { scan-assembler-times "fuse_vandc_vor/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vandc_vor/2" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vandc_vorc/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vandc_vorc/2" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vandc_vxor/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vandc_vxor/2" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vand_vand/2" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vand_veqv/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vand_vor/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vand_vorc/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vand_vxor/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_veqv_vand/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_veqv_vandc/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_veqv_vor/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vnand_vand/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vnand_vandc/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vnand_vor/1" 14 } } */
+/* { dg-final { scan-assembler-times "fuse_vnand_vor/2" 2 } } */
+/* { dg-final { scan-assembler-times "fuse_vnand_vor/3" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vnand_vorc/3" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vnor_vand/1" 14 } } */
+/* { dg-final { scan-assembler-times "fuse_vnor_vand/2" 2 } } */
+/* { dg-final { scan-assembler-times "fuse_vnor_vand/3" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vnor_vandc/3" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vnor_vor/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vnor_vorc/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vorc_vand/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vorc_vand/2" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vorc_vandc/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vorc_vandc/2" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vorc_vor/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vorc_vor/2" 10 } } */
+/* { dg-final { scan-assembler-times "fuse_vorc_vor/3" 6 } } */
+/* { dg-final { scan-assembler-times "fuse_vorc_vxor/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vorc_vxor/2" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vor_vand/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vor_vandc/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vor_veqv/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vor_vor/2" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vor_vxor/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vxor_vand/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vxor_vandc/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vxor_veqv/3" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vxor_vnand/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vxor_vor/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vxor_vorc/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vxor_vxor/2" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_xor_and/0" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_xor_and/1" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_xor_andc/0" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_xor_andc/1" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_xor_eqv/0" 24 } } */
+/* { dg-final { scan-assembler-times "fuse_xor_eqv/3" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_xor_nand/0" 24 } } */
+/* { dg-final { scan-assembler-times "fuse_xor_nand/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_xor_or/0" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_xor_or/1" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_xor_orc/0" 24 } } */
+/* { dg-final { scan-assembler-times "fuse_xor_orc/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_xor_xor/0" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_xor_xor/2" 16 } } */
diff --git a/gcc/testsuite/gcc.target/powerpc/fusion-p10-ldcmpi.c b/gcc/testsuite/gcc.target/powerpc/fusion-p10-ldcmpi.c
new file mode 100644
index 00000000000..3f33f49362e
--- /dev/null
+++ b/gcc/testsuite/gcc.target/powerpc/fusion-p10-ldcmpi.c
@@ -0,0 +1,66 @@
+/* { dg-do compile { target { powerpc*-*-* } } } */
+/* { dg-skip-if "" { powerpc*-*-darwin* } } */
+/* { dg-options "-mdejagnu-cpu=power10 -O3 -dp" } */
+
+#include <stdint.h>
+
+#define TEST(type) \
+ struct t ## type { type x[128],a,b,c; }; \
+ struct s ## type { struct t ## type *p; int d,e,f; uint64_t g,h,i; }; \
+int \
+t ## type (struct s ## type *p) \
+{ \
+ struct t ## type *tp = p->p; \
+ if(!tp || tp->a > ((type)0)) { return p->d; } \
+ if(!tp || tp->b > ((type)1)) { return p->e; } \
+ if(!tp || ( ((type)(-1) < 0) && tp->c < ((type)-1))) { return p->f; } \
+ return 0; \
+} \
+type \
+t ## type ## _ret (struct s ## type *p) \
+{ \
+ struct t ## type *tp = p->p; \
+ if(!tp || tp->a > ((type)0)) { return tp->a; } \
+ if(!tp || tp->b > ((type)1)) { return tp->b; } \
+ if(!tp || ( ((type)(-1) < 0) && tp->c < ((type)-1))) { return tp->c; } \
+ return 0; \
+}\
+int \
+t ## type ## _x (struct s ## type *p) \
+{ \
+ struct t ## type *tp = p->p; \
+ if(!tp || tp->x[p->g] > ((type)0)) { return p->d; } \
+ if(!tp || tp->x[p->h] > ((type)1)) { return p->e; } \
+ if(!tp || ( ((type)(-1) < 0) && tp->x[p->i] < ((type)-1))) { return p->f; } \
+ return 0; \
+} \
+type \
+t ## type ## _x_ret (struct s ## type *p) \
+{ \
+ struct t ## type *tp = p->p; \
+ if(!tp || tp->x[p->g] > ((type)0)) { return tp->x[p->g]; } \
+ if(!tp || tp->x[p->h] > ((type)1)) { return tp->x[p->h]; } \
+ if(!tp || ( ((type)(-1) < 0) && tp->x[p->i] < ((type)-1))) { return tp->x[p->i]; } \
+ return 0; \
+}
+
+TEST(uint64_t)
+TEST(int64_t)
+TEST(uint32_t)
+TEST(int32_t)
+TEST(uint16_t)
+TEST(int16_t)
+TEST(uint8_t)
+TEST(int8_t)
+
+/* { dg-final { scan-assembler-times "lbz_cmpldi_cr0_QI_clobber_CCUNS_zero" 2 } } */
+/* { dg-final { scan-assembler-times "ld_cmpldi_cr0_DI_clobber_CCUNS_none" 2 } } */
+/* { dg-final { scan-assembler-times "ld_cmpldi_cr0_DI_DI_CCUNS_none" 2 } } */
+/* { dg-final { scan-assembler-times "lhz_cmpldi_cr0_HI_clobber_CCUNS_zero" 2 } } */
+/* { dg-final { scan-assembler-times "lwz_cmpldi_cr0_SI_clobber_CCUNS_none" 2 } } */
+/* { dg-final { scan-assembler-times "lwz_cmpldi_cr0_SI_EXTSI_CCUNS_zero" 2 } } */
+/* { dg-final { scan-assembler-times "lwa_cmpdi_cr0_SI_EXTSI_CC_sign" 6 } } */
+/* { dg-final { scan-assembler-times "ld_cmpdi_cr0_DI_clobber_CC_none" 8 } } */
+/* { dg-final { scan-assembler-times "lha_cmpdi_cr0_HI_clobber_CC_sign" 8 } } */
+/* { dg-final { scan-assembler-times "lwa_cmpdi_cr0_SI_clobber_CC_none" 8 } } */
+/* { dg-final { scan-assembler-times "ld_cmpdi_cr0_DI_DI_CC_none" 24 } } */
^ permalink raw reply [flat|nested] 11+ messages in thread
* [gcc(refs/users/acsawdey/heads/fusion-combine)] Test cases for p10 fusion patterns
@ 2021-01-19 18:30 Aaron Sawdey
0 siblings, 0 replies; 11+ messages in thread
From: Aaron Sawdey @ 2021-01-19 18:30 UTC (permalink / raw)
To: gcc-cvs
https://gcc.gnu.org/g:c88c6a009670cfeefb7ba70806c07780a7803320
commit c88c6a009670cfeefb7ba70806c07780a7803320
Author: Aaron Sawdey <acsawdey@linux.ibm.com>
Date: Fri Dec 11 13:47:12 2020 -0600
Test cases for p10 fusion patterns
This adds some test cases to make sure that the combine patterns for p10
fusion are working.
gcc/testsuite/ChangeLog:
* gcc.target/powerpc/fusion-p10-ldcmpi.c: New file.
* gcc.target/powerpc/fusion-p10-2logical.c: New file.
Diff:
---
.../gcc.target/powerpc/fusion-p10-2logical.c | 201 +++++++++++++++++++++
.../gcc.target/powerpc/fusion-p10-ldcmpi.c | 66 +++++++
2 files changed, 267 insertions(+)
diff --git a/gcc/testsuite/gcc.target/powerpc/fusion-p10-2logical.c b/gcc/testsuite/gcc.target/powerpc/fusion-p10-2logical.c
new file mode 100644
index 00000000000..cfe8f6c679a
--- /dev/null
+++ b/gcc/testsuite/gcc.target/powerpc/fusion-p10-2logical.c
@@ -0,0 +1,201 @@
+/* { dg-do compile { target { powerpc*-*-* } } } */
+/* { dg-skip-if "" { powerpc*-*-darwin* } } */
+/* { dg-options "-mdejagnu-cpu=power10 -O3 -dp" } */
+
+#include <altivec.h>
+#include <stdint.h>
+
+/* and/andc/eqv/nand/nor/or/orc/xor */
+#define AND(a,b) ((a)&(b))
+#define ANDC1(a,b) ((a)&((~b)))
+#define ANDC2(a,b) ((~(a))&(b))
+#define EQV(a,b) (~((a)^(b)))
+#define NAND(a,b) (~((a)&(b)))
+#define NOR(a,b) (~((a)|(b)))
+#define OR(a,b) ((a)|(b))
+#define ORC1(a,b) ((a)|((~b)))
+#define ORC2(a,b) ((~(a))|(b))
+#define XOR(a,b) ((a)^(b))
+#define TEST1(type, func) \
+ type func ## _and_T_ ## type (type a, type b, type c) { return AND(func(a,b),c); } \
+ type func ## _andc1_T_ ## type (type a, type b, type c) { return ANDC1(func(a,b),c); } \
+ type func ## _andc2_T_ ## type (type a, type b, type c) { return ANDC2(func(a,b),c); } \
+ type func ## _eqv_T_ ## type (type a, type b, type c) { return EQV(func(a,b),c); } \
+ type func ## _nand_T_ ## type (type a, type b, type c) { return NAND(func(a,b),c); } \
+ type func ## _nor_T_ ## type (type a, type b, type c) { return NOR(func(a,b),c); } \
+ type func ## _or_T_ ## type (type a, type b, type c) { return OR(func(a,b),c); } \
+ type func ## _orc1_T_ ## type (type a, type b, type c) { return ORC1(func(a,b),c); } \
+ type func ## _orc2_T_ ## type (type a, type b, type c) { return ORC2(func(a,b),c); } \
+ type func ## _xor_T_ ## type (type a, type b, type c) { return XOR(func(a,b),c); } \
+ type func ## _rev_and_T_ ## type (type a, type b, type c) { return AND(c,func(a,b)); } \
+ type func ## _rev_andc1_T_ ## type (type a, type b, type c) { return ANDC1(c,func(a,b)); } \
+ type func ## _rev_andc2_T_ ## type (type a, type b, type c) { return ANDC2(c,func(a,b)); } \
+ type func ## _rev_eqv_T_ ## type (type a, type b, type c) { return EQV(c,func(a,b)); } \
+ type func ## _rev_nand_T_ ## type (type a, type b, type c) { return NAND(c,func(a,b)); } \
+ type func ## _rev_nor_T_ ## type (type a, type b, type c) { return NOR(c,func(a,b)); } \
+ type func ## _rev_or_T_ ## type (type a, type b, type c) { return OR(c,func(a,b)); } \
+ type func ## _rev_orc1_T_ ## type (type a, type b, type c) { return ORC1(c,func(a,b)); } \
+ type func ## _rev_orc2_T_ ## type (type a, type b, type c) { return ORC2(c,func(a,b)); } \
+ type func ## _rev_xor_T_ ## type (type a, type b, type c) { return XOR(c,func(a,b)); }
+#define TEST(type) \
+ TEST1(type,AND) \
+ TEST1(type,ANDC1) \
+ TEST1(type,ANDC2) \
+ TEST1(type,EQV) \
+ TEST1(type,NAND) \
+ TEST1(type,NOR) \
+ TEST1(type,OR) \
+ TEST1(type,ORC1) \
+ TEST1(type,ORC2) \
+ TEST1(type,XOR)
+
+typedef vector bool char vboolchar_t;
+typedef vector unsigned int vuint_t;
+
+TEST(uint8_t);
+TEST(int8_t);
+TEST(uint16_t);
+TEST(int16_t);
+TEST(uint32_t);
+TEST(int32_t);
+TEST(uint64_t);
+TEST(int64_t);
+TEST(vboolchar_t);
+TEST(vuint_t);
+
+/* { dg-final { scan-assembler-times "fuse_and_and/0" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_and_and/2" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_andc_and/0" 48 } } */
+/* { dg-final { scan-assembler-times "fuse_andc_and/1" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_andc_and/2" 26 } } */
+/* { dg-final { scan-assembler-times "fuse_andc_and/3" 6 } } */
+/* { dg-final { scan-assembler-times "fuse_andc_or/0" 32 } } */
+/* { dg-final { scan-assembler-times "fuse_andc_or/1" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_andc_or/2" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_andc_orc/0" 48 } } */
+/* { dg-final { scan-assembler-times "fuse_andc_orc/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_andc_orc/2" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_andc_xor/0" 32 } } */
+/* { dg-final { scan-assembler-times "fuse_andc_xor/1" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_andc_xor/2" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_and_eqv/0" 24 } } */
+/* { dg-final { scan-assembler-times "fuse_and_eqv/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_and_or/0" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_and_or/1" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_and_orc/0" 24 } } */
+/* { dg-final { scan-assembler-times "fuse_and_orc/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_and_xor/0" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_and_xor/1" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_eqv_and/0" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_eqv_and/1" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_eqv_andc/0" 24 } } */
+/* { dg-final { scan-assembler-times "fuse_eqv_andc/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_eqv_or/0" 24 } } */
+/* { dg-final { scan-assembler-times "fuse_eqv_or/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_nand_and/0" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_nand_and/1" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_nand_andc/0" 24 } } */
+/* { dg-final { scan-assembler-times "fuse_nand_andc/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_nand_or/0" 72 } } */
+/* { dg-final { scan-assembler-times "fuse_nand_or/1" 14 } } */
+/* { dg-final { scan-assembler-times "fuse_nand_or/2" 2 } } */
+/* { dg-final { scan-assembler-times "fuse_nand_or/3" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_nand_orc/0" 24 } } */
+/* { dg-final { scan-assembler-times "fuse_nand_orc/3" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_nor_and/0" 48 } } */
+/* { dg-final { scan-assembler-times "fuse_nor_and/1" 28 } } */
+/* { dg-final { scan-assembler-times "fuse_nor_and/2" 4 } } */
+/* { dg-final { scan-assembler-times "fuse_nor_and/3" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_nor_andc/0" 24 } } */
+/* { dg-final { scan-assembler-times "fuse_nor_andc/3" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_nor_or/0" 24 } } */
+/* { dg-final { scan-assembler-times "fuse_nor_or/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_nor_orc/0" 24 } } */
+/* { dg-final { scan-assembler-times "fuse_nor_orc/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_or_and/0" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_or_and/1" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_or_andc/0" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_or_andc/1" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_orc_and/0" 32 } } */
+/* { dg-final { scan-assembler-times "fuse_orc_and/1" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_orc_and/2" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_orc_andc/0" 48 } } */
+/* { dg-final { scan-assembler-times "fuse_orc_andc/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_orc_andc/2" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_orc_or/0" 72 } } */
+/* { dg-final { scan-assembler-times "fuse_orc_or/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_orc_or/2" 10 } } */
+/* { dg-final { scan-assembler-times "fuse_orc_or/3" 6 } } */
+/* { dg-final { scan-assembler-times "fuse_orc_xor/0" 48 } } */
+/* { dg-final { scan-assembler-times "fuse_orc_xor/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_orc_xor/2" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_or_eqv/0" 24 } } */
+/* { dg-final { scan-assembler-times "fuse_or_eqv/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_or_or/0" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_or_or/2" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_or_xor/0" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_or_xor/1" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_vandc_vand/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vandc_vand/2" 10 } } */
+/* { dg-final { scan-assembler-times "fuse_vandc_vand/3" 6 } } */
+/* { dg-final { scan-assembler-times "fuse_vandc_vor/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vandc_vor/2" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vandc_vorc/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vandc_vorc/2" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vandc_vxor/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vandc_vxor/2" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vand_vand/2" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vand_veqv/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vand_vor/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vand_vorc/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vand_vxor/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_veqv_vand/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_veqv_vandc/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_veqv_vor/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vnand_vand/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vnand_vandc/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vnand_vor/1" 14 } } */
+/* { dg-final { scan-assembler-times "fuse_vnand_vor/2" 2 } } */
+/* { dg-final { scan-assembler-times "fuse_vnand_vor/3" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vnand_vorc/3" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vnor_vand/1" 14 } } */
+/* { dg-final { scan-assembler-times "fuse_vnor_vand/2" 2 } } */
+/* { dg-final { scan-assembler-times "fuse_vnor_vand/3" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vnor_vandc/3" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vnor_vor/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vnor_vorc/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vorc_vand/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vorc_vand/2" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vorc_vandc/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vorc_vandc/2" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vorc_vor/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vorc_vor/2" 10 } } */
+/* { dg-final { scan-assembler-times "fuse_vorc_vor/3" 6 } } */
+/* { dg-final { scan-assembler-times "fuse_vorc_vxor/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vorc_vxor/2" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vor_vand/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vor_vandc/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vor_veqv/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vor_vor/2" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vor_vxor/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vxor_vand/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vxor_vandc/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vxor_veqv/3" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vxor_vnand/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vxor_vor/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vxor_vorc/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vxor_vxor/2" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_xor_and/0" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_xor_and/1" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_xor_andc/0" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_xor_andc/1" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_xor_eqv/0" 24 } } */
+/* { dg-final { scan-assembler-times "fuse_xor_eqv/3" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_xor_nand/0" 24 } } */
+/* { dg-final { scan-assembler-times "fuse_xor_nand/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_xor_or/0" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_xor_or/1" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_xor_orc/0" 24 } } */
+/* { dg-final { scan-assembler-times "fuse_xor_orc/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_xor_xor/0" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_xor_xor/2" 16 } } */
diff --git a/gcc/testsuite/gcc.target/powerpc/fusion-p10-ldcmpi.c b/gcc/testsuite/gcc.target/powerpc/fusion-p10-ldcmpi.c
new file mode 100644
index 00000000000..3f33f49362e
--- /dev/null
+++ b/gcc/testsuite/gcc.target/powerpc/fusion-p10-ldcmpi.c
@@ -0,0 +1,66 @@
+/* { dg-do compile { target { powerpc*-*-* } } } */
+/* { dg-skip-if "" { powerpc*-*-darwin* } } */
+/* { dg-options "-mdejagnu-cpu=power10 -O3 -dp" } */
+
+#include <stdint.h>
+
+#define TEST(type) \
+ struct t ## type { type x[128],a,b,c; }; \
+ struct s ## type { struct t ## type *p; int d,e,f; uint64_t g,h,i; }; \
+int \
+t ## type (struct s ## type *p) \
+{ \
+ struct t ## type *tp = p->p; \
+ if(!tp || tp->a > ((type)0)) { return p->d; } \
+ if(!tp || tp->b > ((type)1)) { return p->e; } \
+ if(!tp || ( ((type)(-1) < 0) && tp->c < ((type)-1))) { return p->f; } \
+ return 0; \
+} \
+type \
+t ## type ## _ret (struct s ## type *p) \
+{ \
+ struct t ## type *tp = p->p; \
+ if(!tp || tp->a > ((type)0)) { return tp->a; } \
+ if(!tp || tp->b > ((type)1)) { return tp->b; } \
+ if(!tp || ( ((type)(-1) < 0) && tp->c < ((type)-1))) { return tp->c; } \
+ return 0; \
+}\
+int \
+t ## type ## _x (struct s ## type *p) \
+{ \
+ struct t ## type *tp = p->p; \
+ if(!tp || tp->x[p->g] > ((type)0)) { return p->d; } \
+ if(!tp || tp->x[p->h] > ((type)1)) { return p->e; } \
+ if(!tp || ( ((type)(-1) < 0) && tp->x[p->i] < ((type)-1))) { return p->f; } \
+ return 0; \
+} \
+type \
+t ## type ## _x_ret (struct s ## type *p) \
+{ \
+ struct t ## type *tp = p->p; \
+ if(!tp || tp->x[p->g] > ((type)0)) { return tp->x[p->g]; } \
+ if(!tp || tp->x[p->h] > ((type)1)) { return tp->x[p->h]; } \
+ if(!tp || ( ((type)(-1) < 0) && tp->x[p->i] < ((type)-1))) { return tp->x[p->i]; } \
+ return 0; \
+}
+
+TEST(uint64_t)
+TEST(int64_t)
+TEST(uint32_t)
+TEST(int32_t)
+TEST(uint16_t)
+TEST(int16_t)
+TEST(uint8_t)
+TEST(int8_t)
+
+/* { dg-final { scan-assembler-times "lbz_cmpldi_cr0_QI_clobber_CCUNS_zero" 2 } } */
+/* { dg-final { scan-assembler-times "ld_cmpldi_cr0_DI_clobber_CCUNS_none" 2 } } */
+/* { dg-final { scan-assembler-times "ld_cmpldi_cr0_DI_DI_CCUNS_none" 2 } } */
+/* { dg-final { scan-assembler-times "lhz_cmpldi_cr0_HI_clobber_CCUNS_zero" 2 } } */
+/* { dg-final { scan-assembler-times "lwz_cmpldi_cr0_SI_clobber_CCUNS_none" 2 } } */
+/* { dg-final { scan-assembler-times "lwz_cmpldi_cr0_SI_EXTSI_CCUNS_zero" 2 } } */
+/* { dg-final { scan-assembler-times "lwa_cmpdi_cr0_SI_EXTSI_CC_sign" 6 } } */
+/* { dg-final { scan-assembler-times "ld_cmpdi_cr0_DI_clobber_CC_none" 8 } } */
+/* { dg-final { scan-assembler-times "lha_cmpdi_cr0_HI_clobber_CC_sign" 8 } } */
+/* { dg-final { scan-assembler-times "lwa_cmpdi_cr0_SI_clobber_CC_none" 8 } } */
+/* { dg-final { scan-assembler-times "ld_cmpdi_cr0_DI_DI_CC_none" 24 } } */
^ permalink raw reply [flat|nested] 11+ messages in thread
* [gcc(refs/users/acsawdey/heads/fusion-combine)] Test cases for p10 fusion patterns
@ 2021-01-05 18:54 Aaron Sawdey
0 siblings, 0 replies; 11+ messages in thread
From: Aaron Sawdey @ 2021-01-05 18:54 UTC (permalink / raw)
To: gcc-cvs
https://gcc.gnu.org/g:9a6a401f576f7e03111212f8e4d707ad18c71f56
commit 9a6a401f576f7e03111212f8e4d707ad18c71f56
Author: Aaron Sawdey <acsawdey@linux.ibm.com>
Date: Fri Dec 11 13:47:12 2020 -0600
Test cases for p10 fusion patterns
This adds some test cases to make sure that the combine patterns for p10
fusion are working.
gcc/testsuite/ChangeLog:
* gcc.target/powerpc/fusion-p10-ldcmpi.c: New file.
* gcc.target/powerpc/fusion-p10-2logical.c: New file.
Diff:
---
.../gcc.target/powerpc/fusion-p10-2logical.c | 201 +++++++++++++++++++++
.../gcc.target/powerpc/fusion-p10-ldcmpi.c | 66 +++++++
2 files changed, 267 insertions(+)
diff --git a/gcc/testsuite/gcc.target/powerpc/fusion-p10-2logical.c b/gcc/testsuite/gcc.target/powerpc/fusion-p10-2logical.c
new file mode 100644
index 00000000000..cfe8f6c679a
--- /dev/null
+++ b/gcc/testsuite/gcc.target/powerpc/fusion-p10-2logical.c
@@ -0,0 +1,201 @@
+/* { dg-do compile { target { powerpc*-*-* } } } */
+/* { dg-skip-if "" { powerpc*-*-darwin* } } */
+/* { dg-options "-mdejagnu-cpu=power10 -O3 -dp" } */
+
+#include <altivec.h>
+#include <stdint.h>
+
+/* and/andc/eqv/nand/nor/or/orc/xor */
+#define AND(a,b) ((a)&(b))
+#define ANDC1(a,b) ((a)&((~b)))
+#define ANDC2(a,b) ((~(a))&(b))
+#define EQV(a,b) (~((a)^(b)))
+#define NAND(a,b) (~((a)&(b)))
+#define NOR(a,b) (~((a)|(b)))
+#define OR(a,b) ((a)|(b))
+#define ORC1(a,b) ((a)|((~b)))
+#define ORC2(a,b) ((~(a))|(b))
+#define XOR(a,b) ((a)^(b))
+#define TEST1(type, func) \
+ type func ## _and_T_ ## type (type a, type b, type c) { return AND(func(a,b),c); } \
+ type func ## _andc1_T_ ## type (type a, type b, type c) { return ANDC1(func(a,b),c); } \
+ type func ## _andc2_T_ ## type (type a, type b, type c) { return ANDC2(func(a,b),c); } \
+ type func ## _eqv_T_ ## type (type a, type b, type c) { return EQV(func(a,b),c); } \
+ type func ## _nand_T_ ## type (type a, type b, type c) { return NAND(func(a,b),c); } \
+ type func ## _nor_T_ ## type (type a, type b, type c) { return NOR(func(a,b),c); } \
+ type func ## _or_T_ ## type (type a, type b, type c) { return OR(func(a,b),c); } \
+ type func ## _orc1_T_ ## type (type a, type b, type c) { return ORC1(func(a,b),c); } \
+ type func ## _orc2_T_ ## type (type a, type b, type c) { return ORC2(func(a,b),c); } \
+ type func ## _xor_T_ ## type (type a, type b, type c) { return XOR(func(a,b),c); } \
+ type func ## _rev_and_T_ ## type (type a, type b, type c) { return AND(c,func(a,b)); } \
+ type func ## _rev_andc1_T_ ## type (type a, type b, type c) { return ANDC1(c,func(a,b)); } \
+ type func ## _rev_andc2_T_ ## type (type a, type b, type c) { return ANDC2(c,func(a,b)); } \
+ type func ## _rev_eqv_T_ ## type (type a, type b, type c) { return EQV(c,func(a,b)); } \
+ type func ## _rev_nand_T_ ## type (type a, type b, type c) { return NAND(c,func(a,b)); } \
+ type func ## _rev_nor_T_ ## type (type a, type b, type c) { return NOR(c,func(a,b)); } \
+ type func ## _rev_or_T_ ## type (type a, type b, type c) { return OR(c,func(a,b)); } \
+ type func ## _rev_orc1_T_ ## type (type a, type b, type c) { return ORC1(c,func(a,b)); } \
+ type func ## _rev_orc2_T_ ## type (type a, type b, type c) { return ORC2(c,func(a,b)); } \
+ type func ## _rev_xor_T_ ## type (type a, type b, type c) { return XOR(c,func(a,b)); }
+#define TEST(type) \
+ TEST1(type,AND) \
+ TEST1(type,ANDC1) \
+ TEST1(type,ANDC2) \
+ TEST1(type,EQV) \
+ TEST1(type,NAND) \
+ TEST1(type,NOR) \
+ TEST1(type,OR) \
+ TEST1(type,ORC1) \
+ TEST1(type,ORC2) \
+ TEST1(type,XOR)
+
+typedef vector bool char vboolchar_t;
+typedef vector unsigned int vuint_t;
+
+TEST(uint8_t);
+TEST(int8_t);
+TEST(uint16_t);
+TEST(int16_t);
+TEST(uint32_t);
+TEST(int32_t);
+TEST(uint64_t);
+TEST(int64_t);
+TEST(vboolchar_t);
+TEST(vuint_t);
+
+/* { dg-final { scan-assembler-times "fuse_and_and/0" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_and_and/2" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_andc_and/0" 48 } } */
+/* { dg-final { scan-assembler-times "fuse_andc_and/1" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_andc_and/2" 26 } } */
+/* { dg-final { scan-assembler-times "fuse_andc_and/3" 6 } } */
+/* { dg-final { scan-assembler-times "fuse_andc_or/0" 32 } } */
+/* { dg-final { scan-assembler-times "fuse_andc_or/1" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_andc_or/2" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_andc_orc/0" 48 } } */
+/* { dg-final { scan-assembler-times "fuse_andc_orc/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_andc_orc/2" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_andc_xor/0" 32 } } */
+/* { dg-final { scan-assembler-times "fuse_andc_xor/1" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_andc_xor/2" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_and_eqv/0" 24 } } */
+/* { dg-final { scan-assembler-times "fuse_and_eqv/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_and_or/0" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_and_or/1" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_and_orc/0" 24 } } */
+/* { dg-final { scan-assembler-times "fuse_and_orc/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_and_xor/0" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_and_xor/1" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_eqv_and/0" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_eqv_and/1" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_eqv_andc/0" 24 } } */
+/* { dg-final { scan-assembler-times "fuse_eqv_andc/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_eqv_or/0" 24 } } */
+/* { dg-final { scan-assembler-times "fuse_eqv_or/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_nand_and/0" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_nand_and/1" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_nand_andc/0" 24 } } */
+/* { dg-final { scan-assembler-times "fuse_nand_andc/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_nand_or/0" 72 } } */
+/* { dg-final { scan-assembler-times "fuse_nand_or/1" 14 } } */
+/* { dg-final { scan-assembler-times "fuse_nand_or/2" 2 } } */
+/* { dg-final { scan-assembler-times "fuse_nand_or/3" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_nand_orc/0" 24 } } */
+/* { dg-final { scan-assembler-times "fuse_nand_orc/3" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_nor_and/0" 48 } } */
+/* { dg-final { scan-assembler-times "fuse_nor_and/1" 28 } } */
+/* { dg-final { scan-assembler-times "fuse_nor_and/2" 4 } } */
+/* { dg-final { scan-assembler-times "fuse_nor_and/3" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_nor_andc/0" 24 } } */
+/* { dg-final { scan-assembler-times "fuse_nor_andc/3" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_nor_or/0" 24 } } */
+/* { dg-final { scan-assembler-times "fuse_nor_or/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_nor_orc/0" 24 } } */
+/* { dg-final { scan-assembler-times "fuse_nor_orc/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_or_and/0" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_or_and/1" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_or_andc/0" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_or_andc/1" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_orc_and/0" 32 } } */
+/* { dg-final { scan-assembler-times "fuse_orc_and/1" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_orc_and/2" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_orc_andc/0" 48 } } */
+/* { dg-final { scan-assembler-times "fuse_orc_andc/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_orc_andc/2" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_orc_or/0" 72 } } */
+/* { dg-final { scan-assembler-times "fuse_orc_or/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_orc_or/2" 10 } } */
+/* { dg-final { scan-assembler-times "fuse_orc_or/3" 6 } } */
+/* { dg-final { scan-assembler-times "fuse_orc_xor/0" 48 } } */
+/* { dg-final { scan-assembler-times "fuse_orc_xor/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_orc_xor/2" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_or_eqv/0" 24 } } */
+/* { dg-final { scan-assembler-times "fuse_or_eqv/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_or_or/0" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_or_or/2" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_or_xor/0" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_or_xor/1" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_vandc_vand/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vandc_vand/2" 10 } } */
+/* { dg-final { scan-assembler-times "fuse_vandc_vand/3" 6 } } */
+/* { dg-final { scan-assembler-times "fuse_vandc_vor/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vandc_vor/2" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vandc_vorc/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vandc_vorc/2" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vandc_vxor/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vandc_vxor/2" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vand_vand/2" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vand_veqv/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vand_vor/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vand_vorc/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vand_vxor/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_veqv_vand/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_veqv_vandc/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_veqv_vor/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vnand_vand/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vnand_vandc/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vnand_vor/1" 14 } } */
+/* { dg-final { scan-assembler-times "fuse_vnand_vor/2" 2 } } */
+/* { dg-final { scan-assembler-times "fuse_vnand_vor/3" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vnand_vorc/3" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vnor_vand/1" 14 } } */
+/* { dg-final { scan-assembler-times "fuse_vnor_vand/2" 2 } } */
+/* { dg-final { scan-assembler-times "fuse_vnor_vand/3" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vnor_vandc/3" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vnor_vor/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vnor_vorc/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vorc_vand/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vorc_vand/2" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vorc_vandc/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vorc_vandc/2" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vorc_vor/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vorc_vor/2" 10 } } */
+/* { dg-final { scan-assembler-times "fuse_vorc_vor/3" 6 } } */
+/* { dg-final { scan-assembler-times "fuse_vorc_vxor/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vorc_vxor/2" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vor_vand/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vor_vandc/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vor_veqv/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vor_vor/2" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vor_vxor/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vxor_vand/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vxor_vandc/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vxor_veqv/3" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vxor_vnand/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vxor_vor/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vxor_vorc/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vxor_vxor/2" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_xor_and/0" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_xor_and/1" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_xor_andc/0" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_xor_andc/1" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_xor_eqv/0" 24 } } */
+/* { dg-final { scan-assembler-times "fuse_xor_eqv/3" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_xor_nand/0" 24 } } */
+/* { dg-final { scan-assembler-times "fuse_xor_nand/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_xor_or/0" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_xor_or/1" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_xor_orc/0" 24 } } */
+/* { dg-final { scan-assembler-times "fuse_xor_orc/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_xor_xor/0" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_xor_xor/2" 16 } } */
diff --git a/gcc/testsuite/gcc.target/powerpc/fusion-p10-ldcmpi.c b/gcc/testsuite/gcc.target/powerpc/fusion-p10-ldcmpi.c
new file mode 100644
index 00000000000..3f33f49362e
--- /dev/null
+++ b/gcc/testsuite/gcc.target/powerpc/fusion-p10-ldcmpi.c
@@ -0,0 +1,66 @@
+/* { dg-do compile { target { powerpc*-*-* } } } */
+/* { dg-skip-if "" { powerpc*-*-darwin* } } */
+/* { dg-options "-mdejagnu-cpu=power10 -O3 -dp" } */
+
+#include <stdint.h>
+
+#define TEST(type) \
+ struct t ## type { type x[128],a,b,c; }; \
+ struct s ## type { struct t ## type *p; int d,e,f; uint64_t g,h,i; }; \
+int \
+t ## type (struct s ## type *p) \
+{ \
+ struct t ## type *tp = p->p; \
+ if(!tp || tp->a > ((type)0)) { return p->d; } \
+ if(!tp || tp->b > ((type)1)) { return p->e; } \
+ if(!tp || ( ((type)(-1) < 0) && tp->c < ((type)-1))) { return p->f; } \
+ return 0; \
+} \
+type \
+t ## type ## _ret (struct s ## type *p) \
+{ \
+ struct t ## type *tp = p->p; \
+ if(!tp || tp->a > ((type)0)) { return tp->a; } \
+ if(!tp || tp->b > ((type)1)) { return tp->b; } \
+ if(!tp || ( ((type)(-1) < 0) && tp->c < ((type)-1))) { return tp->c; } \
+ return 0; \
+}\
+int \
+t ## type ## _x (struct s ## type *p) \
+{ \
+ struct t ## type *tp = p->p; \
+ if(!tp || tp->x[p->g] > ((type)0)) { return p->d; } \
+ if(!tp || tp->x[p->h] > ((type)1)) { return p->e; } \
+ if(!tp || ( ((type)(-1) < 0) && tp->x[p->i] < ((type)-1))) { return p->f; } \
+ return 0; \
+} \
+type \
+t ## type ## _x_ret (struct s ## type *p) \
+{ \
+ struct t ## type *tp = p->p; \
+ if(!tp || tp->x[p->g] > ((type)0)) { return tp->x[p->g]; } \
+ if(!tp || tp->x[p->h] > ((type)1)) { return tp->x[p->h]; } \
+ if(!tp || ( ((type)(-1) < 0) && tp->x[p->i] < ((type)-1))) { return tp->x[p->i]; } \
+ return 0; \
+}
+
+TEST(uint64_t)
+TEST(int64_t)
+TEST(uint32_t)
+TEST(int32_t)
+TEST(uint16_t)
+TEST(int16_t)
+TEST(uint8_t)
+TEST(int8_t)
+
+/* { dg-final { scan-assembler-times "lbz_cmpldi_cr0_QI_clobber_CCUNS_zero" 2 } } */
+/* { dg-final { scan-assembler-times "ld_cmpldi_cr0_DI_clobber_CCUNS_none" 2 } } */
+/* { dg-final { scan-assembler-times "ld_cmpldi_cr0_DI_DI_CCUNS_none" 2 } } */
+/* { dg-final { scan-assembler-times "lhz_cmpldi_cr0_HI_clobber_CCUNS_zero" 2 } } */
+/* { dg-final { scan-assembler-times "lwz_cmpldi_cr0_SI_clobber_CCUNS_none" 2 } } */
+/* { dg-final { scan-assembler-times "lwz_cmpldi_cr0_SI_EXTSI_CCUNS_zero" 2 } } */
+/* { dg-final { scan-assembler-times "lwa_cmpdi_cr0_SI_EXTSI_CC_sign" 6 } } */
+/* { dg-final { scan-assembler-times "ld_cmpdi_cr0_DI_clobber_CC_none" 8 } } */
+/* { dg-final { scan-assembler-times "lha_cmpdi_cr0_HI_clobber_CC_sign" 8 } } */
+/* { dg-final { scan-assembler-times "lwa_cmpdi_cr0_SI_clobber_CC_none" 8 } } */
+/* { dg-final { scan-assembler-times "ld_cmpdi_cr0_DI_DI_CC_none" 24 } } */
^ permalink raw reply [flat|nested] 11+ messages in thread
* [gcc(refs/users/acsawdey/heads/fusion-combine)] Test cases for p10 fusion patterns
@ 2021-01-05 18:34 Aaron Sawdey
0 siblings, 0 replies; 11+ messages in thread
From: Aaron Sawdey @ 2021-01-05 18:34 UTC (permalink / raw)
To: gcc-cvs
https://gcc.gnu.org/g:791a87d616a8f680f0a6752f524a54b531f861c0
commit 791a87d616a8f680f0a6752f524a54b531f861c0
Author: Aaron Sawdey <acsawdey@linux.ibm.com>
Date: Fri Dec 11 13:47:12 2020 -0600
Test cases for p10 fusion patterns
This adds some test cases to make sure that the combine patterns for p10
fusion are working.
gcc/testsuite/ChangeLog:
* gcc.target/powerpc/fusion-p10-ldcmpi.c: New file.
* gcc.target/powerpc/fusion-p10-2logical.c: New file.
Diff:
---
.../gcc.target/powerpc/fusion-p10-2logical.c | 201 +++++++++++++++++++++
.../gcc.target/powerpc/fusion-p10-ldcmpi.c | 66 +++++++
2 files changed, 267 insertions(+)
diff --git a/gcc/testsuite/gcc.target/powerpc/fusion-p10-2logical.c b/gcc/testsuite/gcc.target/powerpc/fusion-p10-2logical.c
new file mode 100644
index 00000000000..cfe8f6c679a
--- /dev/null
+++ b/gcc/testsuite/gcc.target/powerpc/fusion-p10-2logical.c
@@ -0,0 +1,201 @@
+/* { dg-do compile { target { powerpc*-*-* } } } */
+/* { dg-skip-if "" { powerpc*-*-darwin* } } */
+/* { dg-options "-mdejagnu-cpu=power10 -O3 -dp" } */
+
+#include <altivec.h>
+#include <stdint.h>
+
+/* and/andc/eqv/nand/nor/or/orc/xor */
+#define AND(a,b) ((a)&(b))
+#define ANDC1(a,b) ((a)&((~b)))
+#define ANDC2(a,b) ((~(a))&(b))
+#define EQV(a,b) (~((a)^(b)))
+#define NAND(a,b) (~((a)&(b)))
+#define NOR(a,b) (~((a)|(b)))
+#define OR(a,b) ((a)|(b))
+#define ORC1(a,b) ((a)|((~b)))
+#define ORC2(a,b) ((~(a))|(b))
+#define XOR(a,b) ((a)^(b))
+#define TEST1(type, func) \
+ type func ## _and_T_ ## type (type a, type b, type c) { return AND(func(a,b),c); } \
+ type func ## _andc1_T_ ## type (type a, type b, type c) { return ANDC1(func(a,b),c); } \
+ type func ## _andc2_T_ ## type (type a, type b, type c) { return ANDC2(func(a,b),c); } \
+ type func ## _eqv_T_ ## type (type a, type b, type c) { return EQV(func(a,b),c); } \
+ type func ## _nand_T_ ## type (type a, type b, type c) { return NAND(func(a,b),c); } \
+ type func ## _nor_T_ ## type (type a, type b, type c) { return NOR(func(a,b),c); } \
+ type func ## _or_T_ ## type (type a, type b, type c) { return OR(func(a,b),c); } \
+ type func ## _orc1_T_ ## type (type a, type b, type c) { return ORC1(func(a,b),c); } \
+ type func ## _orc2_T_ ## type (type a, type b, type c) { return ORC2(func(a,b),c); } \
+ type func ## _xor_T_ ## type (type a, type b, type c) { return XOR(func(a,b),c); } \
+ type func ## _rev_and_T_ ## type (type a, type b, type c) { return AND(c,func(a,b)); } \
+ type func ## _rev_andc1_T_ ## type (type a, type b, type c) { return ANDC1(c,func(a,b)); } \
+ type func ## _rev_andc2_T_ ## type (type a, type b, type c) { return ANDC2(c,func(a,b)); } \
+ type func ## _rev_eqv_T_ ## type (type a, type b, type c) { return EQV(c,func(a,b)); } \
+ type func ## _rev_nand_T_ ## type (type a, type b, type c) { return NAND(c,func(a,b)); } \
+ type func ## _rev_nor_T_ ## type (type a, type b, type c) { return NOR(c,func(a,b)); } \
+ type func ## _rev_or_T_ ## type (type a, type b, type c) { return OR(c,func(a,b)); } \
+ type func ## _rev_orc1_T_ ## type (type a, type b, type c) { return ORC1(c,func(a,b)); } \
+ type func ## _rev_orc2_T_ ## type (type a, type b, type c) { return ORC2(c,func(a,b)); } \
+ type func ## _rev_xor_T_ ## type (type a, type b, type c) { return XOR(c,func(a,b)); }
+#define TEST(type) \
+ TEST1(type,AND) \
+ TEST1(type,ANDC1) \
+ TEST1(type,ANDC2) \
+ TEST1(type,EQV) \
+ TEST1(type,NAND) \
+ TEST1(type,NOR) \
+ TEST1(type,OR) \
+ TEST1(type,ORC1) \
+ TEST1(type,ORC2) \
+ TEST1(type,XOR)
+
+typedef vector bool char vboolchar_t;
+typedef vector unsigned int vuint_t;
+
+TEST(uint8_t);
+TEST(int8_t);
+TEST(uint16_t);
+TEST(int16_t);
+TEST(uint32_t);
+TEST(int32_t);
+TEST(uint64_t);
+TEST(int64_t);
+TEST(vboolchar_t);
+TEST(vuint_t);
+
+/* { dg-final { scan-assembler-times "fuse_and_and/0" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_and_and/2" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_andc_and/0" 48 } } */
+/* { dg-final { scan-assembler-times "fuse_andc_and/1" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_andc_and/2" 26 } } */
+/* { dg-final { scan-assembler-times "fuse_andc_and/3" 6 } } */
+/* { dg-final { scan-assembler-times "fuse_andc_or/0" 32 } } */
+/* { dg-final { scan-assembler-times "fuse_andc_or/1" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_andc_or/2" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_andc_orc/0" 48 } } */
+/* { dg-final { scan-assembler-times "fuse_andc_orc/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_andc_orc/2" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_andc_xor/0" 32 } } */
+/* { dg-final { scan-assembler-times "fuse_andc_xor/1" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_andc_xor/2" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_and_eqv/0" 24 } } */
+/* { dg-final { scan-assembler-times "fuse_and_eqv/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_and_or/0" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_and_or/1" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_and_orc/0" 24 } } */
+/* { dg-final { scan-assembler-times "fuse_and_orc/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_and_xor/0" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_and_xor/1" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_eqv_and/0" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_eqv_and/1" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_eqv_andc/0" 24 } } */
+/* { dg-final { scan-assembler-times "fuse_eqv_andc/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_eqv_or/0" 24 } } */
+/* { dg-final { scan-assembler-times "fuse_eqv_or/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_nand_and/0" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_nand_and/1" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_nand_andc/0" 24 } } */
+/* { dg-final { scan-assembler-times "fuse_nand_andc/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_nand_or/0" 72 } } */
+/* { dg-final { scan-assembler-times "fuse_nand_or/1" 14 } } */
+/* { dg-final { scan-assembler-times "fuse_nand_or/2" 2 } } */
+/* { dg-final { scan-assembler-times "fuse_nand_or/3" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_nand_orc/0" 24 } } */
+/* { dg-final { scan-assembler-times "fuse_nand_orc/3" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_nor_and/0" 48 } } */
+/* { dg-final { scan-assembler-times "fuse_nor_and/1" 28 } } */
+/* { dg-final { scan-assembler-times "fuse_nor_and/2" 4 } } */
+/* { dg-final { scan-assembler-times "fuse_nor_and/3" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_nor_andc/0" 24 } } */
+/* { dg-final { scan-assembler-times "fuse_nor_andc/3" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_nor_or/0" 24 } } */
+/* { dg-final { scan-assembler-times "fuse_nor_or/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_nor_orc/0" 24 } } */
+/* { dg-final { scan-assembler-times "fuse_nor_orc/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_or_and/0" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_or_and/1" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_or_andc/0" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_or_andc/1" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_orc_and/0" 32 } } */
+/* { dg-final { scan-assembler-times "fuse_orc_and/1" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_orc_and/2" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_orc_andc/0" 48 } } */
+/* { dg-final { scan-assembler-times "fuse_orc_andc/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_orc_andc/2" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_orc_or/0" 72 } } */
+/* { dg-final { scan-assembler-times "fuse_orc_or/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_orc_or/2" 10 } } */
+/* { dg-final { scan-assembler-times "fuse_orc_or/3" 6 } } */
+/* { dg-final { scan-assembler-times "fuse_orc_xor/0" 48 } } */
+/* { dg-final { scan-assembler-times "fuse_orc_xor/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_orc_xor/2" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_or_eqv/0" 24 } } */
+/* { dg-final { scan-assembler-times "fuse_or_eqv/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_or_or/0" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_or_or/2" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_or_xor/0" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_or_xor/1" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_vandc_vand/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vandc_vand/2" 10 } } */
+/* { dg-final { scan-assembler-times "fuse_vandc_vand/3" 6 } } */
+/* { dg-final { scan-assembler-times "fuse_vandc_vor/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vandc_vor/2" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vandc_vorc/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vandc_vorc/2" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vandc_vxor/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vandc_vxor/2" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vand_vand/2" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vand_veqv/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vand_vor/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vand_vorc/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vand_vxor/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_veqv_vand/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_veqv_vandc/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_veqv_vor/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vnand_vand/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vnand_vandc/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vnand_vor/1" 14 } } */
+/* { dg-final { scan-assembler-times "fuse_vnand_vor/2" 2 } } */
+/* { dg-final { scan-assembler-times "fuse_vnand_vor/3" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vnand_vorc/3" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vnor_vand/1" 14 } } */
+/* { dg-final { scan-assembler-times "fuse_vnor_vand/2" 2 } } */
+/* { dg-final { scan-assembler-times "fuse_vnor_vand/3" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vnor_vandc/3" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vnor_vor/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vnor_vorc/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vorc_vand/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vorc_vand/2" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vorc_vandc/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vorc_vandc/2" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vorc_vor/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vorc_vor/2" 10 } } */
+/* { dg-final { scan-assembler-times "fuse_vorc_vor/3" 6 } } */
+/* { dg-final { scan-assembler-times "fuse_vorc_vxor/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vorc_vxor/2" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vor_vand/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vor_vandc/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vor_veqv/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vor_vor/2" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vor_vxor/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vxor_vand/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vxor_vandc/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vxor_veqv/3" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vxor_vnand/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vxor_vor/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vxor_vorc/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_vxor_vxor/2" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_xor_and/0" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_xor_and/1" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_xor_andc/0" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_xor_andc/1" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_xor_eqv/0" 24 } } */
+/* { dg-final { scan-assembler-times "fuse_xor_eqv/3" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_xor_nand/0" 24 } } */
+/* { dg-final { scan-assembler-times "fuse_xor_nand/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_xor_or/0" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_xor_or/1" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_xor_orc/0" 24 } } */
+/* { dg-final { scan-assembler-times "fuse_xor_orc/1" 8 } } */
+/* { dg-final { scan-assembler-times "fuse_xor_xor/0" 16 } } */
+/* { dg-final { scan-assembler-times "fuse_xor_xor/2" 16 } } */
diff --git a/gcc/testsuite/gcc.target/powerpc/fusion-p10-ldcmpi.c b/gcc/testsuite/gcc.target/powerpc/fusion-p10-ldcmpi.c
new file mode 100644
index 00000000000..3f33f49362e
--- /dev/null
+++ b/gcc/testsuite/gcc.target/powerpc/fusion-p10-ldcmpi.c
@@ -0,0 +1,66 @@
+/* { dg-do compile { target { powerpc*-*-* } } } */
+/* { dg-skip-if "" { powerpc*-*-darwin* } } */
+/* { dg-options "-mdejagnu-cpu=power10 -O3 -dp" } */
+
+#include <stdint.h>
+
+#define TEST(type) \
+ struct t ## type { type x[128],a,b,c; }; \
+ struct s ## type { struct t ## type *p; int d,e,f; uint64_t g,h,i; }; \
+int \
+t ## type (struct s ## type *p) \
+{ \
+ struct t ## type *tp = p->p; \
+ if(!tp || tp->a > ((type)0)) { return p->d; } \
+ if(!tp || tp->b > ((type)1)) { return p->e; } \
+ if(!tp || ( ((type)(-1) < 0) && tp->c < ((type)-1))) { return p->f; } \
+ return 0; \
+} \
+type \
+t ## type ## _ret (struct s ## type *p) \
+{ \
+ struct t ## type *tp = p->p; \
+ if(!tp || tp->a > ((type)0)) { return tp->a; } \
+ if(!tp || tp->b > ((type)1)) { return tp->b; } \
+ if(!tp || ( ((type)(-1) < 0) && tp->c < ((type)-1))) { return tp->c; } \
+ return 0; \
+}\
+int \
+t ## type ## _x (struct s ## type *p) \
+{ \
+ struct t ## type *tp = p->p; \
+ if(!tp || tp->x[p->g] > ((type)0)) { return p->d; } \
+ if(!tp || tp->x[p->h] > ((type)1)) { return p->e; } \
+ if(!tp || ( ((type)(-1) < 0) && tp->x[p->i] < ((type)-1))) { return p->f; } \
+ return 0; \
+} \
+type \
+t ## type ## _x_ret (struct s ## type *p) \
+{ \
+ struct t ## type *tp = p->p; \
+ if(!tp || tp->x[p->g] > ((type)0)) { return tp->x[p->g]; } \
+ if(!tp || tp->x[p->h] > ((type)1)) { return tp->x[p->h]; } \
+ if(!tp || ( ((type)(-1) < 0) && tp->x[p->i] < ((type)-1))) { return tp->x[p->i]; } \
+ return 0; \
+}
+
+TEST(uint64_t)
+TEST(int64_t)
+TEST(uint32_t)
+TEST(int32_t)
+TEST(uint16_t)
+TEST(int16_t)
+TEST(uint8_t)
+TEST(int8_t)
+
+/* { dg-final { scan-assembler-times "lbz_cmpldi_cr0_QI_clobber_CCUNS_zero" 2 } } */
+/* { dg-final { scan-assembler-times "ld_cmpldi_cr0_DI_clobber_CCUNS_none" 2 } } */
+/* { dg-final { scan-assembler-times "ld_cmpldi_cr0_DI_DI_CCUNS_none" 2 } } */
+/* { dg-final { scan-assembler-times "lhz_cmpldi_cr0_HI_clobber_CCUNS_zero" 2 } } */
+/* { dg-final { scan-assembler-times "lwz_cmpldi_cr0_SI_clobber_CCUNS_none" 2 } } */
+/* { dg-final { scan-assembler-times "lwz_cmpldi_cr0_SI_EXTSI_CCUNS_zero" 2 } } */
+/* { dg-final { scan-assembler-times "lwa_cmpdi_cr0_SI_EXTSI_CC_sign" 6 } } */
+/* { dg-final { scan-assembler-times "ld_cmpdi_cr0_DI_clobber_CC_none" 8 } } */
+/* { dg-final { scan-assembler-times "lha_cmpdi_cr0_HI_clobber_CC_sign" 8 } } */
+/* { dg-final { scan-assembler-times "lwa_cmpdi_cr0_SI_clobber_CC_none" 8 } } */
+/* { dg-final { scan-assembler-times "ld_cmpdi_cr0_DI_DI_CC_none" 24 } } */
^ permalink raw reply [flat|nested] 11+ messages in thread
end of thread, other threads:[~2021-04-28 17:09 UTC | newest]
Thread overview: 11+ messages (download: mbox.gz / follow: Atom feed)
-- links below jump to the message on this page --
2020-12-15 0:48 [gcc(refs/users/acsawdey/heads/fusion-combine)] Test cases for p10 fusion patterns Aaron Sawdey
2021-01-05 18:34 Aaron Sawdey
2021-01-05 18:54 Aaron Sawdey
2021-01-19 18:30 Aaron Sawdey
2021-01-26 22:42 Aaron Sawdey
2021-01-26 22:48 Aaron Sawdey
2021-01-27 18:26 Aaron Sawdey
2021-01-30 21:54 Aaron Sawdey
2021-02-09 0:35 Aaron Sawdey
2021-03-05 18:14 Aaron Sawdey
2021-04-28 17:09 Aaron Sawdey
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 read-only IMAP folder(s) and NNTP newsgroup(s).