diff options
| author | ktietz <ktietz@138bc75d-0d04-0410-961f-82ee72b054a4> | 2009-11-30 14:12:33 +0000 |
|---|---|---|
| committer | ktietz <ktietz@138bc75d-0d04-0410-961f-82ee72b054a4> | 2009-11-30 14:12:33 +0000 |
| commit | c12dc7d72602a6a618c3a199d82133df1e4b953b (patch) | |
| tree | 33387a281c621699fd4ef7d110e649820afbadff /libgfortran/io | |
| parent | a1a164dc2fb0495765d74f4c7c87a1567e2cc8f4 (diff) | |
| download | gcc-c12dc7d72602a6a618c3a199d82133df1e4b953b.tar.gz | |
2009-11-30 Kai Tietz <Kai.Tietz@onevision.com>
* io/unix.c (find_file): Add variable id conditionally for
mingw targets.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@154806 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'libgfortran/io')
| -rw-r--r-- | libgfortran/io/unix.c | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/libgfortran/io/unix.c b/libgfortran/io/unix.c index 011d426471b..8b324759a73 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); |