aboutsummaryrefslogtreecommitdiff
path: root/gdb/dwarf2read.c
diff options
context:
space:
mode:
authorJoel Brobecker <brobecker@gnat.com>2004-10-16 00:41:00 +0000
committerJoel Brobecker <brobecker@gnat.com>2004-10-16 00:41:00 +0000
commitbc5f45f8ffabdc8aadcdb2ceb615ab3b9d62a530 (patch)
tree070092eaf1c4d083d995fb75a5102e8caea8c414 /gdb/dwarf2read.c
parenta872aebf0a052885d8e4f8c2c181c8fdb458ccca (diff)
downloadgdb-bc5f45f8ffabdc8aadcdb2ceb615ab3b9d62a530.zip
gdb-bc5f45f8ffabdc8aadcdb2ceb615ab3b9d62a530.tar.gz
gdb-bc5f45f8ffabdc8aadcdb2ceb615ab3b9d62a530.tar.bz2
* dwarf2read.c (set_cu_language): Set language to Ada for
DW_LANG_Ada83 and DW_LANG_Ada95.
Diffstat (limited to 'gdb/dwarf2read.c')
-rw-r--r--gdb/dwarf2read.c2
1 files changed, 2 insertions, 0 deletions
diff --git a/gdb/dwarf2read.c b/gdb/dwarf2read.c
index 9e1bbb9..420bea0 100644
--- a/gdb/dwarf2read.c
+++ b/gdb/dwarf2read.c
@@ -6094,6 +6094,8 @@ set_cu_language (unsigned int lang, struct dwarf2_cu *cu)
break;
case DW_LANG_Ada83:
case DW_LANG_Ada95:
+ cu->language = language_ada;
+ break;
case DW_LANG_Cobol74:
case DW_LANG_Cobol85:
case DW_LANG_Pascal83: