diff options
| author | Joel Brobecker <brobecker@gnat.com> | 2012-10-24 18:17:22 +0000 |
|---|---|---|
| committer | Joel Brobecker <brobecker@gnat.com> | 2012-10-24 18:17:22 +0000 |
| commit | f69c91ad24e3704234ffde45557fc5edddd7af8a (patch) | |
| tree | 0cd308ffc63accc030c19227f1b159ae5f7ceac5 /gdb | |
| parent | d99dcf51e1ace49b2e69fa72d2f9d0a048faa0de (diff) | |
| download | gdb-f69c91ad24e3704234ffde45557fc5edddd7af8a.zip gdb-f69c91ad24e3704234ffde45557fc5edddd7af8a.tar.gz gdb-f69c91ad24e3704234ffde45557fc5edddd7af8a.tar.bz2 | |
[Ada] use lbasename when testing if file is part of Ada runtime.
We use a list of regular expressions to match a symtab filenames
against the names of the files in the Ada runtime. These regular
expressions do assume that the filename is a basename, however.
So make sure to evaluate these regular expressions against
the symtab's filename.
Without this patch, we run into problems when the Ada runtime was built
using a project file (through gprbuild).
gdb/ChangeLog:
* ada-lang.c (is_known_support_routine): Use lbasename when
matching the symtab's filename against
known_runtime_file_name_patterns.
Diffstat (limited to 'gdb')
| -rw-r--r-- | gdb/ChangeLog | 6 | ||||
| -rw-r--r-- | gdb/ada-lang.c | 2 |
2 files changed, 7 insertions, 1 deletions
diff --git a/gdb/ChangeLog b/gdb/ChangeLog index 55ad4d9..a4dd74e 100644 --- a/gdb/ChangeLog +++ b/gdb/ChangeLog @@ -1,5 +1,11 @@ 2012-10-24 Joel Brobecker <brobecker@adacore.com> + * ada-lang.c (is_known_support_routine): Use lbasename when + matching the symtab's filename against + known_runtime_file_name_patterns. + +2012-10-24 Joel Brobecker <brobecker@adacore.com> + * ada-lang.c (ada_same_array_size_p): New function. (ada_promote_array_of_integrals): New function. (coerce_for_assign): Add handling of arrays where the elements diff --git a/gdb/ada-lang.c b/gdb/ada-lang.c index edef6bd..2dde814 100644 --- a/gdb/ada-lang.c +++ b/gdb/ada-lang.c @@ -10973,7 +10973,7 @@ is_known_support_routine (struct frame_info *frame) for (i = 0; known_runtime_file_name_patterns[i] != NULL; i += 1) { re_comp (known_runtime_file_name_patterns[i]); - if (re_exec (sal.symtab->filename)) + if (re_exec (lbasename (sal.symtab->filename))) return 1; if (sal.symtab->objfile != NULL && re_exec (sal.symtab->objfile->name)) |