From 557ad21ce28d093044101eb8bee2c4df1621da7a Mon Sep 17 00:00:00 2001 From: albert-github Date: Sun, 4 Jan 2015 19:02:41 +0100 Subject: Fortran: fixed format position 73 and further is comment Small regression, line with 'C' (Capital C) was edited away, re-instated. --- src/fortranscanner.l | 3 +++ 1 file changed, 3 insertions(+) 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 -- cgit v0.12