diff options
| -rw-r--r-- | gdb/ChangeLog | 5 | ||||
| -rw-r--r-- | gdb/linespec.c | 18 |
2 files changed, 23 insertions, 0 deletions
diff --git a/gdb/ChangeLog b/gdb/ChangeLog index 2ef8598..b56e4e2 100644 --- a/gdb/ChangeLog +++ b/gdb/ChangeLog @@ -1,5 +1,10 @@ 2011-12-21 Joel Brobecker <brobecker@adacore.com> + * linespec.c (locate_first_half): Add handling of Ada operators + when the current language is Ada. + +2011-12-21 Joel Brobecker <brobecker@adacore.com> + * objfiles.c (insert_section_p): Do not detect overlay sections if overlay debugging is off. diff --git a/gdb/linespec.c b/gdb/linespec.c index 4d44478..5ad3253 100644 --- a/gdb/linespec.c +++ b/gdb/linespec.c @@ -1331,6 +1331,24 @@ locate_first_half (char **argptr, int *is_quote_enclosed) char *p, *p1; int has_comma; + /* Check if the linespec starts with an Ada operator (such as "+", + or ">", for instance). */ + p = *argptr; + if (p[0] == '"' + && current_language->la_language == language_ada) + { + const struct ada_opname_map *op; + + for (op = ada_opname_table; op->encoded != NULL; op++) + if (strncmp (op->decoded, p, strlen (op->decoded)) == 0) + break; + if (op->encoded != NULL) + { + *is_quote_enclosed = 0; + return p + strlen (op->decoded); + } + } + /* Maybe we were called with a line range FILENAME:LINENUM,FILENAME:LINENUM and we must isolate the first half. Outer layers will call again later for the second half. |