233 lines
6.0 KiB
EmacsLisp
233 lines
6.0 KiB
EmacsLisp
(defconst cosmo-c-constants-regex
|
|
(let (
|
|
|
|
(c11-constants
|
|
'("__func__"
|
|
"__STDC_IEC_559__"
|
|
"__VA_ARGS__"
|
|
"__FILE__"
|
|
"__LINE__"
|
|
"__DATE__"
|
|
"__STDC__"
|
|
"__STDC_HOSTED__"
|
|
"__STDC_VERSION__"
|
|
"__TIME__"
|
|
"__STDC_ISO_10646__"
|
|
"__STDC_MB_MIGHT_NEQ_WC__"
|
|
"__STDC_UTF_16__"
|
|
"__STDC_UTF_32__"
|
|
"__STDC_ANALYZABLE__"
|
|
"__STDC_IEC_559_COMPLEX__"
|
|
"__STDC_LIB_EXT1__"
|
|
"__STDC_NO_ATOMICS__"
|
|
"__STDC_NO_COMPLEX__"
|
|
"__STDC_NO_THREADS__"
|
|
"__STDC_NO_VLA__"
|
|
"__STDC_WANT_LIB_EXT1__"))
|
|
|
|
(gcc-cpp-412-constants
|
|
'("__BASE_FILE__"
|
|
"__CHAR_BIT__"
|
|
"__FUNCTION__"
|
|
"__GNUC_MINOR__"
|
|
"__GNUC_PATCHLEVEL__"
|
|
"__GNUC__"
|
|
"__GNUG__"
|
|
"__INCLUDE_LEVEL__"
|
|
"__INTMAX_MAX__"
|
|
"__INT_MAX__"
|
|
"__LONG_LONG_MAX__"
|
|
"__LONG_MAX__"
|
|
"__SCHAR_MAX__"
|
|
"__SHRT_MAX__"
|
|
"__DBL_MIN__"
|
|
"__DBL_MAX__"
|
|
"__FLT_MIN__"
|
|
"__FLT_MAX__"
|
|
"__WCHAR_MAX__"
|
|
"__WCHAR_UNSIGNED__"))
|
|
|
|
(gcc-cpp-92-constants
|
|
'("__x86_64__"
|
|
"__amd64__"
|
|
"__WINT_MAX__"
|
|
"__BIGGEST_ALIGNMENT__"
|
|
"__SIZE_MAX__"
|
|
"__PTRDIFF_MAX__"
|
|
"__UINTMAX_MAX__"
|
|
"__SIG_ATOMIC_MAX__"
|
|
"__INT8_MAX__"
|
|
"__INT16_MAX__"
|
|
"__INT32_MAX__"
|
|
"__INT64_MAX__"
|
|
"__UINT8_MAX__"
|
|
"__UINT16_MAX__"
|
|
"__UINT32_MAX__"
|
|
"__UINT64_MAX__"
|
|
"__INT_LEAST8_MAX__"
|
|
"__INT_LEAST16_MAX__"
|
|
"__INT_LEAST32_MAX__"
|
|
"__INT_LEAST64_MAX__"
|
|
"__UINT_LEAST8_MAX__"
|
|
"__UINT_LEAST16_MAX__"
|
|
"__UINT_LEAST32_MAX__"
|
|
"__UINT_LEAST64_MAX__"
|
|
"__INT_FAST8_MAX__"
|
|
"__INT_FAST16_MAX__"
|
|
"__INT_FAST32_MAX__"
|
|
"__INT_FAST64_MAX__"
|
|
"__UINT_FAST8_MAX__"
|
|
"__UINT_FAST16_MAX__"
|
|
"__UINT_FAST32_MAX__"
|
|
"__UINT_FAST64_MAX__"
|
|
"__INTPTR_MAX__"
|
|
"__UINTPTR_MAX__"
|
|
"__WCHAR_MIN__"
|
|
"__WINT_MIN__"
|
|
"__SIG_ATOMIC_MIN__"
|
|
"__SCHAR_WIDTH__"
|
|
"__SHRT_WIDTH__"
|
|
"__INT_WIDTH__"
|
|
"__LONG_WIDTH__"
|
|
"__LONG_LONG_WIDTH__"
|
|
"__PTRDIFF_WIDTH__"
|
|
"__SIG_ATOMIC_WIDTH__"
|
|
"__SIZE_WIDTH__"
|
|
"__WCHAR_WIDTH__"
|
|
"__WINT_WIDTH__"
|
|
"__INT_LEAST8_WIDTH__"
|
|
"__INT_LEAST16_WIDTH__"
|
|
"__INT_LEAST32_WIDTH__"
|
|
"__INT_LEAST64_WIDTH__"
|
|
"__INT_FAST8_WIDTH__"
|
|
"__INT_FAST16_WIDTH__"
|
|
"__INT_FAST32_WIDTH__"
|
|
"__INT_FAST64_WIDTH__"
|
|
"__INTPTR_WIDTH__"
|
|
"__INTMAX_WIDTH__"
|
|
"__SIZEOF_INT__"
|
|
"__SIZEOF_INTMAX__"
|
|
"__SIZEOF_UINTMAX__"
|
|
"__SIZEOF_LONG__"
|
|
"__SIZEOF_LONG_LONG__"
|
|
"__SIZEOF_SHORT__"
|
|
"__SIZEOF_POINTER__"
|
|
"__SIZEOF_FLOAT__"
|
|
"__SIZEOF_DOUBLE__"
|
|
"__SIZEOF_LONG_DOUBLE__"
|
|
"__SIZEOF_SIZE_T__"
|
|
"__SIZEOF_WCHAR_T__"
|
|
"__SIZEOF_WINT_T__"
|
|
"__SIZEOF_PTRDIFF_T__"
|
|
"__TIMESTAMP__"))
|
|
|
|
(limits
|
|
'("SIZEOF_SHORT"
|
|
"SIZEOF_INT"
|
|
"SIZEOF_LONG"
|
|
"SIZEOF_LONG_LONG"
|
|
"SIZEOF_POINTER"
|
|
"SIZEOF_PTRDIFF_T"
|
|
"SIZEOF_SIZE_T"
|
|
"SIZEOF_WCHAR_T"
|
|
"SIZEOF_WINT_T"
|
|
"SIZEOF_FLOAT"
|
|
"SIZEOF_FLOAT128"
|
|
"SIZEOF_DOUBLE"
|
|
"SIZEOF_FLOAT80"
|
|
"SIZEOF_LONG_DOUBLE"
|
|
"SIZEOF_INTMAX"
|
|
"SCHAR_MAX"
|
|
"SHRT_MAX"
|
|
"INT_MAX"
|
|
"LONG_MAX"
|
|
"LLONG_MAX"
|
|
"LONG_LONG_MAX"
|
|
"SIZE_MAX"
|
|
"INT8_MAX"
|
|
"INT16_MAX"
|
|
"INT32_MAX"
|
|
"INT64_MAX"
|
|
"WINT_MAX"
|
|
"WCHAR_MAX"
|
|
"INTPTR_MAX"
|
|
"PTRDIFF_MAX"
|
|
"SCHAR_MIN"
|
|
"SHRT_MIN"
|
|
"UINT_MIN"
|
|
"INT_MIN"
|
|
"LONG_MIN"
|
|
"LLONG_MIN"
|
|
"LONG_LONG_MIN"
|
|
"SIZE_MIN"
|
|
"INT8_MIN"
|
|
"INT16_MIN"
|
|
"INT32_MIN"
|
|
"INT64_MIN"
|
|
"INTMAX_MIN"
|
|
"INTPTR_MIN"
|
|
"WINT_MIN"
|
|
"WCHAR_MIN"
|
|
"PTRDIFF_MIN"
|
|
"USHRT_MAX"
|
|
"UINT_MAX"
|
|
"ULONG_MAX"
|
|
"ULLONG_MAX"
|
|
"ULONG_LONG_MAX"
|
|
"UINTPTR_MAX"
|
|
"UINT8_MAX"
|
|
"UINT16_MAX"
|
|
"UINT32_MAX"
|
|
"UINT64_MAX"
|
|
"USHRT_MIN"
|
|
"ULONG_MIN"
|
|
"ULLONG_MIN"
|
|
"ULONG_LONG_MIN"
|
|
"UINT8_MIN"
|
|
"UINT16_MIN"
|
|
"UINT32_MIN"
|
|
"UINT64_MIN"
|
|
"UINTMAX_MIN"
|
|
"UINTPTR_MIN"
|
|
"MB_CUR_MAX"
|
|
"MB_LEN_MAX"
|
|
"INTMAX_MAX"
|
|
"UINTMAX_MAX"
|
|
"INTMAX_MAX"
|
|
"UINTMAX_MAX"
|
|
"DBL_MIN"
|
|
"DBL_MAX"
|
|
"FLT_MIN"
|
|
"FLT_MAX"))
|
|
|
|
(cosmopolitan-constants
|
|
'("__SAUCE__"
|
|
"PAGESIZE"
|
|
"FRAMESIZE"
|
|
"BIGPAGESIZE"
|
|
"ENV_MAX"
|
|
"ARG_MAX"
|
|
"CMD_MAX"
|
|
"PATH_MAX"
|
|
"BUFSIZ"
|
|
"CACHELINE"
|
|
"CHAR_BIT"
|
|
"NAME_MAX"
|
|
"NSIG"
|
|
"CHILD_MAX"
|
|
"OPEN_MAX"
|
|
"ATEXIT_MAX"
|
|
"__x86__"
|
|
"__i386__"))
|
|
|
|
)
|
|
(concat "\\_<"
|
|
(regexp-opt (append c11-constants
|
|
gcc-cpp-412-constants
|
|
gcc-cpp-92-constants
|
|
cosmopolitan-constants
|
|
limits))
|
|
"\\_>")))
|
|
|
|
(provide 'cosmo-c-constants)
|