Return to va-pa.h CVS log

Up to [Apple XNU] / GNUtools / cc

Annotation of GNUtools/cc/va-pa.h, revision 1.1.1.1

1.1       root        1: 
                      2: /* Define __gnuc_va_list. */
                      3: 
                      4: #ifndef __GNUC_VA_LIST
                      5: #define __GNUC_VA_LIST
                      6: 
                      7: #ifdef NeXT
                      8: #define _ANSI_STDARG_H_
                      9: #endif
                     10: 
                     11: typedef double *__gnuc_va_list;
                     12: #endif /* not __GNUC_VA_LIST */
                     13: 
                     14: /* If this is for internal libc use, don't define anything but
                     15:    __gnuc_va_list.  */
                     16: #if defined (_STDARG_H) || defined (_VARARGS_H)
                     17: #if __GNUC__ > 1
                     18: #define __va_ellipsis ...
                     19: #define __gnuc_va_start(AP) ((AP) = (va_list)__builtin_saveregs())
                     20: #else
                     21: #define va_alist __va_a__, __va_b__, __va_c__, __va_d__
                     22: #define __va_ellipsis 
                     23: #define __gnuc_va_start(AP)\
                     24:   (AP) = (double *) &__va_a__, &__va_b__, &__va_c__, &__va_d__, \
                     25:   (AP) = (double *)((char *)(AP) + 4)
                     26: #endif /* __GNUC__ > 1 */
                     27: 
                     28: #ifdef _STDARG_H
                     29: #define va_start(AP,LASTARG) __gnuc_va_start (AP)
                     30: #else
                     31: /* The ... causes current_function_varargs to be set in cc1.  */
                     32: #define va_dcl long va_alist; __va_ellipsis
                     33: #define va_start(AP) __gnuc_va_start (AP)
                     34: #endif
                     35: 
                     36: #define va_arg(AP,TYPE)                                                \
                     37:   (sizeof(TYPE) > 8 ?                                          \
                     38:    ((AP = (__gnuc_va_list) ((char *)AP - sizeof (int))),       \
                     39:     (*((TYPE *) (void *) (*((int *) (AP))))))                  \
                     40:    :((AP =                                                     \
                     41:       (__gnuc_va_list) ((long)((char *)AP - sizeof (TYPE))     \
                     42:                        & (sizeof(TYPE) > 4 ? ~0x7 : ~0x3))),   \
                     43:      (*((TYPE *) (void *) ((char *)AP + ((8 - sizeof(TYPE)) % 4))))))
                     44: 
                     45: #ifndef va_end
                     46: void va_end (__gnuc_va_list);          /* Defined in libgcc.a */
                     47: #endif
                     48: #define va_end(AP)
                     49: 
                     50: #endif /* defined (_STDARG_H) || defined (_VARARGS_H) */

This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.