+++ /dev/null
-#include <varargs.h>
-
-typedef double TYPE;
-
-void vafunction (dummy, va_alist)
- char *dummy;
- va_dcl
-{
- va_list ap;
-
- va_start(ap);
- if (va_arg (ap, TYPE) != 1.)
- abort();
- if (va_arg (ap, TYPE) != 2.)
- abort();
- if (va_arg (ap, TYPE) != 3.)
- abort();
- if (va_arg (ap, TYPE) != 4.)
- abort();
- if (va_arg (ap, TYPE) != 5.)
- abort();
- if (va_arg (ap, TYPE) != 6.)
- abort();
- if (va_arg (ap, TYPE) != 7.)
- abort();
- if (va_arg (ap, TYPE) != 8.)
- abort();
- if (va_arg (ap, TYPE) != 9.)
- abort();
- va_end(ap);
-}
-
-
-int main (void)
-{
- vafunction( "", 1., 2., 3., 4., 5., 6., 7., 8., 9. );
- exit(0);
- return 0;
-}