diff --git a/gcc/testsuite/ChangeLog b/gcc/testsuite/ChangeLog
index c9f0d3fc42e..c93ef02955c 100644
--- a/gcc/testsuite/ChangeLog
+++ b/gcc/testsuite/ChangeLog
@@ -1,3 +1,8 @@
+Mon Jul 17 00:41:57 2000   Greg McGary <greg@mcgary.org>
+
+	* gcc.c-torture/execute/20000717-1.c: New test.
+	* gcc.c-torture/execute/20000717-1.x: Expected to fail.
+
 2000-07-15  Jakub Jelinek  <jakub@redhat.com>
 
 	* gcc.c-torture/execute/20000715-2.c: New test.
diff --git a/gcc/testsuite/gcc.c-torture/execute/20000717-1.c b/gcc/testsuite/gcc.c-torture/execute/20000717-1.c
new file mode 100644
index 00000000000..039ae5f342d
--- /dev/null
+++ b/gcc/testsuite/gcc.c-torture/execute/20000717-1.c
@@ -0,0 +1,22 @@
+typedef struct trio { int a, b, c; } trio;
+
+int
+bar (int i, trio t)
+{
+  if (t.a == t.b || t.a == t.c)
+    abort ();
+}
+
+int
+foo (trio t, int i)
+{
+  return bar (i, t);
+}
+
+main ()
+{
+  trio t = { 1, 2, 3 };
+
+  foo (t, 4);
+  exit (0);
+}
diff --git a/gcc/testsuite/gcc.c-torture/execute/20000717-1.x b/gcc/testsuite/gcc.c-torture/execute/20000717-1.x
new file mode 100644
index 00000000000..1005ae6c850
--- /dev/null
+++ b/gcc/testsuite/gcc.c-torture/execute/20000717-1.x
@@ -0,0 +1,3 @@
+set torture_execute_xfail "*-*-*"
+
+return 0