summaryrefslogtreecommitdiffstats
path: root/src/fortranscanner.l
diff options
context:
space:
mode:
Diffstat (limited to 'src/fortranscanner.l')
-rw-r--r--src/fortranscanner.l5
1 files changed, 5 insertions, 0 deletions
diff --git a/src/fortranscanner.l b/src/fortranscanner.l
index 2102a20..3cafc76 100644
--- a/src/fortranscanner.l
+++ b/src/fortranscanner.l
@@ -2339,7 +2339,12 @@ void FortranLanguageScanner::parseInput(const char *fileName,
QStrList & /*filesInSameTranslationUnit*/)
{
g_thisParser = this;
+
+ printlex(yy_flex_debug, TRUE, __FILE__, fileName);
+
::parseMain(fileName,fileBuf,root);
+
+ printlex(yy_flex_debug, FALSE, __FILE__, fileName);
}
void FortranLanguageScanner::parseCode(CodeOutputInterface & codeOutIntf,