of DW_LANG_Ada83 for Ada units.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@65591
138bc75d-0d04-0410-961f-
82ee72b054a4
+2003-04-14 Joel Brobecker <brobecker@gnat.com>
+
+ * dwarf2out.c (gen_compile_unit_die): Emit DW_LANG_Ada95 instead
+ of DW_LANG_Ada83 for Ada units.
+
2003-04-14 Olivier Hainque <hainque@act-europe.fr>
* fold-const.c (fold): Reorder tests for conditional expressions.
if (strcmp (language_string, "GNU C++") == 0)
language = DW_LANG_C_plus_plus;
else if (strcmp (language_string, "GNU Ada") == 0)
- language = DW_LANG_Ada83;
+ language = DW_LANG_Ada95;
else if (strcmp (language_string, "GNU F77") == 0)
language = DW_LANG_Fortran77;
else if (strcmp (language_string, "GNU Pascal") == 0)