summaryrefslogtreecommitdiff
path: root/gnu/usr.bin/gcc/f/src.h
diff options
context:
space:
mode:
Diffstat (limited to 'gnu/usr.bin/gcc/f/src.h')
-rw-r--r--gnu/usr.bin/gcc/f/src.h4
1 files changed, 2 insertions, 2 deletions
diff --git a/gnu/usr.bin/gcc/f/src.h b/gnu/usr.bin/gcc/f/src.h
index 02279154d28..b5d7dfa8b50 100644
--- a/gnu/usr.bin/gcc/f/src.h
+++ b/gnu/usr.bin/gcc/f/src.h
@@ -87,9 +87,9 @@ extern bool ffesrc_ok_match_noninit_lower_;
characters for which ffelex_is_firstnamechar returns TRUE. */
#define ffesrc_is_name_init(c) \
- ((isalpha ((c))) || (!(1 || ffe_is_90 ()) && ((c) == '_')))
+ ((isalpha ((c))) || (!ffe_is_90 () && ((c) == '_')))
#define ffesrc_is_name_noninit(c) \
- ((isalnum ((c))) || (!(1 || ffe_is_90 ()) && ((c) == '_')))
+ ((isalnum ((c))) || (!ffe_is_90 () && ((c) == '_')))
/* Test if source-translated character matches given alphabetic character
(passed in both uppercase and lowercase, to allow for custom speedup