diff options
| author | Arnaud Charlet <charlet@gcc.gnu.org> | 2009-06-22 11:11:52 +0200 |
|---|---|---|
| committer | Arnaud Charlet <charlet@gcc.gnu.org> | 2009-06-22 11:11:52 +0200 |
| commit | 03456e44cfa6f5b10bf37689d497d05514dd47a4 (patch) | |
| tree | 1c44cbd67cb9cf4de50113877176ec1dec6c7539 /gcc/ada/cstreams.c | |
| parent | 283268809829d27d5f54909bc3a79e8e54fc48eb (diff) | |
| download | gcc-03456e44cfa6f5b10bf37689d497d05514dd47a4.zip gcc-03456e44cfa6f5b10bf37689d497d05514dd47a4.tar.gz gcc-03456e44cfa6f5b10bf37689d497d05514dd47a4.tar.bz2 | |
[multiple changes]
2009-06-22 Vincent Celier <celier@adacore.com>
* gnatcmd.adb (Check_Files): Close temporary files after all file names
have been written into it.
2009-06-22 Matthew Gingell <gingell@adacore.com>
* adaint.c, adaint.h, cstreams.c: Call stat64 on platforms where it is
available.
2009-06-22 Thomas Quinot <quinot@adacore.com>
* 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 <rogers@adacore.com>
* gnat_ugn.texi: Revised a sentence to correct a minor grammar error.
From-SVN: r148781
Diffstat (limited to 'gcc/ada/cstreams.c')
| -rw-r--r-- | gcc/ada/cstreams.c | 4 |
1 files changed, 2 insertions, 2 deletions
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)); } |