libgfortran/intrinsics/chmod.c: Silence unused var warning

libgfortran/ChangeLog:

	* intrinsics/chmod.c (chmod_internal): Only declare mode_mask var
	if HAVE_UMASK.
This commit is contained in:
Tobias Burnus 2021-05-05 11:48:48 +02:00
parent 3db6989aba
commit dee371fdd4

View File

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