summaryrefslogtreecommitdiffstats
path: root/src
diff options
context:
space:
mode:
authorolegator <olegator@afe2bf4a-e733-0410-8a33-86f594647bc7>2011-03-18 12:28:51 (GMT)
committerolegator <olegator@afe2bf4a-e733-0410-8a33-86f594647bc7>2011-03-18 12:28:51 (GMT)
commitffce2dce60901da5cf765d6452b8e8d505b80754 (patch)
tree508ebb12307a415eda445ef2fb51e14bad8b33fe /src
parentc9d16c13ce3b0d56634265710d2b655c2d464f1f (diff)
downloadDoxygen-ffce2dce60901da5cf765d6452b8e8d505b80754.zip
Doxygen-ffce2dce60901da5cf765d6452b8e8d505b80754.tar.gz
Doxygen-ffce2dce60901da5cf765d6452b8e8d505b80754.tar.bz2
Partial revert "Fix for bug 644350: fixed format line continuations."
This _partially_ reverts fixes already applied by the patch from bug 521861.
Diffstat (limited to 'src')
-rw-r--r--src/fortranscanner.l11
1 files changed, 5 insertions, 6 deletions
diff --git a/src/fortranscanner.l b/src/fortranscanner.l
index 6defa39..4dad36d 100644
--- a/src/fortranscanner.l
+++ b/src/fortranscanner.l
@@ -1225,13 +1225,12 @@ static const char* prepassFixedForm(const char* contents)
case 'C':
case 'c':
case '*':
- if(column==1) {
+ emptyLabel=FALSE;
+ if(column==1)
newContents[j]='!';
- emptyLabel=FALSE;
- break;
- } else {
- // proceed to the next rule
- }
+ else
+ newContents[j]=c;
+ break;
default:
if(column==6 && emptyLabel) { // continuation
newContents[j]=' ';