home *** CD-ROM | disk | FTP | other *** search
/ PC World 2000 April / PCWorld_2000-04_cd.bin / Software / Servis / Devc / _SETUP.6 / Group15 / va-arc.h < prev    next >
C/C++ Source or Header  |  1999-11-07  |  3KB  |  112 lines
  1. /* stdarg/varargs support for the ARC */
  2.  
  3. /* Define __gnuc_va_list.  */
  4.  
  5. #ifndef __GNUC_VA_LIST
  6. #define __GNUC_VA_LIST
  7. typedef void * __gnuc_va_list;
  8. #endif /* not __GNUC_VA_LIST */
  9.  
  10. /* If this is for internal libc use, don't define anything but
  11.    __gnuc_va_list.  */
  12. #if defined (_STDARG_H) || defined (_VARARGS_H)
  13.  
  14. /* In GCC version 2, we want an ellipsis at the end of the declaration
  15.    of the argument list.  GCC version 1 can't parse it.  */
  16.  
  17. #if __GNUC__ > 1
  18. #define __va_ellipsis ...
  19. #else
  20. #define __va_ellipsis
  21. #endif
  22.  
  23. /* See arc_setup_incoming_varargs for reasons for the oddity in va_start.  */
  24. #ifdef _STDARG_H
  25. #define va_start(AP, LASTARG) \
  26. (AP = (__gnuc_va_list) ((int *) __builtin_next_arg (LASTARG) \
  27.             + (__builtin_args_info (0) < 8 \
  28.                ? (__builtin_args_info (0) & 1) \
  29.                : 0)))
  30. #else
  31. #define va_alist  __builtin_va_alist
  32. #define va_dcl    int __builtin_va_alist; __va_ellipsis
  33. #define va_start(AP) \
  34. (AP = (__gnuc_va_list) ((int *) &__builtin_va_alist \
  35.             + (__builtin_args_info (0) < 8 \
  36.                ? (__builtin_args_info (0) & 1) \
  37.                : 0)))
  38. #endif
  39.  
  40. #ifndef va_end
  41. void va_end (__gnuc_va_list);        /* Defined in libgcc.a */
  42.  
  43. /* Values returned by __builtin_classify_type.  */
  44.  
  45. enum __va_type_classes {
  46.   __no_type_class = -1,
  47.   __void_type_class,
  48.   __integer_type_class,
  49.   __char_type_class,
  50.   __enumeral_type_class,
  51.   __boolean_type_class,
  52.   __pointer_type_class,
  53.   __reference_type_class,
  54.   __offset_type_class,
  55.   __real_type_class,
  56.   __complex_type_class,
  57.   __function_type_class,
  58.   __method_type_class,
  59.   __record_type_class,
  60.   __union_type_class,
  61.   __array_type_class,
  62.   __string_type_class,
  63.   __set_type_class,
  64.   __file_type_class,
  65.   __lang_type_class
  66. };
  67.  
  68. #endif
  69. #define va_end(AP)    ((void)0)
  70.  
  71. /* Avoid errors if compiling GCC v2 with GCC v1.  */
  72. #if __GNUC__ == 1
  73. #define __extension__
  74. #endif
  75.  
  76. /* All aggregates are passed by reference.  All scalar types larger than 8
  77.    bytes are passed by reference.  */
  78. /* We cast to void * and then to TYPE * because this avoids
  79.    a warning about increasing the alignment requirement.
  80.    The casts to char * avoid warnings about invalid pointer arithmetic.  */
  81.  
  82. #define __va_rounded_size(TYPE)  \
  83.   (((sizeof (TYPE) + sizeof (int) - 1) / sizeof (int)) * sizeof (int))
  84.  
  85. #ifdef __big_endian__
  86. #define va_arg(AP,TYPE) \
  87. __extension__                            \
  88. (*({((__builtin_classify_type (*(TYPE*) 0) >= __record_type_class \
  89.       || __va_rounded_size (TYPE) > 8)                \
  90.      ? ((AP) = (char *)(AP) + __va_rounded_size (TYPE *),    \
  91.     *(TYPE **) (void *) ((char *)(AP) - __va_rounded_size (TYPE *))) \
  92.      : ((TYPE *) (void *)                    \
  93.     (AP = (void *) ((__alignof__ (TYPE) > 4            \
  94.              ? ((int) AP + 8 - 1) & -8        \
  95.              : (int) AP)                \
  96.              + __va_rounded_size (TYPE))) - 1));}))
  97. #else
  98. #define va_arg(AP,TYPE) \
  99. __extension__                            \
  100. (*({((__builtin_classify_type (*(TYPE*) 0) >= __record_type_class \
  101.       || __va_rounded_size (TYPE) > 8)                \
  102.      ? ((AP) = (char *)(AP) + __va_rounded_size (TYPE *),    \
  103.     *(TYPE **) (void *) ((char *)(AP) - __va_rounded_size (TYPE *))) \
  104.      : ((AP = (void *) ((__alignof__ (TYPE) > 4            \
  105.             ? ((int) AP + 8 - 1) & -8        \
  106.             : (int) AP)                \
  107.                + __va_rounded_size (TYPE))),        \
  108.     (TYPE *) (void *) (AP - __va_rounded_size (TYPE))));}))
  109. #endif
  110.  
  111. #endif /* defined (_STDARG_H) || defined (_VARARGS_H) */
  112.