From ea4833aab1bcd495d825104717b7d493863aa0dd Mon Sep 17 00:00:00 2001 From: Kaz Kylheku Date: Sat, 24 Jun 2017 11:38:00 -0700 Subject: ffi: provide longlong and ulonglong types. --- ffi.c | 4 ++++ txr.1 | 8 ++++++++ 2 files changed, 12 insertions(+) diff --git a/ffi.c b/ffi.c index a337c17b..d50854af 100644 --- a/ffi.c +++ b/ffi.c @@ -3908,6 +3908,10 @@ static void ffi_init_extra_types(void) ffi_typedef(intern(lit("uid-t"), user_package), type_by_size[convert(uid_t, -1) > 0][sizeof (uid_t)]); #endif + ffi_typedef(intern(lit("longlong"), user_package), + type_by_size[0][sizeof (long long)]); + ffi_typedef(intern(lit("ulonglong"), user_package), + type_by_size[1][sizeof (long long)]); } #if HAVE_LIBFFI diff --git a/txr.1 b/txr.1 index 7f5072ec..d33119b5 100644 --- a/txr.1 +++ b/txr.1 @@ -53995,6 +53995,14 @@ Lisp characters and integers convert to these foreign representations, if they are in their numeric range. Foreign values of these types convert to Lisp integers. +.ccIP @ longlong and @ulonglong +These types are +.code typedef +names for integer types whose representation corresponds to the C types +.code "long long" +and +.codn "unsigned long long" . + .ccIP @ int8 and @ uint8 These types correspond to 8 bit signed and unsigned integers. They convert like integer types: both Lisp integers and characters -- cgit v1.2.3