diff options
author | albert-github <albert.tests@gmail.com> | 2013-08-26 17:18:29 (GMT) |
---|---|---|
committer | albert-github <albert.tests@gmail.com> | 2013-08-26 17:18:29 (GMT) |
commit | b7c3088d382ba6e0f14c4fa9a7ce83f2253499b5 (patch) | |
tree | e14b3dd0fb11cded9e9f2180498ddaf809d1c948 /src/fortranscanner.l | |
parent | d094c8ffa9b781c32be9ba1bce9890c32dcb6540 (diff) | |
download | Doxygen-b7c3088d382ba6e0f14c4fa9a7ce83f2253499b5.zip Doxygen-b7c3088d382ba6e0f14c4fa9a7ce83f2253499b5.tar.gz Doxygen-b7c3088d382ba6e0f14c4fa9a7ce83f2253499b5.tar.bz2 |
Bug 706804 - Fortran: Doxygen mixes up function-attributes with the return type
test string should not be equal to "function" but should contain "function"
Diffstat (limited to 'src/fortranscanner.l')
-rw-r--r-- | src/fortranscanner.l | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/fortranscanner.l b/src/fortranscanner.l index 3ed0031..327febf 100644 --- a/src/fortranscanner.l +++ b/src/fortranscanner.l @@ -1998,7 +1998,7 @@ static void addSubprogram(const char *text) subrCurrent.prepend(current); current->section = Entry::FUNCTION_SEC ; QCString subtype = text; subtype=subtype.lower().stripWhiteSpace(); - functionLine = subtype=="function"; + functionLine = (subtype.find("function") != -1); current->type += " " + subtype; current->type = current->type.stripWhiteSpace(); current->fileName = yyFileName; |