From: Kai Tietz <kai.tietz@onevision.com>
Date: Mon, 30 Nov 2009 14:12:33 +0000 (+0100)
Subject: unix.c (find_file): Add variable id conditionally for mingw targets.
X-Git-Tag: releases/gcc-4.5.0~1917
X-Git-Url: http://git.ipfire.org/?a=commitdiff_plain;h=509f7fdc0e4ae68b9be0d526fe3ca1a04edfcf39;p=thirdparty%2Fgcc.git

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
---

diff --git a/libgfortran/ChangeLog b/libgfortran/ChangeLog
index e4d2578017ba..e84d844c29c7 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 011d426471b5..8b324759a733 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);