Showing the changes to include/stdarg.h (1 of 16 files). Show all
Unified · Split
| @@ -0,0 +1,83 @@ | |||
| 1 | #ifndef _STDARG_H | ||
| 2 | #define _STDARG_H | ||
| 3 | |||
| 4 | #ifdef __x86_64__ | ||
| 5 | |||
| 6 | #ifdef __TINYC__ | ||
| 7 | |||
| 8 | #include <stdlib.h> | ||
| 9 | |||
| 10 | /* GCC compatible definition of va_list. */ | ||
| 11 | struct __va_list_struct { | ||
| 12 | unsigned int gp_offset; | ||
| 13 | unsigned int fp_offset; | ||
| 14 | union { | ||
| 15 | unsigned int overflow_offset; | ||
| 16 | char *overflow_arg_area; | ||
| 17 | }; | ||
| 18 | char *reg_save_area; | ||
| 19 | }; | ||
| 20 | |||
| 21 | typedef struct __va_list_struct *va_list; | ||
| 22 | |||
| 23 | /* we use __builtin_(malloc|free) to avoid #define malloc tcc_malloc */ | ||
| 24 | /* XXX: this lacks the support of aggregated types. */ | ||
| 25 | #define va_start(ap, last) \ | ||
| 26 | (ap = (va_list)__builtin_malloc(sizeof(struct __va_list_struct)), \ | ||
| 27 | *ap = *(struct __va_list_struct*)( \ | ||
| 28 | (char*)__builtin_frame_address(0) - 16), \ | ||
| 29 | ap->overflow_arg_area = ((char *)__builtin_frame_address(0) + \ | ||
| 30 | ap->overflow_offset), \ | ||
| 31 | ap->reg_save_area = (char *)__builtin_frame_address(0) - 176 - 16 \ | ||
| 32 | ) | ||
| 33 | #define va_arg(ap, type) \ | ||
| 34 | (*(type*)(__builtin_types_compatible_p(type, long double) \ | ||
| 35 | ? (ap->overflow_arg_area += 16, \ | ||
| 36 | ap->overflow_arg_area - 16) \ | ||
| 37 | : __builtin_types_compatible_p(type, double) \ | ||
| 38 | ? (ap->fp_offset < 128 + 48 \ | ||
| 39 | ? (ap->fp_offset += 16, \ | ||
| 40 | ap->reg_save_area + ap->fp_offset - 16) \ | ||
| 41 | : (ap->overflow_arg_area += 8, \ | ||
| 42 | ap->overflow_arg_area - 8)) \ | ||
| 43 | : (ap->gp_offset < 48 \ | ||
| 44 | ? (ap->gp_offset += 8, \ | ||
| 45 | ap->reg_save_area + ap->gp_offset - 8) \ | ||
| 46 | : (ap->overflow_arg_area += 8, \ | ||
| 47 | ap->overflow_arg_area - 8)) \ | ||
| 48 | )) | ||
| 49 | #define va_copy(dest, src) \ | ||
| 50 | ((dest) = (va_list)malloc(sizeof(struct __va_list_struct)), \ | ||
| 51 | *(dest) = *(src)) | ||
| 52 | #define va_end(ap) __builtin_free(ap) | ||
| 53 | |||
| 54 | #else | ||
| 55 | |||
| 56 | /* for GNU C */ | ||
| 57 | |||
| 58 | typedef __builtin_va_list va_list; | ||
| 59 | |||
| 60 | #define va_start(ap, last) __builtin_va_start(ap, last) | ||
| 61 | #define va_arg(ap, type) __builtin_va_arg(ap, type) | ||
| 62 | #define va_copy(dest, src) __builtin_va_copy(dest, src) | ||
| 63 | #define va_end(ap) __builtin_va_end(ap) | ||
| 64 | |||
| 65 | #endif | ||
| 66 | |||
| 67 | #else | ||
| 68 | |||
| 69 | typedef char *va_list; | ||
| 70 | |||
| 71 | /* only correct for i386 */ | ||
| 72 | #define va_start(ap,last) ap = ((char *)&(last)) + ((sizeof(last)+3)&~3) | ||
| 73 | #define va_arg(ap,type) (ap += (sizeof(type)+3)&~3, *(type *)(ap - ((sizeof(type)+3)&~3))) | ||
| 74 | #define va_copy(dest, src) (dest) = (src) | ||
| 75 | #define va_end(ap) | ||
| 76 | |||
| 77 | #endif | ||
| 78 | |||
| 79 | /* fix a buggy dependency on GCC in libio.h */ | ||
| 80 | typedef va_list __gnuc_va_list; | ||
| 81 | #define _VA_LIST_DEFINED | ||
| 82 | |||
| 83 | #endif /* _STDARG_H */ | ||