diff options
| author | Kai Tietz <kai.tietz@onevision.com> | 2009-11-30 15:12:33 +0100 |
|---|---|---|
| committer | Kai Tietz <ktietz@gcc.gnu.org> | 2009-11-30 15:12:33 +0100 |
| commit | 509f7fdc0e4ae68b9be0d526fe3ca1a04edfcf39 (patch) | |
| tree | 33387a281c621699fd4ef7d110e649820afbadff | |
| parent | a97e4e3fb5970d33aa35c3422499dc38879905c0 (diff) | |
| download | gcc-509f7fdc0e4ae68b9be0d526fe3ca1a04edfcf39.zip gcc-509f7fdc0e4ae68b9be0d526fe3ca1a04edfcf39.tar.gz gcc-509f7fdc0e4ae68b9be0d526fe3ca1a04edfcf39.tar.bz2 | |
unix.c (find_file): Add variable id conditionally for mingw targets.
2009-11-30 Kai Tietz <Kai.Tietz@onevision.com>
* io/unix.c (find_file): Add variable id conditionally for
mingw targets.
From-SVN: r154806
| -rw-r--r-- | libgfortran/ChangeLog | 5 | ||||
| -rw-r--r-- | libgfortran/io/unix.c | 5 |
2 files changed, 9 insertions, 1 deletions
diff --git a/libgfortran/ChangeLog b/libgfortran/ChangeLog index e4d2578..e84d844 100644 --- a/libgfortran/ChangeLog +++ b/libgfortran/ChangeLog @@ -1,3 +1,8 @@ +2009-11-30 Kai Tietz <Kai.Tietz@onevision.com> + + * io/unix.c (find_file): Add variable id conditionally for + mingw targets. + 2009-11-28 Jakub Jelinek <jakub@redhat.com> * intrinsics/pack_generic.c (pack_internal): Remove unused diff --git a/libgfortran/io/unix.c b/libgfortran/io/unix.c index 011d426..8b32475 100644 --- a/libgfortran/io/unix.c +++ b/libgfortran/io/unix.c @@ -1287,6 +1287,9 @@ find_file (const char *file, gfc_charlen_type file_len) char path[PATH_MAX + 1]; struct stat st[2]; gfc_unit *u; +#if defined(__MINGW32__) && !HAVE_WORKING_STAT + uint64_t id = 0ULL; +#endif if (unpack_filename (path, file, file_len)) return NULL; @@ -1295,7 +1298,7 @@ find_file (const char *file, gfc_charlen_type file_len) return NULL; #if defined(__MINGW32__) && !HAVE_WORKING_STAT - id_from_path (path); + id = id_from_path (path); #endif __gthread_mutex_lock (&unit_lock); |