New test.

From-SVN: r35872

gcc/testsuite/ChangeLog

+2000-08-22  Richard Henderson  <rth@cygnus.com>
+
+	* gcc.c-torture/execute/20000822-1.c: New test.
+
 2000-08-21  Jakub Jelinek  <jakub@redhat.com>
 
 	* gcc.c-torture/execute/20000819-1.x: Remove.

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

+int f0(int (*fn)(int *), int *p)
+{
+  return (*fn) (p);
+}
+
+int f1(void)
+{
+  int i = 0;
+
+  int f2(int *p)
+  {
+    i = 1;
+    return *p + 1;
+  }
+
+  return f0(f2, &i);
+}
+
+int main()
+{
+  if (f1() != 2)
+    abort ();
+  return 0;
+}