Return to va-sparc.h CVS log

Up to [GCC 2.x] / gcc

Annotation of gcc/va-sparc.h, revision 1.1.1.4

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: 
                     24: /* In GCC version 2, we want an ellipsis at the end of the declaration
                     25:    of the argument list.  GCC version 1 can't parse it.  */
                     26: 
                     27: #if __GNUC__ > 1
                     28: #define __va_ellipsis ...
                     29: #else
                     30: #define __va_ellipsis
                     31: #endif
                     32: 
1.1.1.2   root       33: #ifdef _STDARG_H
                     34: #define va_start(AP, LASTARG)                                  \
                     35:   (__builtin_saveregs (), AP = ((char *) __builtin_next_arg ()))
                     36: #else
1.1.1.3   root       37: #define va_alist  __builtin_va_alist
                     38: /* The ... causes current_function_varargs to be set in cc1.  */
                     39: #define va_dcl    int __builtin_va_alist; __va_ellipsis
                     40: 
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.4 ! root       45: #ifndef va_end
        !            46: void va_end (__gnuc_va_list);          /* Defined in libgcc.a */
        !            47: #endif
1.1       root       48: #define va_end(pvar)
                     49: 
                     50: #define __va_rounded_size(TYPE)  \
                     51:   (((sizeof (TYPE) + sizeof (int) - 1) / sizeof (int)) * sizeof (int))
                     52: 
                     53: /* Avoid errors if compiling GCC v2 with GCC v1.  */
                     54: #if __GNUC__ == 1
                     55: #define __extension__
                     56: #endif
                     57: 
                     58: /* RECORD_TYPE args passed using the C calling convention are
                     59:    passed by invisible reference.  ??? RECORD_TYPE args passed
                     60:    in the stack are made to be word-aligned; for an aggregate that is
                     61:    not word-aligned, we advance the pointer to the first non-reg slot.  */
1.1.1.4 ! root       62: /* We don't declare the union member `d' to have type TYPE
        !            63:    because that would lose in C++ if TYPE has a constructor.  */
        !            64: /* We cast to void * and then to TYPE * because this avoids
        !            65:    a warning about increasing the alignment requirement.  */
1.1       root       66: #define va_arg(pvar,TYPE)                                      \
                     67: __extension__                                                  \
                     68: ({ TYPE __va_temp;                                             \
                     69:    ((__builtin_classify_type (__va_temp) >= 12)                        \
                     70:     ? ((pvar) += __va_rounded_size (TYPE *),                   \
1.1.1.4 ! root       71:        **(TYPE **) (void *) ((pvar) - __va_rounded_size (TYPE *))) \
1.1.1.3   root       72:     : __va_rounded_size (TYPE) == 8                            \
1.1.1.4 ! root       73:     ? ({ union {char __d[sizeof (TYPE)]; int __i[2];} __u;     \
        !            74:         __u.__i[0] = ((int *) (void *) (pvar))[0];             \
        !            75:         __u.__i[1] = ((int *) (void *) (pvar))[1];             \
1.1.1.3   root       76:         (pvar) += 8;                                           \
1.1.1.4 ! root       77:         *(TYPE *) (void *) __u.__d; })                         \
1.1.1.2   root       78:     : ((pvar) += __va_rounded_size (TYPE),                     \
1.1.1.4 ! root       79:        *((TYPE *) (void *) ((pvar) - __va_rounded_size (TYPE)))));})
        !            80: 
        !            81: #endif /* defined (_STDARG_H) || defined (_VARARGS_H) */
        !            82: 

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