espressif/binutils-gdb
1
0
Fork 0
mirror of https://github.com/espressif/binutils-gdb.git synced 2025-06-19 17:18:24 +08:00
Code Issues Packages Projects Releases Wiki Activity

gdb/fortran: rename f77_keywords to f_keywords

Browse Source 
Rename f77_keywords to f_keywords since some of the introduced keywords
in the array are f90 only.
This commit is contained in:
Nils-Christian Kempke
2022-04-11 14:06:56 +02:00
parent 87abd9825d
commit 04ba653650
1 changed files with 2 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
gdb/f-exp.y
View File

@ -1138,7 +1138,7 @@ static const struct f77_boolean_val boolean_values[] =
{ ".false.", 0 } { ".false.", 0 }
}; };
static const struct token f77_keywords[] = static const token f_keywords[] =
{ {
/* Historically these have always been lowercase only in GDB. */ /* Historically these have always been lowercase only in GDB. */
{ "character", CHARACTER, OP_NULL, true }, { "character", CHARACTER, OP_NULL, true },
@ -1473,7 +1473,7 @@ yylex (void)
/* Catch specific keywords. */ /* Catch specific keywords. */
for (const auto &keyword : f77_keywords) for (const auto &keyword : f_keywords)
if (strlen (keyword.oper) == namelen if (strlen (keyword.oper) == namelen
&& ((!keyword.case_sensitive && ((!keyword.case_sensitive
&& strncasecmp (tokstart, keyword.oper, namelen) == 0) && strncasecmp (tokstart, keyword.oper, namelen) == 0)