Skip to content

Commit 66d5541

Browse files
committed
Solved an issue with preprocessor comment handling
Issue was with pointer passing
1 parent b49c789 commit 66d5541

File tree

1 file changed

+1
-1
lines changed

1 file changed

+1
-1
lines changed

flang/lib/Parser/prescan.cpp

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -564,7 +564,7 @@ bool Prescanner::MustSkipToEndOfLine() const {
564564
return true; // skip over ignored columns in right margin (73:80)
565565
} else if (*at_ == '!' && !inCharLiteral_ &&
566566
(!inFixedForm_ || tabInCurrentLine_ || column_ != 6)) {
567-
return !IsCompilerDirectiveSentinel(at_);
567+
return !IsCompilerDirectiveSentinel(at_ + 1);
568568
} else {
569569
return false;
570570
}

0 commit comments

Comments
 (0)