[gcc.git] / gcc / ginclude / va-sparc.h

/* This is just like the default gvarargs.h
   except for differences decribed below.  */

/* Make this a macro rather than a typedef, so we can undef any other defn.  */
#define va_list __va___list
/* This has to be a char * to be compatible with Sun.
   i.e., we have to pass a `va_list' to vsprintf.  */
typedef char * __va___list;

/* In GCC version 2, we want an ellipsis at the end of the declaration
   of the argument list.  GCC version 1 can't parse it.  */

#if __GNUC__ > 1
#define __va_ellipsis ...
#else
#define __va_ellipsis
#endif

#define va_alist  __builtin_va_alist
/* The ... causes current_function_varargs to be set in cc1.  */
#define va_dcl    int __builtin_va_alist; __va_ellipsis

/* The difference is to store the stack address in both components
   instead of in AP itself.  */
#define va_start(AP) 						\
 (__builtin_saveregs (), (AP) = ((char *) &__builtin_va_alist))
#define va_end(pvar)

#define __va_rounded_size(TYPE)  \
  (((sizeof (TYPE) + sizeof (int) - 1) / sizeof (int)) * sizeof (int))

/* RECORD_TYPE args passed using the C calling convention are
   passed by invisible reference.  ??? RECORD_TYPE args passed
   in the stack are made to be word-aligned; for an aggregate that is
   not word-aligned, we advance the pointer to the first non-reg slot.  */
#define va_arg(pvar,TYPE)					\
({ TYPE __va_temp;						\
   ((__builtin_classify_type (__va_temp) >= 12)			\
    ? ((pvar) += __va_rounded_size (TYPE *),			\
       **(TYPE **) (pvar) - __va_rounded_size (TYPE *))		\
    : ((pvar) += __va_rounded_size (TYPE),		\
       *((TYPE *) ((pvar) - __va_rounded_size (TYPE)))));})
Commit	Line	Data
f3db20a3 RS	1	/* This is just like the default gvarargs.h
	2	except for differences decribed below. */
	3
	4	/* Make this a macro rather than a typedef, so we can undef any other defn. */
	5	#define va_list __va___list
	6	/* This has to be a char * to be compatible with Sun.
	7	i.e., we have to pass a `va_list' to vsprintf. */
	8	typedef char * __va___list;
	9
	10	/* In GCC version 2, we want an ellipsis at the end of the declaration
	11	of the argument list. GCC version 1 can't parse it. */
	12
	13	#if __GNUC__ > 1
	14	#define __va_ellipsis ...
	15	#else
	16	#define __va_ellipsis
	17	#endif
	18
	19	#define va_alist __builtin_va_alist
	20	/* The ... causes current_function_varargs to be set in cc1. */
	21	#define va_dcl int __builtin_va_alist; __va_ellipsis
	22
	23	/* The difference is to store the stack address in both components
	24	instead of in AP itself. */
	25	#define va_start(AP) \
	26	(__builtin_saveregs (), (AP) = ((char *) &__builtin_va_alist))
	27	#define va_end(pvar)
	28
	29	#define __va_rounded_size(TYPE) \
	30	(((sizeof (TYPE) + sizeof (int) - 1) / sizeof (int)) * sizeof (int))
	31
	32	/* RECORD_TYPE args passed using the C calling convention are
	33	passed by invisible reference. ??? RECORD_TYPE args passed
	34	in the stack are made to be word-aligned; for an aggregate that is
	35	not word-aligned, we advance the pointer to the first non-reg slot. */
	36	#define va_arg(pvar,TYPE) \
	37	({ TYPE __va_temp; \
	38	((__builtin_classify_type (__va_temp) >= 12) \
	39	? ((pvar) += __va_rounded_size (TYPE *), \
	40	(TYPE ) (pvar) - __va_rounded_size (TYPE *)) \
	41	: ((pvar) += __va_rounded_size (TYPE), \
	42	((TYPE ) ((pvar) - __va_rounded_size (TYPE)))));})