1/* GNU C stdarg/varargs support for the M32R */
2
3/* Define __gnuc_va_list.  */
4#ifndef __GNUC_VA_LIST
5#define __GNUC_VA_LIST
6typedef void *__gnuc_va_list;
7#endif /* not __GNUC_VA_LIST */
8
9/* If this is for internal libc use, don't define anything but
10   __gnuc_va_list.  */
11#if defined (_STDARG_H) || defined (_VARARGS_H)
12
13/* Common code for va_start for both varargs and stdarg.  */
14
15#define __va_rounded_size(TYPE)  \
16  (((sizeof (TYPE) + sizeof (int) - 1) / sizeof (int)) * sizeof (int))
17
18#ifdef _STDARG_H /* stdarg.h support */
19
20/* Calling __builtin_next_arg gives the proper error message if LASTARG is
21   not indeed the last argument.  */
22#define va_start(AP, LASTARG) 						\
23 (AP = ((__gnuc_va_list) __builtin_next_arg (LASTARG)))
24
25#else /* varargs.h support */
26
27#define va_alist  __builtin_va_alist
28/* The ... causes current_function_varargs to be set in cc1.  */
29#define va_dcl    int __builtin_va_alist; ...
30#define va_start(AP)  AP=(char *) &__builtin_va_alist
31
32#endif /* _STDARG_H */
33
34/* Nothing needs to be done to end varargs/stdarg processing */
35#define va_end(AP) ((void) 0)
36
37/* Values returned by __builtin_classify_type.  */
38enum __type_class
39{
40  __no_type_class = -1,
41  __void_type_class,
42  __integer_type_class,
43  __char_type_class,
44  __enumeral_type_class,
45  __boolean_type_class,
46  __pointer_type_class,
47  __reference_type_class,
48  __offset_type_class,
49  __real_type_class,
50  __complex_type_class,
51  __function_type_class,
52  __method_type_class,
53  __record_type_class,
54  __union_type_class,
55  __array_type_class,
56  __string_type_class,
57  __set_type_class,
58  __file_type_class,
59  __lang_type_class
60};
61
62/* Return whether a type is passed by reference.  */
63#define __va_by_reference_p(TYPE) (sizeof (TYPE) > 8)
64
65#define va_arg(AP,TYPE)							\
66__extension__ (*({							\
67  register TYPE *__ptr;							\
68									\
69  if (__va_by_reference_p (TYPE))					\
70    {									\
71      __ptr = *(TYPE **)(void *) (AP);					\
72      (AP) = (__gnuc_va_list) ((char *) (AP) + sizeof (void *));	\
73    }									\
74  else									\
75    {									\
76      __ptr = (TYPE *)(void *)						\
77        ((char *) (AP) + (sizeof (TYPE) < __va_rounded_size (char)	\
78			  ? __va_rounded_size (TYPE) - sizeof (TYPE)	\
79			  : 0));					\
80      (AP) = (__gnuc_va_list) ((char *) (AP) + __va_rounded_size (TYPE)); \
81    }									\
82									\
83  __ptr;								\
84}))
85
86#endif /* defined (_STDARG_H) || defined (_VARARGS_H) */
87