[testcase] Passing structures by value

Jakub Jelinek jakub@redhat.com
Mon Mar 18 03:39:00 GMT 2002


Hi!

Seems we lack a passing structures by value test badly.
E.g. on IA-64, this test apparently never worked properly
(until 2002-03-01 change which broke even simpler cases
this failed since the 2.96 days e.g. in the N=33 case -
s3 address in test33 was computed incorrectly).
I think it is enough to check this at -O2 only, cycling through
all the optimization options in gcc.c-torture might take too long on
some arches.
The testcase passed on ia32, sparc and sparc -m64.
Ok to commit to trunk/branch?

2002-03-18  Jakub Jelinek  <jakub@redhat.com>

	* testsuite/gcc.dg/struct-by-value-1.c: New test.

--- gcc/testsuite/gcc.dg/struct-by-value-1.c.jj	Mon Mar 18 12:46:12 2002
+++ gcc/testsuite/gcc.dg/struct-by-value-1.c	Mon Mar 18 12:25:06 2002
@@ -0,0 +1,83 @@
+/* Test structure passing by value.  */
+/* { dg-do run } */
+/* { dg-options "-O2" } */
+
+#define T(N)					\
+struct S##N { unsigned char i[N]; };		\
+struct S##N g1s##N, g2s##N, g3s##N;		\
+						\
+void						\
+init##N (struct S##N *p, int i)			\
+{						\
+  int j;					\
+  for (j = 0; j < N; j++)			\
+    p->i[j] = i + j;				\
+}						\
+						\
+void						\
+check##N (struct S##N *p, int i)		\
+{						\
+  int j;					\
+  for (j = 0; j < N; j++)			\
+    if (p->i[j] != i + j) abort ();		\
+}						\
+						\
+void						\
+test##N (struct S##N s1, struct S##N s2,	\
+	 struct S##N s3)			\
+{						\
+  check##N (&s1, 64);				\
+  check##N (&s2, 128);				\
+  check##N (&s3, 192);				\
+}						\
+						\
+void						\
+test2_##N (struct S##N s1, struct S##N s2)	\
+{						\
+  test##N (s1, g2s##N, s2);			\
+}						\
+						\
+void						\
+testit##N (void)				\
+{						\
+  init##N (&g1s##N, 64);			\
+  check##N (&g1s##N, 64);			\
+  init##N (&g2s##N, 128);			\
+  check##N (&g2s##N, 128);			\
+  init##N (&g3s##N, 192);			\
+  check##N (&g3s##N, 192);			\
+  test##N (g1s##N, g2s##N, g3s##N);		\
+  test2_##N (g1s##N, g3s##N);			\
+}
+
+extern void abort (void);
+extern void exit (int);
+
+T(0) T(1) T(2) T(3) T(4) T(5) T(6) T(7)
+T(8) T(9) T(10) T(11) T(12) T(13) T(14) T(15)
+T(16) T(17) T(18) T(19) T(20) T(21) T(22) T(23)
+T(24) T(25) T(26) T(27) T(28) T(29) T(30) T(31)
+T(32) T(33) T(34) T(35) T(36) T(37) T(38) T(39)
+T(40) T(41) T(42) T(43) T(44) T(45) T(46) T(47)
+T(48) T(49) T(50) T(51) T(52) T(53) T(54) T(55)
+T(56) T(57) T(58) T(59) T(60) T(61) T(62) T(63)
+
+#undef T
+
+int
+main ()
+{
+#define T(N) testit##N ();
+
+T(0) T(1) T(2) T(3) T(4) T(5) T(6) T(7)
+T(8) T(9) T(10) T(11) T(12) T(13) T(14) T(15)
+T(16) T(17) T(18) T(19) T(20) T(21) T(22) T(23)
+T(24) T(25) T(26) T(27) T(28) T(29) T(30) T(31)
+T(32) T(33) T(34) T(35) T(36) T(37) T(38) T(39)
+T(40) T(41) T(42) T(43) T(44) T(45) T(46) T(47)
+T(48) T(49) T(50) T(51) T(52) T(53) T(54) T(55)
+T(56) T(57) T(58) T(59) T(60) T(61) T(62) T(63)
+
+#undef T
+  exit (0);
+}

	Jakub



More information about the Gcc-patches mailing list