OpenCores
URL https://opencores.org/ocsvn/openrisc/openrisc/trunk

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-dev/] [or1k-gcc/] [gcc/] [testsuite/] [gcc.c-torture/] [execute/] [va-arg-8.c] - Blame information for rev 801

Go to most recent revision | Details | Compare with Previous | View Log

Line No. Rev Author Line
1 688 jeremybenn
/* Origin: Franz Sirl <Franz.Sirl-kernel@lauterbach.com> */
2
 
3
#include <stdarg.h>
4
#include <limits.h>
5
 
6
#if __LONG_LONG_MAX__ == 9223372036854775807LL
7
 
8
typedef long long int INT64;
9
 
10
inline void
11
debug(int i1, int i2, int i3, int i4, int i5,
12
      int i6, int i7, int i8, int i9, ...)
13
{
14
  va_list ap;
15
 
16
  va_start (ap, i9);
17
 
18
  if (va_arg (ap,int) != 10)
19
    abort ();
20
  if (va_arg (ap,INT64) != 0x123400005678LL)
21
    abort ();
22
 
23
  va_end (ap);
24
}
25
 
26
int
27
main(void)
28
{
29
  debug(1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 0x123400005678LL);
30
  exit(0);
31
}
32
 
33
#else
34
 
35
int
36
main(void)
37
{
38
  exit(0);
39
}
40
 
41
#endif /* long long 64 bits */

powered by: WebSVN 2.1.0

© copyright 1999-2024 OpenCores.org, equivalent to Oliscience, all rights reserved. OpenCores®, registered trademark.