diff options
| author | Tom Tromey <tromey@redhat.com> | 2010-12-15 19:28:30 +0000 |
|---|---|---|
| committer | Tom Tromey <tromey@redhat.com> | 2010-12-15 19:28:30 +0000 |
| commit | 62d79c9a7841f6de070137b37dc138bfff7d62d4 (patch) | |
| tree | 37da70b6be45c482dbf455c2ddfbafdf11bada38 /gdb/f-exp.y | |
| parent | 8bafd6a5d82aed290f27e458a53e11352362713c (diff) | |
| download | gdb-62d79c9a7841f6de070137b37dc138bfff7d62d4.tar.gz | |
2010-12-15 Greg Watson <g.watson@computer.org>
* f-exp.y (yylex): Check entire token against keywords.
Diffstat (limited to 'gdb/f-exp.y')
| -rw-r--r-- | gdb/f-exp.y | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/gdb/f-exp.y b/gdb/f-exp.y index 415819a0fc8..feffe7999bc 100644 --- a/gdb/f-exp.y +++ b/gdb/f-exp.y @@ -1150,8 +1150,8 @@ yylex () /* Catch specific keywords. */ for (i = 0; f77_keywords[i].operator != NULL; i++) - if (strncmp (tokstart, f77_keywords[i].operator, - strlen(f77_keywords[i].operator)) == 0) + if (strlen (f77_keywords[i].operator) == namelen + && strncmp (tokstart, f77_keywords[i].operator, namelen) == 0) { /* lexptr += strlen(f77_keywords[i].operator); */ yylval.opcode = f77_keywords[i].opcode; |