20000722-1.x: New, testcase fails.

* gcc.c-torture/execute/20000722-1.x: New, testcase fails.
* gcc.c-torture/execute/20000722-1.c: New.
* gcc.c-torture/execute/20000516-1.c: Delete, replaced by 20000722-1.

From-SVN: r35234

gcc/testsuite/ChangeLog

+2000-07-24  Geoff Keating  <geoffk@cygnus.com>
+
+	* gcc.c-torture/execute/20000722-1.x: New, testcase fails.
+	* gcc.c-torture/execute/20000722-1.c: New.
+	* gcc.c-torture/execute/20000516-1.c: Delete, replaced by 20000722-1.
+
 2000-07-24  Jakub Jelinek  <jakub@redhat.com>
 
 	* gcc.dg/cpp/20000720-1.S: New test.

gcc/testsuite/gcc.c-torture/execute/20000516-1.c

-
-struct test_type 
-{  
-  int value;
-  char *string;
-};
-
-void
-callout (struct test_type *test_data)
-{
-  test_data->string = "ho there";
-}
-
-int main ()
-{
-  callout (&(struct test_type) { 3, "hey there" });
-  exit (0);
-}

gcc/testsuite/gcc.c-torture/execute/20000722-1.c

+struct s { char *p; int t; };
+
+extern void bar (void);
+extern void foo (struct s *);
+
+int main(void)
+{
+  bar ();
+  bar ();
+  exit (0);
+}
+
+void 
+bar (void)
+{
+  foo (& (struct s) { "hi", 1 });
+}
+
+void foo (struct s *p)
+{
+  if (p->t != 1)
+    abort();
+  p->t = 2;
+}

gcc/testsuite/gcc.c-torture/execute/20000722-1.x

+# Doesn't work.  Hasn't worked ever, I think.
+set torture_execute_xfail "*-*-*"
+return 0