From 03456e44cfa6f5b10bf37689d497d05514dd47a4 Mon Sep 17 00:00:00 2001 From: Arnaud Charlet Date: Mon, 22 Jun 2009 11:11:52 +0200 Subject: [multiple changes] 2009-06-22 Vincent Celier * gnatcmd.adb (Check_Files): Close temporary files after all file names have been written into it. 2009-06-22 Matthew Gingell * adaint.c, adaint.h, cstreams.c: Call stat64 on platforms where it is available. 2009-06-22 Thomas Quinot * sem_disp.adb (Check_Direct_Call): Handle the case where the full view of the root type is visible at the point of the call. 2009-06-22 Pat Rogers * gnat_ugn.texi: Revised a sentence to correct a minor grammar error. From-SVN: r148781 --- gcc/ada/cstreams.c | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'gcc/ada/cstreams.c') diff --git a/gcc/ada/cstreams.c b/gcc/ada/cstreams.c index 09c3b9d..2177fdc 100644 --- a/gcc/ada/cstreams.c +++ b/gcc/ada/cstreams.c @@ -96,7 +96,7 @@ int __gnat_is_regular_file_fd (int fd) { int ret; - struct stat statbuf; + STRUCT_STAT statbuf; #ifdef __EMX__ /* Programs using screen I/O may need to reset the FPU after @@ -107,7 +107,7 @@ __gnat_is_regular_file_fd (int fd) __gnat_init_float(); #endif - ret = fstat (fd, &statbuf); + ret = FSTAT (fd, &statbuf); return (!ret && S_ISREG (statbuf.st_mode)); } -- cgit v1.1