aboutsummaryrefslogtreecommitdiff
path: root/libgfortran/io
diff options
context:
space:
mode:
authorKai Tietz <kai.tietz@onevision.com>2009-11-30 15:12:33 +0100
committerKai Tietz <ktietz@gcc.gnu.org>2009-11-30 15:12:33 +0100
commit509f7fdc0e4ae68b9be0d526fe3ca1a04edfcf39 (patch)
tree33387a281c621699fd4ef7d110e649820afbadff /libgfortran/io
parenta97e4e3fb5970d33aa35c3422499dc38879905c0 (diff)
downloadgcc-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
Diffstat (limited to 'libgfortran/io')
-rw-r--r--libgfortran/io/unix.c5
1 files changed, 4 insertions, 1 deletions
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);