commit dee371fdd4ae25f837b9b2ded7789d07ed739c9e
Author: Tobias Burnus <tobias@codesourcery.com>
Date: Wed May 5 11:48:48 2021 +0200
libgfortran/intrinsics/chmod.c: Silence unused var warning
libgfortran/ChangeLog:
* intrinsics/chmod.c (chmod_internal): Only declare mode_mask var
if HAVE_UMASK.
@@ -71,7 +71,10 @@ chmod_internal (char *file, char *mode, gfc_charlen_type mode_len)
#ifndef __MINGW32__
bool is_dir;
#endif
- mode_t mode_mask, file_mode, new_mode;
+#ifdef HAVE_UMASK
+ mode_t mode_mask;
+#endif
+ mode_t file_mode, new_mode;
struct stat stat_buf;
if (mode_len == 0)