From ae65d635df87446453628c005cacf2ed3850b9c6 Mon Sep 17 00:00:00 2001 From: Arnaud Charlet Date: Mon, 20 Jul 2009 14:55:43 +0200 Subject: [multiple changes] 2009-07-20 Robert Dewar * sem_ch13.adb: Minor reformatting * einfo.ads: Minor reformatting Component_Bit_Offset is no longer considered obsolescent 2009-07-20 Nicolas Roche * a-calend.adb: Redefine time_t as signed integer with same size as Address type. * s-os_lib.ads: Redefine OS_Time as signed integer with same size as Address type * adaint.h: On Windows 64bits declare OS_Time as long long instead of long 2009-07-20 Javier Miranda * exp_tss.adb (Init_Proc): Add missing support for non-default C++ constructors that have anonymous access type formals. * sem_res.adb (Resolve_Actuals): Disable checks associated with Ada class-wide arguments in case of imported C++ subprograms. * exp_ch3.adb (Build_Initialization_Call): Add assertion. 2009-07-20 Sergey Rybin * vms_data.ads: Update qualifiers. From-SVN: r149810 --- gcc/ada/adaint.h | 7 ++++++- 1 file changed, 6 insertions(+), 1 deletion(-) (limited to 'gcc/ada/adaint.h') diff --git a/gcc/ada/adaint.h b/gcc/ada/adaint.h index 57cedf8..f5c283a 100644 --- a/gcc/ada/adaint.h +++ b/gcc/ada/adaint.h @@ -62,7 +62,12 @@ #define STRUCT_STAT struct stat #endif -typedef long OS_Time; /* Type corresponding to GNAT.OS_Lib.OS_Time */ +/* Type corresponding to GNAT.OS_Lib.OS_Time */ +#if defined (_WIN64) +typedef long long OS_Time; +#else +typedef long OS_Time; +#endif extern int __gnat_max_path_len; extern OS_Time __gnat_current_time (void); -- cgit v1.1