ref: 5256bd97e16fe134d0e9b8b072997b4e9df6cbb0
dir: /src/cmd/cc/cc1/amd64-sysv.c/
#include <scc/scc.h> #include "cc1.h" #define RANK_BOOL 0 #define RANK_SCHAR 1 #define RANK_UCHAR 1 #define RANK_CHAR 1 #define RANK_SHORT 2 #define RANK_USHORT 2 #define RANK_INT 3 #define RANK_UINT 3 #define RANK_LONG 4 #define RANK_ULONG 4 #define RANK_LLONG 5 #define RANK_ULLONG 5 #define RANK_FLOAT 6 #define RANK_DOUBLE 7 #define RANK_LDOUBLE 8 static int local_valid_va_list(Type *tp) { return tp->op == PTR && eqtype(tp->type, va_type, 1); } Arch * amd64_sysv(void) { static Arch arch = { .voidtype = { .op = VOID, .letter = L_VOID, }, .pvoidtype = { .op = PTR, .letter = L_POINTER, .prop = TDEFINED, .size = 8, .align = 8, }, .booltype = { .op = INT, .letter = L_BOOL, .prop = TDEFINED | TINTEGER | TARITH, .size = 1, .align = 1, .n.rank = RANK_BOOL, }, .schartype = { .op = INT, .letter = L_INT8, .prop = TDEFINED | TINTEGER | TARITH | TSIGNED, .size = 1, .align = 1, .n.rank = RANK_SCHAR, }, .uchartype = { .op = INT, .letter = L_UINT8, .prop = TDEFINED | TINTEGER | TARITH, .size = 1, .align = 1, .n.rank = RANK_UCHAR, }, .chartype = { .op = INT, .letter = L_INT8, .prop = TDEFINED | TINTEGER | TARITH | TSIGNED, .size = 1, .align = 1, .n.rank = RANK_CHAR, }, .ushorttype = { .op = INT, .letter = L_UINT16, .prop = TDEFINED | TINTEGER | TARITH, .size = 2, .align = 2, .n.rank = RANK_USHORT, }, .shorttype = { .op = INT, .letter = L_INT16, .prop = TDEFINED | TINTEGER | TARITH | TSIGNED, .size = 2, .align = 2, .n.rank = RANK_SHORT, }, .uinttype = { .op = INT, .letter = L_UINT32, .prop = TDEFINED | TINTEGER | TARITH, .size = 4, .align = 4, .n.rank = RANK_UINT, }, .inttype = { .op = INT, .letter = L_INT32, .prop = TDEFINED | TINTEGER | TARITH | TSIGNED, .size = 4, .align = 4, .n.rank = RANK_INT, }, .longtype = { .op = INT, .letter = L_INT64, .prop = TDEFINED | TINTEGER | TARITH | TSIGNED, .size = 8, .align = 8, .n.rank = RANK_LONG, }, .ulongtype = { .op = INT, .letter = L_UINT64, .prop = TDEFINED | TINTEGER | TARITH, .size = 8, .align = 8, .n.rank = RANK_ULONG, }, .ullongtype = { .op = INT, .letter = L_UINT64, .prop = TDEFINED | TINTEGER | TARITH, .size = 8, .align = 8, .n.rank = RANK_ULLONG, }, .llongtype = { .op = INT, .letter = L_INT64, .prop = TDEFINED | TINTEGER | TARITH | TSIGNED, .size = 8, .align = 8, .n.rank = RANK_LLONG, }, .floattype = { .op = FLOAT, .letter = L_FLOAT, .prop = TDEFINED | TARITH, .size = 4, .align = 4, .n.rank = RANK_FLOAT, }, .doubletype = { .op = FLOAT, .letter = L_DOUBLE, .prop = TDEFINED | TARITH, .size = 8, .align = 8, .n.rank = RANK_DOUBLE, }, .ldoubletype = { .op = FLOAT, .letter = L_LDOUBLE, .prop = TDEFINED | TARITH, .size = 16, .align = 16, .n.rank = RANK_LDOUBLE, }, .sizettype = { .op = INT, .letter = L_UINT64, .prop = TDEFINED | TINTEGER | TARITH, .size = 8, .align = 8, .n.rank = RANK_UINT, }, .pdifftype = { .op = INT, .letter = L_INT64, .prop = TDEFINED | TINTEGER | TARITH | TSIGNED, .size = 8, .align = 8, .n.rank = RANK_LONG, }, .ellipsistype = { .op = ELLIPSIS, .letter = L_ELLIPSIS, .prop = TDEFINED, }, .va_type = { .op = STRUCT, .letter = L_VA_ARG, .prop = TDEFINED, .size = 24, .align = 8, }, .zero = { .u.i = 0, }, .one = { .u.i = 1, }, }; sizettype = &arch.sizettype; arch.va_list_type = *mktype(&arch.va_type, ARY, 1, NULL); arch.pvoidtype.type = &arch.chartype; arch.valid_va_list = local_valid_va_list; arch.zero.type = inttype; arch.one.type = inttype; return &arch; }