summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorolegator <olegator@afe2bf4a-e733-0410-8a33-86f594647bc7>2008-05-25 18:35:56 (GMT)
committerolegator <olegator@afe2bf4a-e733-0410-8a33-86f594647bc7>2008-05-25 18:35:56 (GMT)
commit52629ec8265ab9f6250ec9cd4bba55932e680b9d (patch)
tree0f1a8dc73120a9c93aabfef5cce22e1f74e162b9
parenteea3418bb93ee92a52447aba6cddee2554c70211 (diff)
downloadDoxygen-52629ec8265ab9f6250ec9cd4bba55932e680b9d.zip
Doxygen-52629ec8265ab9f6250ec9cd4bba55932e680b9d.tar.gz
Doxygen-52629ec8265ab9f6250ec9cd4bba55932e680b9d.tar.bz2
Fortran: interface keyword must be followed by a newline, comment or whitespace (bug 521860).
-rw-r--r--src/fortranscanner.l2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/fortranscanner.l b/src/fortranscanner.l
index 89d5473..3fa9bd1 100644
--- a/src/fortranscanner.l
+++ b/src/fortranscanner.l
@@ -384,7 +384,7 @@ PREFIX (RECURSIVE{BS_}|PURE{BS_}|ELEMENTAL{BS_}){0,2}(RECURSIVE|PURE|ELEMENTA
}
/*------ ignore special fortran statements */
-<Start,ModuleBody,SubprogBody>^[ \t]*interface({BS_}{ID}({BS}\({BS}[^ \t()]+{BS}\))?)? { // handle interface block
+<Start,ModuleBody,SubprogBody>^[ \t]*interface({BS_}{ID}({BS}\({BS}[^ \t()]+{BS}\))?)?/{BS}(!|\n) { // handle interface block
if(YY_START == Start)
{
addModule(NULL);