summaryrefslogtreecommitdiff
path: root/flang/include/flang/Common/format.h
diff options
context:
space:
mode:
Diffstat (limited to 'flang/include/flang/Common/format.h')
-rw-r--r--flang/include/flang/Common/format.h4
1 files changed, 2 insertions, 2 deletions
diff --git a/flang/include/flang/Common/format.h b/flang/include/flang/Common/format.h
index e38ea6b0dfed..7ca3faa79f29 100644
--- a/flang/include/flang/Common/format.h
+++ b/flang/include/flang/Common/format.h
@@ -606,8 +606,8 @@ template <typename CHAR> bool FormatValidator<CHAR>::Check() {
check_e();
}
} else if (token_.kind() == TokenKind::Point && check_d() &&
- token_.kind() == TokenKind::E) {
- ReportError("Unexpected 'e' in 'G0' edit descriptor"); // C1308
+ token_.kind() == TokenKind::E) { // C1308
+ ReportError("A 'G0' edit descriptor must not have an 'e' value");
NextToken();
if (token_.kind() == TokenKind::UnsignedInteger) {
NextToken();