* ada-lang.c: Add include of source.h.

        (is_known_support_routine): Improve the check verifying that the file
        associated to this frame exists.
        * Makefile.in (ada-lang.o): Add dependency on source.h.

diff --git a/gdb/ChangeLog b/gdb/ChangeLog
index 2fa60c1597b71e0a759c16a582942b23cb39c5a4..03ec5e6f455f28f1929e4007482301bbc10368ed 100644 (file)
--- a/gdb/ChangeLog
+++ b/gdb/ChangeLog
@@ -1,3 +1,10 @@
+2007-01-06  Joel Brobecker  <brobecker@adacore.com>
+
+       * ada-lang.c: Add include of source.h.
+       (is_known_support_routine): Improve the check verifying that the file
+       associated to this frame exists.
+       * Makefile.in (ada-lang.o): Add dependency on source.h.
+
 2007-01-07  Jim Blandy  <jimb@codesourcery.com>
 
        * ax-general.c (ax_const_l): Select proper opcode for the given

diff --git a/gdb/Makefile.in b/gdb/Makefile.in
index 59a2b92a977297ccb3df46e1cd09d2b0dc6187d2..de2f4fa75affcf2fb9fd32e73d75842804c4f243 100644 (file)
--- a/gdb/Makefile.in
+++ b/gdb/Makefile.in
@@ -1696,7 +1696,8 @@ ada-lang.o: ada-lang.c $(defs_h) $(gdb_string_h) $(demangle_h) \
        $(inferior_h) $(symfile_h) $(objfiles_h) $(breakpoint_h) \
        $(gdbcore_h) $(hashtab_h) $(gdb_obstack_h) $(ada_lang_h) \
        $(completer_h) $(gdb_stat_h) $(ui_out_h) $(block_h) $(infcall_h) \
-       $(dictionary_h) $(exceptions_h) $(annotate_h) $(valprint_h)
+       $(dictionary_h) $(exceptions_h) $(annotate_h) $(valprint_h) \
+       $(source_h)
 ada-typeprint.o: ada-typeprint.c $(defs_h) $(gdb_obstack_h) $(bfd_h) \
        $(symtab_h) $(gdbtypes_h) $(expression_h) $(value_h) $(gdbcore_h) \
        $(target_h) $(command_h) $(gdbcmd_h) $(language_h) $(demangle_h) \

diff --git a/gdb/ada-lang.c b/gdb/ada-lang.c
index 706806efac427851018cfef61d554bc84646fb53..974cea7f3704916294ca61cfe2887a8438f71462 100644 (file)
--- a/gdb/ada-lang.c
+++ b/gdb/ada-lang.c
@@ -55,6 +55,7 @@ Boston, MA 02110-1301, USA.  */
 #include "exceptions.h"
 #include "annotate.h"
 #include "valprint.h"
+#include "source.h"
 
 #ifndef ADA_RETAIN_DOTS
 #define ADA_RETAIN_DOTS 0
@@ -9056,7 +9057,6 @@ is_known_support_routine (struct frame_info *frame)
     = find_pc_line (get_frame_pc (frame), pc_is_after_call);
   char *func_name;
   int i;
-  struct stat st;
 
   /* The heuristic:
      1. The symtab is null (indicating no debugging symbols)
@@ -9072,7 +9072,7 @@ is_known_support_routine (struct frame_info *frame)
      symbols; in this case, the filename referenced by these symbols
      does not exists.  */
 
-  if (stat (sal.symtab->filename, &st))
+  if (symtab_to_fullname (sal.symtab) == NULL)
     return 1;
 
   for (i = 0; known_runtime_file_name_patterns[i] != NULL; i += 1)