diff options
author | Dimitri van Heesch <dimitri@stack.nl> | 2012-04-29 17:51:51 (GMT) |
---|---|---|
committer | Dimitri van Heesch <dimitri@stack.nl> | 2012-04-29 17:51:51 (GMT) |
commit | 44ca9512aaeb19f7fbd07afda88ec4cfe53ce831 (patch) | |
tree | a8d7cbd0da612bb0b1fa97dcc1bac1838f845338 /src/fortranscanner.l | |
parent | f3e0c94b327d47e5c3d3a36a9a6300cee8d2a537 (diff) | |
download | Doxygen-44ca9512aaeb19f7fbd07afda88ec4cfe53ce831.zip Doxygen-44ca9512aaeb19f7fbd07afda88ec4cfe53ce831.tar.gz Doxygen-44ca9512aaeb19f7fbd07afda88ec4cfe53ce831.tar.bz2 |
Release-1.8.0-20120429
Diffstat (limited to 'src/fortranscanner.l')
-rw-r--r-- | src/fortranscanner.l | 6 |
1 files changed, 4 insertions, 2 deletions
diff --git a/src/fortranscanner.l b/src/fortranscanner.l index f570690..7ceb29f 100644 --- a/src/fortranscanner.l +++ b/src/fortranscanner.l @@ -767,6 +767,7 @@ private { //cout << "5=========> got variable: " << argType << "::" << yytext << endl; /* work around for bug in QCString.replace (QCString works) */ QCString name=yytext; + name = name.lower(); /* remember attributes for the symbol */ modifiers[current_root][name.lower()] |= currentModifiers; argName= name; @@ -853,7 +854,7 @@ private { QCString name(argName); QCString attr("dimension"); attr += yytext; - modifiers[current_root][name] |= attr; + modifiers[current_root][name.lower()] |= attr; } <Variable>{COMMA} { //printf("COMMA: %d<=..<=%d\n", yyColNr-yyleng, yyColNr); // locate !< comment @@ -963,7 +964,7 @@ private { <Subprog>{BS} { /* ignore white space */ } <Subprog>{ID} { current->name = yytext; //cout << "1a==========> got " << current->type << " " << yytext << " " << yyLineNr << endl; - modifiers[current_root][current->name.lower()].returnName = current->name; + modifiers[current_root][current->name.lower()].returnName = current->name.lower(); if (ifType == IF_ABSTRACT || ifType == IF_SPECIFIC) { @@ -1893,6 +1894,7 @@ static void initEntry() static void addCurrentEntry() { //printf("===Adding entry %s to %s\n", current->name.data(), current_root->name.data()); + current->name = current->name.lower(); current_root->addSubEntry(current); last_entry = current; current = new Entry ; |