summaryrefslogtreecommitdiffstats
path: root/src
diff options
context:
space:
mode:
authoralbert-github <albert.tests@gmail.com>2015-01-04 18:02:41 (GMT)
committeralbert-github <albert.tests@gmail.com>2015-01-04 18:02:41 (GMT)
commit557ad21ce28d093044101eb8bee2c4df1621da7a (patch)
tree1ea39b195085dda77837eb6485c3412d64726691 /src
parenteb92c064b33bf9f303233210b9693215b0fb7f9d (diff)
downloadDoxygen-557ad21ce28d093044101eb8bee2c4df1621da7a.zip
Doxygen-557ad21ce28d093044101eb8bee2c4df1621da7a.tar.gz
Doxygen-557ad21ce28d093044101eb8bee2c4df1621da7a.tar.bz2
Fortran: fixed format position 73 and further is comment
Small regression, line with 'C' (Capital C) was edited away, re-instated.
Diffstat (limited to 'src')
-rw-r--r--src/fortranscanner.l3
1 files changed, 3 insertions, 0 deletions
diff --git a/src/fortranscanner.l b/src/fortranscanner.l
index 9b212e8..1cfa13d 100644
--- a/src/fortranscanner.l
+++ b/src/fortranscanner.l
@@ -1474,6 +1474,8 @@ static const char* prepassFixedForm(const char* contents)
}
}
inBackslash = FALSE;
+ // fallthrough
+ case 'C':
case 'c':
case '*':
case '!':
@@ -1496,6 +1498,7 @@ static const char* prepassFixedForm(const char* contents)
}
break;
}
+ // fallthrough
default:
if(column==6 && emptyLabel) { // continuation
if (c != '0') { // 0 not allowed as continuation character, see f95 standard paragraph 3.3.2.3