[flang] Final tweak before review

Original-commit: flang-compiler/f18@5dda7b2f658198b21a35edc295a488ebada84244
Reviewed-on: https://github.com/flang-compiler/f18/pull/339
Tree-same-pre-rewrite: false

diff --git a/flang/lib/parser/prescan.cc b/flang/lib/parser/prescan.cc
index 2b3590d..16cb11e 100644 (file)
--- a/flang/lib/parser/prescan.cc
+++ b/flang/lib/parser/prescan.cc
@@ -398,7 +398,7 @@ bool Prescanner::NextToken(TokenSequence &tokens) {
       if (*at_ == '\n') {
         // Discard white space at the end of a line.
       } else if (!inPreprocessorDirective_ &&
-          (previous == '(' || *at_ == ')')) {
+          (previous == '(' || *at_ == '(' || *at_ == ')')) {
         // Discard white space before/after parentheses, unless in a
         // preprocessor directive.  This helps yield space-free contiguous
         // names for generic interfaces like OPERATOR( + ) and