Make fortranscanner.l reentrant

doxygen · Jan 1, 2020 · 79cca78 · 79cca78
1 parent a036d64
commit 79cca78
Show file tree

Hide file tree

Showing 2 changed files with 1,231 additions and 1,184 deletions.
diff --git a/src/fortranscanner.h b/src/fortranscanner.h
@@ -27,7 +27,8 @@
 class FortranOutlineParser : public OutlineParserInterface
 {
   public:
-    FortranOutlineParser(FortranFormat format=FortranFormat_Unknown) : m_format(format) { }
+    FortranOutlineParser(FortranFormat format=FortranFormat_Unknown);
+   ~FortranOutlineParser();
     void startTranslationUnit(const char *) {}
     void finishTranslationUnit() {}
     void parseInput(const char *fileName,
@@ -39,7 +40,8 @@ class FortranOutlineParser : public OutlineParserInterface
     void parsePrototype(const char *text);
 
   private:
-    FortranFormat m_format;
+    struct Private;
+    std::unique_ptr<Private> p;
 };
 
 class FortranOutlineParserFree : public FortranOutlineParser