OpenE2K/gcc
2
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

unix.c (find_file): Add variable id conditionally for mingw targets.

Browse Source 
2009-11-30  Kai Tietz  <Kai.Tietz@onevision.com>

        * io/unix.c (find_file): Add variable id conditionally for
        mingw targets.

From-SVN: r154806
This commit is contained in:
Kai Tietz 2009-11-30 15:12:33 +01:00 committed by Kai Tietz
parent a97e4e3fb5
commit 509f7fdc0e
2 changed files with 9 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
libgfortran/ChangeLog
View File

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

5
libgfortran/io/unix.c
View File

@ -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);