| /* GNU C stdarg/varargs support for the M32R */ |
| |
| /* Define __gnuc_va_list. */ |
| #ifndef __GNUC_VA_LIST |
| #define __GNUC_VA_LIST |
| typedef void *__gnuc_va_list; |
| #endif /* not __GNUC_VA_LIST */ |
| |
| /* If this is for internal libc use, don't define anything but |
| __gnuc_va_list. */ |
| #if defined (_STDARG_H) || defined (_VARARGS_H) |
| |
| /* Common code for va_start for both varargs and stdarg. */ |
| |
| #define __va_rounded_size(TYPE) \ |
| (((sizeof (TYPE) + sizeof (int) - 1) / sizeof (int)) * sizeof (int)) |
| |
| #ifdef _STDARG_H /* stdarg.h support */ |
| |
| /* Calling __builtin_next_arg gives the proper error message if LASTARG is |
| not indeed the last argument. */ |
| #define va_start(AP, LASTARG) \ |
| (AP = ((__gnuc_va_list) __builtin_next_arg (LASTARG))) |
| |
| #else /* varargs.h support */ |
| |
| #define va_alist __builtin_va_alist |
| /* The ... causes current_function_varargs to be set in cc1. */ |
| #define va_dcl int __builtin_va_alist; ... |
| #define va_start(AP) AP=(char *) &__builtin_va_alist |
| |
| #endif /* _STDARG_H */ |
| |
| /* Nothing needs to be done to end varargs/stdarg processing */ |
| #define va_end(AP) ((void) 0) |
| |
| /* Values returned by __builtin_classify_type. */ |
| enum __type_class |
| { |
| __no_type_class = -1, |
| __void_type_class, |
| __integer_type_class, |
| __char_type_class, |
| __enumeral_type_class, |
| __boolean_type_class, |
| __pointer_type_class, |
| __reference_type_class, |
| __offset_type_class, |
| __real_type_class, |
| __complex_type_class, |
| __function_type_class, |
| __method_type_class, |
| __record_type_class, |
| __union_type_class, |
| __array_type_class, |
| __string_type_class, |
| __set_type_class, |
| __file_type_class, |
| __lang_type_class |
| }; |
| |
| /* Return whether a type is passed by reference. */ |
| #define __va_by_reference_p(TYPE) (sizeof (TYPE) > 8) |
| |
| #define va_arg(AP,TYPE) \ |
| __extension__ (*({ \ |
| register TYPE *__ptr; \ |
| \ |
| if (__va_by_reference_p (TYPE)) \ |
| { \ |
| __ptr = *(TYPE **)(void *) (AP); \ |
| (AP) = (__gnuc_va_list) ((char *) (AP) + sizeof (void *)); \ |
| } \ |
| else \ |
| { \ |
| __ptr = (TYPE *)(void *) \ |
| ((char *) (AP) + (sizeof (TYPE) < __va_rounded_size (char) \ |
| ? __va_rounded_size (TYPE) - sizeof (TYPE) \ |
| : 0)); \ |
| (AP) = (__gnuc_va_list) ((char *) (AP) + __va_rounded_size (TYPE)); \ |
| } \ |
| \ |
| __ptr; \ |
| })) |
| |
| #endif /* defined (_STDARG_H) || defined (_VARARGS_H) */ |