[flang] Remove incorrect error message

Original-commit: flang-compiler/f18@9ef54520df
Reviewed-on: https://github.com/flang-compiler/f18/pull/184
Tree-same-pre-rewrite: false
This commit is contained in:
Eric Schweitz 2018-09-13 15:34:34 -07:00 committed by GitHub
parent b1938138a7
commit 43da7a187e
2 changed files with 1 additions and 7 deletions

View File

@ -415,10 +415,6 @@ public:
parser::MessageFormattedText{
"END PROGRAM name mismatch"_err_en_US});
}
} else {
errorHandler_.Say(currentPosition_,
parser::MessageFormattedText{
"END PROGRAM must have a program-name"_err_en_US});
}
} else {
if (std::get<parser::Statement<parser::EndProgramStmt>>(mainProgram.t)

View File

@ -216,9 +216,7 @@ std::string CompileFortran(
if (driver.moduleDirectory != "."s) {
directories.insert(directories.begin(), driver.moduleDirectory);
}
if (!Fortran::semantics::ValidateLabels(parseTree, parsing.cooked())) {
return {};
}
(void)Fortran::semantics::ValidateLabels(parseTree, parsing.cooked());
Fortran::semantics::ResolveNames(Fortran::semantics::Scope::globalScope,
parseTree, parsing.cooked(), directories);
Fortran::semantics::ModFileWriter writer;