diff options
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 0d0fdde..4cdea23 100644 --- a/src/fortranscanner.l +++ b/src/fortranscanner.l @@ -944,7 +944,7 @@ private { } // TYPE_SPEC is for old function style function result - result = QCString(yytext).stripWhiteSpace(); + result = QCString(yytext).stripWhiteSpace().lower(); current->type = result; yy_push_state(SubprogPrefix); } |