// Temporary Fortran front end driver main program for development scaffolding.
-#include "../../lib/IntermediateRepresentation/afforestation.h"
-#include "../../lib/IntermediateRepresentation/graph-writer.h"
+#include "../../lib/FIR/afforestation.h"
+#include "../../lib/FIR/graph-writer.h"
#include "../../lib/common/default-kinds.h"
#include "../../lib/parser/characters.h"
#include "../../lib/parser/features.h"
bool dumpParseTree{false};
bool dumpSymbols{false};
bool dumpGraph{false};
- bool debugLinearIntermediateRepresentation{false};
+ bool debugLinearFIR{false};
bool debugResolveNames{false};
bool debugSemantics{false};
bool measureTree{false};
// TODO: Change this predicate to just "if (!driver.debugNoSemantics)"
if (driver.debugSemantics || driver.debugResolveNames || driver.dumpSymbols ||
driver.dumpUnparseWithSymbols ||
- driver.debugLinearIntermediateRepresentation || driver.dumpGraph) {
+ driver.debugLinearFIR || driver.dumpGraph) {
Fortran::semantics::Semantics semantics{
semanticsContext, parseTree, parsing.cooked()};
semantics.Perform();
}
}
if (driver.dumpGraph) {
- auto *fir{Fortran::IntermediateRepresentation::CreateFortranIR(parseTree,
- semanticsContext, driver.debugLinearIntermediateRepresentation)};
- Fortran::IntermediateRepresentation::GraphWriter::print(*fir);
+ auto *fir{Fortran::FIR::CreateFortranIR(parseTree,
+ semanticsContext, driver.debugLinearFIR)};
+ Fortran::FIR::GraphWriter::print(*fir);
return {};
}
if (driver.dumpParseTree) {
} else if (arg == "-fdotty") {
driver.dumpGraph = true;
} else if (arg == "-fdebug-dump-linear-ir") {
- driver.debugLinearIntermediateRepresentation = true;
+ driver.debugLinearFIR = true;
} else if (arg == "-fparse-only") {
driver.parseOnly = true;
} else if (arg == "-c") {