Install msysDVLPR-1.0.0-alpha-1
[msysgit.git] / lib / gcc-lib / i686-pc-msys / 2.95.3-1 / include / va-pa.h
blob4865f6bfac08f4a29575aa2b57d901c2ad40a4f3
2 /* Define __gnuc_va_list. */
4 #ifndef __GNUC_VA_LIST
5 #define __GNUC_VA_LIST
7 typedef void *__gnuc_va_list;
8 #endif /* not __GNUC_VA_LIST */
10 /* If this is for internal libc use, don't define anything but
11 __gnuc_va_list. */
12 #if defined (_STDARG_H) || defined (_VARARGS_H)
13 #if __GNUC__ > 1
14 #define __va_ellipsis ...
15 #define __gnuc_va_start(AP) ((AP) = (va_list)__builtin_saveregs())
16 #else
17 #define va_alist __va_a__, __va_b__, __va_c__, __va_d__
18 #define __va_ellipsis
19 #define __gnuc_va_start(AP)\
20 (AP) = (double *) &__va_a__, &__va_b__, &__va_c__, &__va_d__, \
21 (AP) = (double *)((char *)(AP) + 4)
22 #endif /* __GNUC__ > 1 */
24 /* Call __builtin_next_arg even though we aren't using its value, so that
25 we can verify that LASTARG is correct. */
26 #ifdef _STDARG_H
27 #define va_start(AP,LASTARG) \
28 (__builtin_next_arg (LASTARG), __gnuc_va_start (AP))
29 #else
30 /* The ... causes current_function_varargs to be set in cc1. */
31 #define va_dcl long va_alist; __va_ellipsis
32 #define va_start(AP) __gnuc_va_start (AP)
33 #endif
35 #define va_arg(AP,TYPE) \
36 (*(sizeof(TYPE) > 8 ? \
37 ((AP = (__gnuc_va_list) ((char *)AP - sizeof (int))), \
38 (((TYPE *) (void *) (*((int *) (AP)))))) \
39 :((AP = \
40 (__gnuc_va_list) ((long)((char *)AP - sizeof (TYPE)) \
41 & (sizeof(TYPE) > 4 ? ~0x7 : ~0x3))), \
42 (((TYPE *) (void *) ((char *)AP + ((8 - sizeof(TYPE)) % 4)))))))
44 #ifndef va_end
45 void va_end (__gnuc_va_list); /* Defined in libgcc.a */
46 #endif
47 #define va_end(AP) ((void)0)
49 /* Copy __gnuc_va_list into another variable of this type. */
50 #define __va_copy(dest, src) (dest) = (src)
52 #endif /* defined (_STDARG_H) || defined (_VARARGS_H) */