Return to va-clipper.h CVS log

Up to [GCC 2.x] / gcc

Annotation of gcc/va-clipper.h, revision 1.1.1.2

1.1.1.2 ! root        1: /* GNU C varargs and stdargs support for Clipper.  */
        !             2: 
        !             3: /* Define __gnuc_va_list. */
        !             4: 
        !             5: #ifndef __GNUC_VA_LIST
        !             6: #define __GNUC_VA_LIST
1.1       root        7: 
                      8: typedef struct
                      9: {
1.1.1.2 ! root       10:   int __va_ap;                         /* pointer to stack args */
        !            11:   void *__va_reg[4];                   /* pointer to r0,f0,r1,f1 */
1.1       root       12:   int __va_num;                                /* number of args processed */
1.1.1.2 ! root       13: } __gnuc_va_list;
        !            14: #endif /* not __GNUC_VA_LIST */
        !            15: 
        !            16: 
        !            17: #if defined (_STDARG_H) || defined (_VARARGS_H)
        !            18: #define va_list __gnuc_va_list
        !            19: #define __va_list __gnuc_va_list       /* acc compatibility */
        !            20: 
1.1       root       21: #define _VA_LIST
1.1.1.2 ! root       22: #define _VA_LIST_
        !            23: #define _SYS_INT_STDARG_H              /* acc compatibility */
1.1       root       24: 
                     25: #ifdef _STDARG_H
                     26: #define va_start(AP,LASTARG)                   \
                     27:   ((AP) = *(va_list *)__builtin_saveregs(),    \
                     28:    (AP).__va_num = __builtin_args_info (0),    \
                     29:    (AP).__va_ap += __builtin_args_info (1))
                     30: #else
                     31: #define va_alist  __builtin_va_alist
                     32: /* The ... causes current_function_varargs to be set in cc1.  */
                     33: #define va_dcl    va_list __builtin_va_alist; ...
                     34: #define va_start(AP)                           \
                     35:   ((AP) = *(va_list *)__builtin_saveregs(),    \
                     36:    (AP).__va_num = __builtin_args_info (0))
                     37: #endif /* _STDARG_H */
                     38: 
                     39: #define __va_rounded_size(TYPE)  \
                     40:   (((sizeof (TYPE) + sizeof (int) - 1) / sizeof (int)) * sizeof (int))
                     41: 
                     42: #define __va_round(AP,TYPE)                                    \
                     43:   ((AP).__va_ap = ((AP).__va_ap + __alignof__ (TYPE) - 1 ) &   \
                     44:    ~(__alignof__ (TYPE) - 1))
                     45: 
                     46: #define va_arg(AP, TYPE) \
                     47:   ((AP).__va_num < 2 && __builtin_classify_type (* (TYPE *)0) < 12     \
1.1.1.2 ! root       48:    ? (__builtin_classify_type (* (TYPE *)0) == 8                       \
        !            49:       ? (*(TYPE *)(AP).__va_reg[2 * (AP).__va_num++ + 1])              \
        !            50:       : (*(TYPE *)(AP).__va_reg[2 * (AP).__va_num++ ]))                        \
1.1       root       51:    : ((AP).__va_num++, __va_round (AP,TYPE), *((TYPE *)((AP).__va_ap))++))
                     52: 
                     53: #define va_end(AP)
1.1.1.2 ! root       54: 
        !            55: #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.