summaryrefslogtreecommitdiffstats
path: root/src/fortranscanner.h
diff options
context:
space:
mode:
Diffstat (limited to 'src/fortranscanner.h')
-rw-r--r--src/fortranscanner.h16
1 files changed, 8 insertions, 8 deletions
diff --git a/src/fortranscanner.h b/src/fortranscanner.h
index ec0d312..92a8669 100644
--- a/src/fortranscanner.h
+++ b/src/fortranscanner.h
@@ -19,7 +19,6 @@
#define SCANNER_FORTRAN_H
#include "parserintf.h"
-#include "util.h"
/** \brief Fortran language parser using state-based lexical scanning.
*
@@ -28,10 +27,10 @@
class FortranLanguageScanner : public ParserInterface
{
public:
- FortranLanguageScanner(void) { codeType = FORTRAN_UNKNOWN;}
- virtual ~FortranLanguageScanner(void) {}
+ FortranLanguageScanner(FortranFormat format=FortranFormat_Unknown) : m_format(format) { }
+ virtual ~FortranLanguageScanner() {}
void startTranslationUnit(const char *) {}
- void finishTranslationUnit(void) {}
+ void finishTranslationUnit() {}
void parseInput(const char *fileName,
const char *fileBuf,
Entry *root,
@@ -53,22 +52,23 @@ class FortranLanguageScanner : public ParserInterface
Definition *searchCtx=0,
bool collectXRefs=TRUE
);
- void resetCodeParserState(void);
+ void resetCodeParserState();
void parsePrototype(const char *text);
- FortranKind codeType;
+ private:
+ FortranFormat m_format;
};
class FortranLanguageScannerFree : public FortranLanguageScanner
{
public:
- FortranLanguageScannerFree(void) { codeType = FORTRAN_FREE; }
+ FortranLanguageScannerFree() : FortranLanguageScanner(FortranFormat_Free) { }
};
class FortranLanguageScannerFixed : public FortranLanguageScanner
{
public:
- FortranLanguageScannerFixed(void) { codeType = FORTRAN_FIXED; }
+ FortranLanguageScannerFixed() : FortranLanguageScanner(FortranFormat_Fixed) { }
};
#endif