summaryrefslogtreecommitdiffstats
path: root/src/fortranscanner.l
diff options
context:
space:
mode:
authoralbert-github <albert.tests@gmail.com>2019-08-30 17:48:31 (GMT)
committeralbert-github <albert.tests@gmail.com>2019-08-30 17:48:31 (GMT)
commit78564eab5a92c7c80397c0b55ea92ddb2bf5f29e (patch)
tree1effceb009cad420dcd8bc0fd1cd183bdc38fe9e /src/fortranscanner.l
parent6fe6275cd66c7842d6817fd4b8ea0a47b2b5df20 (diff)
downloadDoxygen-78564eab5a92c7c80397c0b55ea92ddb2bf5f29e.zip
Doxygen-78564eab5a92c7c80397c0b55ea92ddb2bf5f29e.tar.gz
Doxygen-78564eab5a92c7c80397c0b55ea92ddb2bf5f29e.tar.bz2
Parsing `#` sign inserted by preprocessor in fixed Form Fortran
In Fortran a file that is included is replaced by the doxygen preprocessor by something like: `# 11 "<path>/<filename>" 2` when this is in fixed form Fortran and the `<path>/<filename>` is long it is possible that the closing double quote is beyond position 72 and thus not seen resulting in: ``` Error in file <path>/<filename> line: 73, state: 22(String) ``` this is caused as the `#` is not handled properly in prepassFixedForm. The `#` should be handled analogous to e.g. `C`.
Diffstat (limited to 'src/fortranscanner.l')
-rw-r--r--src/fortranscanner.l1
1 files changed, 1 insertions, 0 deletions
diff --git a/src/fortranscanner.l b/src/fortranscanner.l
index ea75836..1699c1d 100644
--- a/src/fortranscanner.l
+++ b/src/fortranscanner.l
@@ -1654,6 +1654,7 @@ const char* prepassFixedForm(const char* contents, int *hasContLine)
}
inBackslash = FALSE;
// fallthrough
+ case '#':
case 'C':
case 'c':
case '*':