Skip to content

Commit

Permalink
Fortran: fixed format position 73 and further is comment
Browse files Browse the repository at this point in the history
Small regression, line with 'C' (Capital C) was edited away, re-instated.
  • Loading branch information
albert-github committed Jan 4, 2015
1 parent eb92c06 commit 557ad21
Showing 1 changed file with 3 additions and 0 deletions.
3 changes: 3 additions & 0 deletions src/fortranscanner.l
Expand Up @@ -1474,6 +1474,8 @@ static const char* prepassFixedForm(const char* contents)
}
}
inBackslash = FALSE;
// fallthrough
case 'C':
case 'c':
case '*':
case '!':
Expand All @@ -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
Expand Down

0 comments on commit 557ad21

Please sign in to comment.