* execute/va-arg-14.c: New test for va_start where the first

parameter is a function argument.

git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@32734 138bc75d-0d04-0410-961f-82ee72b054a4

diff --git a/gcc/testsuite/gcc.c-torture/ChangeLog b/gcc/testsuite/gcc.c-torture/ChangeLog
index 97f6eef..3ac1a5a 100644 (file)
--- a/gcc/testsuite/gcc.c-torture/ChangeLog
+++ b/gcc/testsuite/gcc.c-torture/ChangeLog
@@ -1,3 +1,8 @@
+2000-03-24  Geoff Keating  <geoffk@cygnus.com>
+
+       * execute/va-arg-14.c: New test for va_start where the first
+       parameter is a function argument.
+
 2000-03-22  Geoff Keating  <geoffk@cygnus.com>
 
        * execute/ieee/20000320-1.c: New test for denormals.

diff --git a/gcc/testsuite/gcc.c-torture/execute/va-arg-14.c b/gcc/testsuite/gcc.c-torture/execute/va-arg-14.c
new file mode 100644 (file)
index 0000000..d8b517a
--- /dev/null
+++ b/gcc/testsuite/gcc.c-torture/execute/va-arg-14.c
@@ -0,0 +1,45 @@
+#include <stdarg.h>
+
+va_list global;
+
+void vat(va_list param, ...)
+{
+  va_list local;
+
+  va_start (local, param);
+  va_copy (global, local);
+  va_copy (param, local);
+  if (va_arg (local, int) != 1)
+    abort();
+  va_end (local);
+  if (va_arg (global, int) != 1)
+    abort();
+  va_end (global);
+  if (va_arg (param, int) != 1)
+    abort();
+  va_end (param);
+
+  va_start (param, param);
+  va_start (global, param);
+  va_copy (local, param);
+  if (va_arg (local, int) != 1)
+    abort();
+  va_end (local);
+  va_copy (local, global);
+  if (va_arg (local, int) != 1)
+    abort();
+  va_end (local);
+  if (va_arg (global, int) != 1)
+    abort();
+  va_end (global);
+  if (va_arg (param, int) != 1)
+    abort();
+  va_end (param);
+}
+
+int main(void) 
+{
+  va_list t;
+  vat (t, 1);
+  exit (0);
+}