From a0bdd4b03b87a01a5984aa5c7ad94f66b2a7bc9e Mon Sep 17 00:00:00 2001 From: Doug Rupp Date: Sun, 25 Apr 2021 21:52:09 -0700 Subject: [Ada] The Unix Epochalyse of 2038 - OS_Time gcc/ada/ * adaint.h (OS_Time): typedef as long long. * osint.adb (Underlying_OS_Time): Declare as 64-bit signed type. * libgnat/s-os_lib.adb ("<"): Compare OS_Time as Long_Long_Integer. ("<="): Likewise. (">"): Likewise. (">="): Likewise. * libgnat/s-os_lib.ads (OS_Time): Declare as 64-bit signed type. --- gcc/ada/adaint.h | 4 ---- 1 file changed, 4 deletions(-) (limited to 'gcc/ada/adaint.h') diff --git a/gcc/ada/adaint.h b/gcc/ada/adaint.h index 6ef61e7..b03294f 100644 --- a/gcc/ada/adaint.h +++ b/gcc/ada/adaint.h @@ -101,11 +101,7 @@ extern "C" { #endif /* Type corresponding to GNAT.OS_Lib.OS_Time */ -#if defined (_WIN64) typedef long long OS_Time; -#else -typedef long OS_Time; -#endif #define __int64 long long GNAT_STRUCT_STAT; -- cgit v1.1