parsing with preprocessor directives

Author: mbdevpl

src/fortran/ofp/XMLPrinterBase.java

@@ -673,6 +673,7 @@ public void cleanUp() {
 			propagateBounds(context);
 			try {
 				insertTokens(context, FortranLexer.LINE_COMMENT, "comment", "text");
+				insertTokens(context, FortranLexer.PREPROCESS_LINE, "directive", "text");
 			} catch (IOException error) {
 				error.printStackTrace();
 				System.exit(1);