1/* GNU C varargs and stdargs support for Clipper. */ 2 3/* Define __gnuc_va_list. */ 4 5#ifndef __GNUC_VA_LIST 6#define __GNUC_VA_LIST 7 8typedef struct 9{ 10 int __va_ap; /* pointer to stack args */ 11 void *__va_reg[4]; /* pointer to r0,f0,r1,f1 */ 12 int __va_num; /* number of args processed */ 13} __gnuc_va_list; 14#endif /* not __GNUC_VA_LIST */ 15 16 17#if defined (_STDARG_H) || defined (_VARARGS_H) 18typedef __gnuc_va_list va_list; 19#define __va_list __gnuc_va_list /* acc compatibility */ 20 21#define _VA_LIST 22#define _VA_LIST_ 23#define _SYS_INT_STDARG_H /* acc compatibility */ 24 25/* Call __builtin_next_arg even though we aren't using its value, so that 26 we can verify that LASTARG is correct. */ 27#ifdef _STDARG_H 28#define va_start(AP,LASTARG) \ 29 (__builtin_next_arg (LASTARG), \ 30 (AP) = *(va_list *)__builtin_saveregs(), \ 31 (AP).__va_num = __builtin_args_info (0), \ 32 (AP).__va_ap += __builtin_args_info (1)) 33#else 34#define va_alist __builtin_va_alist 35/* The ... causes current_function_varargs to be set in cc1. */ 36#define va_dcl va_list __builtin_va_alist; ... 37#define va_start(AP) \ 38 ((AP) = *(va_list *)__builtin_saveregs(), \ 39 (AP).__va_num = __builtin_args_info (0)) 40#endif /* _STDARG_H */ 41 42/* round to alignment of `type' but keep a least integer alignment */ 43#define __va_round(AP,TYPE) \ 44 ((AP).__va_ap = ((AP).__va_ap + __alignof__ (TYPE) - 1 ) & \ 45 ~(__alignof__ (TYPE) - 1), \ 46 ((AP).__va_ap = ((AP).__va_ap + sizeof (int) - 1) & ~(sizeof (int) - 1))) 47 48#define va_arg(AP, TYPE) \ 49 (*((AP).__va_num < 2 && __builtin_classify_type (* (TYPE *)0) < 12 \ 50 ? (__builtin_classify_type (* (TYPE *)0) == 8 \ 51 ? ((TYPE *)(AP).__va_reg[2 * (AP).__va_num++ + 1]) \ 52 : ((TYPE *)(AP).__va_reg[2 * (AP).__va_num++ ])) \ 53 : ((AP).__va_num++, __va_round (AP,TYPE), ((TYPE *)((AP).__va_ap))++))) 54 55#define va_end(AP) ((void) 0) 56 57/* Copy __gnuc_va_list into another variable of this type. */ 58#define __va_copy(dest, src) (dest) = (src) 59 60#endif /* defined (_STDARG_H) || defined (_VARARGS_H) */ 61