|
|
1.1 root 1: /* This is just like the default gvarargs.h
1.1.1.3 root 2: except for differences described below. */
1.1 root 3:
1.1.1.4 root 4: /* Define __gnuc_va_list. */
5:
6: #ifndef __GNUC_VA_LIST
7: #define __GNUC_VA_LIST
8:
1.1.1.3 root 9: #ifndef __svr4__
1.1 root 10: /* This has to be a char * to be compatible with Sun.
11: i.e., we have to pass a `va_list' to vsprintf. */
1.1.1.4 root 12: typedef char * __gnuc_va_list;
1.1.1.3 root 13: #else
14: /* This has to be a void * to be compatible with Sun svr4.
15: i.e., we have to pass a `va_list' to vsprintf. */
1.1.1.4 root 16: typedef void * __gnuc_va_list;
1.1.1.3 root 17: #endif
1.1.1.4 root 18: #endif /* not __GNUC_VA_LIST */
19:
20: /* If this is for internal libc use, don't define anything but
21: __gnuc_va_list. */
22: #if defined (_STDARG_H) || defined (_VARARGS_H)
1.1 root 23:
1.1.1.5 ! root 24: #ifdef _STDARG_H
1.1 root 25:
1.1.1.5 ! root 26: #ifdef __GCC_NEW_VARARGS__
! 27: #define va_start(AP, LASTARG) (AP = (char *) __builtin_saveregs ())
1.1 root 28: #else
1.1.1.2 root 29: #define va_start(AP, LASTARG) \
30: (__builtin_saveregs (), AP = ((char *) __builtin_next_arg ()))
1.1.1.5 ! root 31: #endif
! 32:
1.1.1.2 root 33: #else
1.1.1.5 ! root 34:
1.1.1.3 root 35: #define va_alist __builtin_va_alist
1.1.1.5 ! root 36: #define va_dcl int __builtin_va_alist;
1.1.1.3 root 37:
1.1.1.5 ! root 38: #ifdef __GCC_NEW_VARARGS__
! 39: #define va_start(AP) ((AP) = (char *) __builtin_saveregs ())
! 40: #else
1.1 root 41: #define va_start(AP) \
42: (__builtin_saveregs (), (AP) = ((char *) &__builtin_va_alist))
1.1.1.2 root 43: #endif
44:
1.1.1.5 ! root 45: #endif
! 46:
1.1.1.4 root 47: #ifndef va_end
48: void va_end (__gnuc_va_list); /* Defined in libgcc.a */
49: #endif
1.1 root 50: #define va_end(pvar)
51:
52: #define __va_rounded_size(TYPE) \
53: (((sizeof (TYPE) + sizeof (int) - 1) / sizeof (int)) * sizeof (int))
54:
55: /* Avoid errors if compiling GCC v2 with GCC v1. */
56: #if __GNUC__ == 1
57: #define __extension__
58: #endif
59:
60: /* RECORD_TYPE args passed using the C calling convention are
61: passed by invisible reference. ??? RECORD_TYPE args passed
62: in the stack are made to be word-aligned; for an aggregate that is
63: not word-aligned, we advance the pointer to the first non-reg slot. */
1.1.1.4 root 64: /* We don't declare the union member `d' to have type TYPE
65: because that would lose in C++ if TYPE has a constructor. */
66: /* We cast to void * and then to TYPE * because this avoids
1.1.1.5 ! root 67: a warning about increasing the alignment requirement.
! 68: The casts to char * avoid warnings about invalid pointer arithmetic. */
1.1 root 69: #define va_arg(pvar,TYPE) \
70: __extension__ \
71: ({ TYPE __va_temp; \
72: ((__builtin_classify_type (__va_temp) >= 12) \
1.1.1.5 ! root 73: ? ((pvar) = (char *)(pvar) + __va_rounded_size (TYPE *), \
! 74: **(TYPE **) (void *) ((char *)(pvar) - __va_rounded_size (TYPE *))) \
1.1.1.3 root 75: : __va_rounded_size (TYPE) == 8 \
1.1.1.4 root 76: ? ({ union {char __d[sizeof (TYPE)]; int __i[2];} __u; \
77: __u.__i[0] = ((int *) (void *) (pvar))[0]; \
78: __u.__i[1] = ((int *) (void *) (pvar))[1]; \
1.1.1.5 ! root 79: (pvar) = (char *)(pvar) + 8; \
1.1.1.4 root 80: *(TYPE *) (void *) __u.__d; }) \
1.1.1.5 ! root 81: : ((pvar) = (char *)(pvar) + __va_rounded_size (TYPE), \
! 82: *((TYPE *) (void *) ((char *)(pvar) - __va_rounded_size (TYPE)))));})
1.1.1.4 root 83:
84: #endif /* defined (_STDARG_H) || defined (_VARARGS_H) */
85:
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.