aboutsummaryrefslogtreecommitdiff
path: root/gcc/fortran/scanner.c
diff options
context:
space:
mode:
Diffstat (limited to 'gcc/fortran/scanner.c')
-rw-r--r--gcc/fortran/scanner.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/gcc/fortran/scanner.c b/gcc/fortran/scanner.c
index 33d96d8..f4dedd6 100644
--- a/gcc/fortran/scanner.c
+++ b/gcc/fortran/scanner.c
@@ -2246,7 +2246,7 @@ load_file (const char *realfilename, const char *displayedname, bool initial)
return false;
}
stat_result = stat (realfilename, &st);
- if (stat_result == 0 && !(st.st_mode & S_IFREG))
+ if (stat_result == 0 && !S_ISREG(st.st_mode))
{
fprintf (stderr, "%s:%d: Error: Included path '%s'"
" is not a regular file\n",